Ufak Bir Sorun

[erkany]

Merhabalar,

Şöyle bir problemim var otomatik sıralama yapmak istiyorum ve yapıyorumda ama benim sıralama yapmak istediğim tablom sql den veri alıyor ve haliyle range ediceğim son bilginin oldugu hucre değişken oluyor... bunlara dayanarak;

Public Sub Satış_Sırala()
Range("A2:B13").Sort [B2], Order1:=xlDescending
End Sub

yukarıdaki macroda B13 hücresini değişken nasıl yapabilirim yani tablomun son hücresini buraya otomatik getirsin....

İyi Çalışmalar

 

[parsley2]

Public Sub Satış_Sırala()
Range("A2:B" & x ).Sort [B2], Order1:=xlDescending
End Sub
olarak düzeldirsen olur. X istediğin şey

 

[AS3434]

Sayın erkany
Selam
Makronuzu şöyle düzenleyebilirsiniz.

Public Sub Satış_Sırala()
x = [b65536].End(3).Row
Range("A2:B" & x).Sort [B2], Order1:=xlDescending
End Sub

 

[erkany]

Teşekkür..

Arkadaşlar cok teşekkürler. cok hızlısın sorunum halloldu....