..:: 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

14.06.2010 07:59:43: Text Box - link

20.11.2006 23:35:38: kakšno formulo naj uporabim in obliko celice

30.11.2009 12:59:59: Pokon?no leže?e