View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
K[_2_] K[_2_] is offline
external usenet poster
 
Posts: 557
Default WORD ART MESSAGE BY MACRO

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.