..:: Nasvet/VBA ::..

Kako lahko dosežem, da se ob odprtju delovnega zvezka prikaže moja reklama (podobno kot pri odpriranju Excela/Worda…)?


Kar želite doseči, se s tujko imenuje Splash Screen (smiselnega prevoda ne poznam zato se zanj priporočam...)

Dobro, najprej morate narediti preprost obrazec, kjer bo zapisana vaša reklama. Predpostavimo, da obrazec imate (imenuje naj se frmReklama) in ga želite prikazati za 5 sec. vsakič ko se zvezek odpre. Za izvedbo naloge boste morali uporabiti odzive na dogodke, o čemur lahko berete v prejšnjem nasvetu.

'Najprej zaukažite Excelu, da ob odprtju zvezka prikaže reklamo: Private Sub Workbook_Open() frmReklama.Show End Sub 'Nato napišite proceuro, ki formo zapre: Private Sub ZapriReklamo() Unload frmReklama End Sub 'In nazadne zaukažite Excelu, naj po petih sekundah zapre reklamo Private Sub frmReklama_Activate() Application.OnTime Now + TimeValue("00:00:05"), _ "ZapriReklamo" End Sub



Navigacija

Se splača!

Tekmovanje

Najboljši krotilci kač...

Naključno iz foruma

26.02.2012 10:49:55: presko?iti del kode

05.05.2010 11:55:00: odpiranje datoteke excel

08.05.2012 15:56:31: zdruzevanje tabel