Home |
Search |
Today's Posts |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
On Apr 16, 7:54*pm, Tom Hutchins
wrote: Here is another method... Add the WordArt to a blank worksheet in the workbook. Turn off the gridlines on the sheet (Tools Options View. Uncheck the Gridlines box, then click OK.) Name the sheet MsgSht. Paste the following code in the ThisWorkbook module: Private Sub Workbook_Open() Sheets("MsgSht").Visible = xlSheetVisible Sheets("MsgSht").Activate Sheets("MsgSht").ScrollArea = "A1:O31" Application.Wait Now() + TimeValue("0:00:05") Sheets("MsgSht").Visible = xlVeryHidden Sheets("Sheet1").Activate End Sub Change Sheet1 to whatever sheet should be displayed after the warning. Adjust the ScrollArea setting, if necessary. Here is a link to a sample file I created:http://www.freefilehosting.net/download/3fehk If you are new to macros, this link to Jon Peltier's site may be helpful:http://peltiertech.com/WordPress/200...someone-elses-... Hope this helps, Hutch "K" wrote: I am using excel 2007. is it possible that when you open excel file then a message should come up in wordart saying "SEE THIS" then after 5 seconds it disappear. Basically i want some sort of macro in excel file that when someone open the file a message should appear for 5 seconds saying "SEE THIS" and then disappear but i not want it in like message box. it should come in wordart. Please if anybody can help- Hide quoted text - - Show quoted text - Thanks lot Tom thats what i was talking about. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
create a message box when opening a file in word or excel 2007 | Excel Discussion (Misc queries) | |||
Microsoft Office Word 2007 Vista comes up with a message | Excel Discussion (Misc queries) | |||
Error message while clsoing excel and word applications. | Excel Discussion (Misc queries) | |||
MS Word Message Board? | Excel Discussion (Misc queries) | |||
"Unable to read file"message in Word & Excel | Excel Discussion (Misc queries) |