Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

sortiranje u rastućem, bez praznih ćelija

[es] :: Office :: Excel :: sortiranje u rastućem, bez praznih ćelija

[ Pregleda: 1731 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

arthichoka
zagreb

Član broj: 34923
Poruke: 22
*.dynamic.amis.hr.



Profil

icon sortiranje u rastućem, bez praznih ćelija10.10.2009. u 17:10 - pre 176 meseci
Potrebna mi je ispravka ovog makroa ili nešto slično trebam sortiranje čelija po abecedi A-Z tako da su prazne čelije na kraju, u mom slučaju su na početku.

Sub Macro2()
'
'
'
' Keyboard Shortcut: Ctrl+q
'
ActiveWindow.SmallScroll Down:=-3
ActiveSheet.Unprotect
Range("B7:F92").Select
Range("F7").Activate
Selection.Sort Key1:=Range("B7"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("B3:F4").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
 
Odgovor na temu

3okc
Χoᴘᴦoѡ

Moderator
Član broj: 811
Poruke: 1318

Jabber: 3okc@elitesecurity.org


+116 Profil

icon Re: sortiranje u rastućem, bez praznih ćelija11.10.2009. u 16:44 - pre 176 meseci
Klasično sortiranje u rastućem redosledu već radi ono što hoćeš, tako da ne vidim u čemu bi bila ispravka!?

Ono što na prvi pogled mogu da primetim je da, pre samog sortiranja, aktiviraš ćeliju F7, što mi implicira da je u ovoj koloni vrednost za koju (imaš nameru da) sortiraš tabelu. Međutim, ovo se razlikuje u komandi kojom sortiraš tabelu (vidi označene reference crvenom).
Citat:

Sub Macro2()
'
'
ActiveWindow.SmallScroll Down:=-3
ActiveSheet.Unprotect
Range("B7:F92").Select
Range("F7").Activate
Selection.Sort Key1:=Range("B7"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal


Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation?
↗Ana & Vlade Divac Foundation
Hvala!
 
Odgovor na temu

[es] :: Office :: Excel :: sortiranje u rastućem, bez praznih ćelija

[ Pregleda: 1731 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.