Hücre sıralama

[ozuberk]

Merhaba sorum ekli dosyadadır. Teşekkür ederim

 

[Erdem Akdemir]

Sub sırala()

Range("A:C").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub

denermisiniz