[ arthichoka @ 24.08.2012. 19:33 ] @
| Kada aktiviram ovakav makro prvo imam prazne čelije, pa brojeve, pa tek onda slova. Šta da uradim da mi prazne čelije budu zadnje. Sub Makronaredba2() ' ' Makronaredba2 Makronaredba ' ' Tipkovni prečac: Ctrl+n ' Range("C4:I73").Select Range("I4").Activate ActiveWorkbook.Worksheets("NASLOVNA").Sort.SortFields.Clear ActiveWorkbook.Worksheets("NASLOVNA").Sort.SortFields.Add Key:=Range("C4:C73" _ ), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("NASLOVNA").Sort .SetRange Range("C4:I73") .Header = xlGuess .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With Range("J54").Select ActiveWindow.SmallScroll Down:=-84 |