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

Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?

[es] :: Office :: Excel :: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?

[ Pregleda: 1539 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

pcpopovic
PC_Popović
Srbija

Član broj: 226882
Poruke: 206
*.dynamic.isp.telekom.rs.



+9 Profil

icon Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?12.03.2016. u 10:23 - pre 97 meseci
Hoću da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea", međutim kada (nakon "pamćenja" i zatvaranja) opet otvorim fajl podešavanja se izgube. Pokušao sam i sa VBA kodovima) - ali ništa. Zašto?
Kod koji sam najčešće ispisivao:

Private Sub Workbook_Open()
Worksheets("sheet1").ScrollArea = "A1:J101"
End Sub

[Ovu poruku je menjao pcpopovic dana 12.03.2016. u 11:52 GMT+1]

[Ovu poruku je menjao pcpopovic dana 12.03.2016. u 11:54 GMT+1]
 
Odgovor na temu

timmy
Jovan Timotijevic

Moderator
Član broj: 37087
Poruke: 634

Sajt: www.e-tim.net


+89 Profil

icon Re: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?13.03.2016. u 10:10 - pre 97 meseci
Ovo kod je sasvim u redu, ali obrati paznju da,

1. naravno dokument mora da bude u .xlsm formatu da bi VBA kod ostao u dokumentu i naravno funkcionisao.
2. VBA makroi moraju da budu omoguceni
3. Pojedini Antivirusi bi mogli da blokiraju izvrsavanje VBA koda, ako s edobro secam Kaspersky ima opcije da pojedine komande blokira

Pozdrav
 
Odgovor na temu

pcpopovic
PC_Popović
Srbija

Član broj: 226882
Poruke: 206
*.dynamic.isp.telekom.rs.



+9 Profil

icon Re: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?13.03.2016. u 17:51 - pre 97 meseci
Sve sam ovo uradio i proverio i... ništa. Ukoliko to označim u Properties-u Lista (ScrollArea $A$1:$J$101), to "drži vodu" dok ne zatvorim fajl.
Sada sam, umesto "sheet1" napisao naziv mog List-a - "Podaci" i kod postavio u VBA tog List-a (ne u "ThisWorkbook"-a):

Private Sub Workbook_Open()
Worksheets("Podaci").ScrollArea = "A1:J101"
End Sub
 
Odgovor na temu

pcpopovic
PC_Popović
Srbija

Član broj: 226882
Poruke: 206
*.dynamic.isp.telekom.rs.



+9 Profil

icon Re: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?13.03.2016. u 20:23 - pre 97 meseci
Uspeo sam. Treba u "ThisWorkbook" napisati:

Private Sub Workbook_Open()
Worksheets("Podaci").ScrollArea = "$A$1:$J$101"
End Sub

Kako sad napisti za ostale "List"-ove? Da li za svaki dodavati novu proceduru:

Private Sub Workbook_Open()
Worksheets("Podaci").ScrollArea = "$A$1:$J$101"
End Sub
_____________________________________
Private Sub Workbook_Open()
Worksheets("Promet").ScrollArea = "$A$1:$M$203"
End Sub
____________________________
itd...


Ili dodavati u drugom redu oznake "List"-ova i rapone ćelija:

Private Sub Workbook_Open()
Worksheets("Podaci").ScrollArea = "$A$1:$J$101"
Worksheets("Podaci").ScrollArea = "$A$1:$J$101"
itd...
End Sub


Ili neki treći način?
 
Odgovor na temu

pcpopovic
PC_Popović
Srbija

Član broj: 226882
Poruke: 206
*.dynamic.isp.telekom.rs.



+9 Profil

icon Re: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?13.03.2016. u 21:15 - pre 97 meseci
Prethodno je rešeno.

Povlačim pitanje (koje je bilo ovde) da ga Administrator ne "skine". Otvoriću novu temu. Pozdrav.

[Ovu poruku je menjao pcpopovic dana 14.03.2016. u 14:50 GMT+1]
 
Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898



+66 Profil

icon Re: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?14.03.2016. u 21:08 - pre 97 meseci
Citat:
pcpopovic:Ili neki treći način?
Postavi range u Properties Sheeta u VBE
 
Odgovor na temu

pcpopovic
PC_Popović
Srbija

Član broj: 226882
Poruke: 206
*.dynamic.isp.telekom.rs.



+9 Profil

icon Re: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?15.03.2016. u 14:27 - pre 97 meseci
Rešio sam postavljajući sve u "Workbook", dodajući linije opsega ćelija (Range) za pojedine "Sheet"-ove - za sada radi:

...
Worksheets("Podaci").ScrollArea = "$A$1:$J$101"
Worksheets("Promet").ScrollArea = "$A$1:$M$203"
Worksheets("Cene").ScrollArea = "$A$1:$DQ$53"
...

@Ivek33
Pogledaj stranu:
http://www.elitesecurity.org/t489772-0
Pa pokušaj da pomogneš. Pozdrav.
 
Odgovor na temu

[es] :: Office :: Excel :: Kako da limitiram kretanje korisnika kroz List-ove, pomoću "ScrollArea"?

[ Pregleda: 1539 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

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