Displaying a flash screen image on start-up
I would like to have an embedded image be shown for a few seconds on the
startup of a XL workbook. The flash screen image would be embedded in the workbook. Can anyone help? |
Displaying a flash screen image on start-up
Here is information on how to make a splash screen in Excel:
http://www.ozgrid.com/Excel/excel-splash-screen.htm Perhaps you can change the code a bit to use an image. For instance, set the Visible property of the image to True, and after the short periode of time, set it back to Visible = False. -- Wigi http://www.wimgielis.be = Excel/VBA, soccer and music "Roger on Excel" wrote: I would like to have an embedded image be shown for a few seconds on the startup of a XL workbook. The flash screen image would be embedded in the workbook. Can anyone help? |
Displaying a flash screen image on start-up
This code will open an embeded object. You need to get the name of the
embedded object use this for each shp in sheets("Sheet1") msgbox(shp.name) next shp Private Sub App_WorkbookOpen(ByVal Wb As Workbook) Sheets("Sheet1").OLEObjects("object 1").Activate newHour = Hour(Now()) newMinute = Minute(Now()) newSecond = Second(Now()) + 10 waitTime = TimeSerial(newHour, newMinute, newSecond) Application.Wait waitTime Sheets("Sheet1").OLEObjects("object 1").Close End Sub "Roger on Excel" wrote: I would like to have an embedded image be shown for a few seconds on the startup of a XL workbook. The flash screen image would be embedded in the workbook. Can anyone help? |
All times are GMT +1. The time now is 05:23 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com