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

[Excel] Greska kod ScrollArea -VBA

[es] :: Office :: Excel :: [Excel] Greska kod ScrollArea -VBA

[ Pregleda: 724 | Odgovora: 1 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

mirko1949
Miroslav Magdić
Kragujevac

Član broj: 87134
Poruke: 147
89.216.228.*



Profil

icon [Excel] Greska kod ScrollArea -VBA06.12.2006. u 19:08

Da bi onemogucio skrollovanje u worksheetu u VB Editoru u Properties Window pod ScrollArea upisao sam raspon u kojem zelim omogucavanje kretanja (npr $A$1:$C$20). Da bi omogucio da posle zatvaranjai ponovnog otvaranja workbooka ovo ostane upamceno dodao sam u željeni worksheet sledeci kod:

Private Sub Worksheet_Activate()
ScrollArea = "$A$1:$C$20"
End Sub

Medjutim posle ponovnog otvaranja workbooka ovo ne funkcionise. U cemu je problem? Gde je greska?
06.12.2006. u 19:08 

Jpeca
Predrag Jovanović
Božic i sinovi - škola računara
Pančevo

Moderator
Član broj: 25683
Poruke: 1124
194.106.171.*

Jabber: jpeca@elitesecurity.org


Profil

icon Re: [Excel] Greska kod ScrollArea -VBA06.12.2006. u 19:49
Probao sam i ovo kod mene funkcioniše (nadam se da su ti omogućeni makroi). Problem je što se kod izvršava tek kada se aktivira worksheet, tj. potrebno je da pređeš na drugi worksheet pa da se vratiš na njega. Naravno, to može da se simulira kodom, ali je mnogo jednostavnije da umesto događaja Worksheet_Activate, obradiš događaj Workbook_Open (dakle na nivou radne sveske). Dakle sledeći kod:
Code:

Private Sub Workbook_Open()
   Worksheets(1).ScrollArea = "$A$1:$C$20" 
End Sub

Na taj način samo jednom podesiš svojstvo ScrollArea i ono traje do zatvaranje.
Dva u dva ide jednom ako možeš da ga ućuškaš
06.12.2006. u 19:49 

[es] :: Office :: Excel :: [Excel] Greska kod ScrollArea -VBA

[ Pregleda: 724 | Odgovora: 1 ]

Postavi temu Odgovori

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