• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

isme göre sıralama

Katılım
20 Ekim 2005
Mesajlar
504
s.a.

ekli dosyadaki tablodaki bilgileri nasıl isme göre sıralatabiliriz.

selametle..........
 

Ekli dosyalar

Bu istediğiniz kodları makro kaydet ile elde edebilirsiniz.
 
s.a.

üstad makro kaydet ile hallediyorum ama, benim için öncelikli olan iki tabloyuda birbirine bitiştirmeden aynı anda sıralamak istiyorum. işte bunu birtürlü halledemiyorum.

Saygılarımla.........................


Kullandığım kodlar:

sub makro1 ()

Range("B2:B41,B45:B46").Select
Range("B45").Activate
ActiveWindow.SmallScroll Down:=-30
Columns("B:B").Select
Range("A1:G84").Sort Key1:=Range("B1"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("B2:B41,B45:B46").Select
Range("B45").Activate
ActiveWindow.SmallScroll Down:=-30
Columns("B:B").Select
Range("A1:G84").Sort Key1:=Range("B1"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal Range("B2:B41,B45:B46").Select
Range("B45").Activate
ActiveWindow.SmallScroll Down:=-30
Columns("B:B").Select
Range("A1:G84").Sort Key1:=Range("B1"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

End Sub
 
İki tabloyu birleştirmeden ancak ayrı ayrı sıralatabilirsiniz. Yani alttaki tablodan üstteki tabloya veri kaydırma sözkonusu olmaz. Eğer bu tabloları sırf yazdırma sebebiyle ayırdıysanız buna hiç gerek yok. Sadece sayfa yapısı menüsünde üstte yinelenen satırlara bir tanımlama yapmanız yeterlidir.
 
Geri
Üst