ustalarımdan yardım bekliyorum aşağıdaki kodda bir hata varmı acaba formüle göre sıralama yapıyor ben sayılara göre yapmasını istiyorum. dosya ektedir
Application.ScreenUpdating = False
sat = Sheets("sayfa1").Range("o65536").End(3).Row + 1
Range("b8" & "
" & sat - 1).Select
Dim a As Variant
Application.ScreenUpdating = False
Selection.Sort key1:=Range("o8"), order1:=2, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Application.ScreenUpdating = True
Application.ScreenUpdating = True
bir sorumda makro olan bir dosyamı fazla yer kaplar kod olan dosyamı?
Application.ScreenUpdating = False
sat = Sheets("sayfa1").Range("o65536").End(3).Row + 1
Range("b8" & "
" & sat - 1).SelectDim a As Variant
Application.ScreenUpdating = False
Selection.Sort key1:=Range("o8"), order1:=2, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Application.ScreenUpdating = True
Application.ScreenUpdating = True
bir sorumda makro olan bir dosyamı fazla yer kaplar kod olan dosyamı?