"opozorilo"
"opozorilo"
Zdravo.
Je v VBA možno naredit nekakšno "opozorilo" v smislu Loading + kakšne črtice (primer:http://www.google.si/search?hl=sl&tbm=i ... 80&bih=925). Za čas poteka makroja imam Screen.Updating na OFF in v tem času, ko se nekaj dogaja v ozadju bi želel imet na zaslonu podoben znak.
Upam, da sem dovolj jasno razložil, kaj želim (in ne znam naredit)...
Hvala in lep pozdrav
Gregor
Je v VBA možno naredit nekakšno "opozorilo" v smislu Loading + kakšne črtice (primer:http://www.google.si/search?hl=sl&tbm=i ... 80&bih=925). Za čas poteka makroja imam Screen.Updating na OFF in v tem času, ko se nekaj dogaja v ozadju bi želel imet na zaslonu podoben znak.
Upam, da sem dovolj jasno razložil, kaj želim (in ne znam naredit)...
Hvala in lep pozdrav
Gregor
Re: "opozorilo"
Risati ga morate sami in to znotraj makra. Ko se makro izvaja (verjetno v kakšni zanki), daste v zanko (na vsakih X korakov) neko kodo, ki :
- postavi ScreenUpdating na TRUE,
- doriše nekaj črtic /pikic /znakov in
- postavi ScreenUpdating na FALSE
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: "opozorilo"
Kaj pa če bi s kodo vklopil neko sliko.gif za čas izvajanja makroja?
Re: "opozorilo"
Slike ne morete kar "vklopiti", ker je nimate kam postaviti. Narediti morate nov obrazec (UserForm) in nanjo "obesiti" sliko in v kodi odpreti ter prikazati obrazec, izvesti makro ter nato zapreti obrazec.
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: "opozorilo"
Ali pa recimo napišeš nek Msgbox v kodi, tam kjer želiš da uporabnik počaka in da ti ne klika po nepotrebnem.
Omogočiš screen_update in na koncu ponovno onemogočiš.
Vsaj tako jaz rešujem zadevo za tiste, ki postanejo nestrpni ob izvajanju makrojev.
Moje skromno mnenje.
Omogočiš screen_update in na koncu ponovno onemogočiš.
Vsaj tako jaz rešujem zadevo za tiste, ki postanejo nestrpni ob izvajanju makrojev.
Moje skromno mnenje.
Re: "opozorilo"
Sem malo poskušal, pa mi nekak te rešitve ne uspe spravit v tako obliko kot bi rad. Makro "Uredi" uredi dokument (tega urejanja ne bi rad gledal).
Del moje kode bi izgledal tako:
Kje tukaj uvrstim tisti Msgbox?
Lp, Gregor
Del moje kode bi izgledal tako:
Koda: Izberi vse
Sub list()
Application.ScreenUpdating = False
Call Uredi
Application.ScreenUpdating = True
End Sub
Lp, Gregor
Re: "opozorilo"
MSGBox nikamor, saj bi vam slednji ustavil izvajanje makra, dokler bi uporabnik ne pritisnil tipke OK.... Tega pa verjetno ne želite
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: "opozorilo"
To mi je jasno. Poskušal sem uporabiti rešitev od uporabnika "bluespeed", pa mi ni uspelo...
Re: "opozorilo"
Čakajte; če vam je jasno, da bo ta rešitev ustavila izvajanje makra pa ste jo vseeno poskusili implementirati? Zakaj? No saj implementacija je dokaj trivialna. V vas makro 'Uredi' pač na poljubno mesto dajte:
Koda: Izberi vse
MsgBox "To je neko opozorilo!"
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: "opozorilo"
Lahko pa poizkusite opozorilo rešiti s "Statusbarom", t.j. vrstica levo spodaj, kjer ponavadi piše "Pripravljen"
Če imate npr. neko zanko, ki se zavrti recimo 1000 x, potem lahko zapišete nekako tako:
na koncu pa morate "Statusbar" sprostiti:
Statusbar se namreč spreminja tudi, če imate prej v kodi preprečeno osveževanje ekrana.
Ne vem pa, če vam moj predlog ustreza...
Če imate npr. neko zanko, ki se zavrti recimo 1000 x, potem lahko zapišete nekako tako:
Koda: Izberi vse
For x = 1 To 1000
Application.StatusBar = "Opravljeno " & x & _
" dejanj od " & 1000
'''''zanka se nadaljuje
'......
Koda: Izberi vse
Application.StatusBar = False
Ne vem pa, če vam moj predlog ustreza...
lp,
cedra
cedra
Re: "opozorilo"
Pri predlogu z Msgbox-om sem imel napačno predstavo, da je tako opozorilo ves čas izvajanja makroja na zaslonu, dejansko pa samo uporabnika lahko opozorim, da se bo začel makro izvajat... Moja napaka
Pri predlogu cedre pa stvar deluje, bo treba uporabnika pač opozorit, da lahko v statusni vrstici spremlja kaj se dogaja in koliko še manjka do konca.
Še enkrat več hvala za pomoč.
Lep dan
Pri predlogu cedre pa stvar deluje, bo treba uporabnika pač opozorit, da lahko v statusni vrstici spremlja kaj se dogaja in koliko še manjka do konca.
Še enkrat več hvala za pomoč.
Lep dan