Scrolling a Text in Worksheet

[Premanand]

Dear All,
I am willing to scroll a text ," THIS PROGRAM IS REVISED" in the worksheet
(exactly at the top) all the time while opening the file.
I am not willing to design Form. It should come in the sheet itself with
out using Control Toolbox.
Is it possible to do it with the aid of VB Macro? Please help
Regards,
Premaanand Sethuraman

 

[Norman Jones]

Hi Premanand,

If your intention is to draw the revision to the attention of the user, why
not the simple:

'=============>>
Private Sub Workbook_Open()
MsgBox Prompt:=" THIS PROGRAM IS REVISED", _
Buttons:=vbCritical, _
Title:="Important Message"
End Sub
'<<=============

This is workbook event code and should be pasted into the workbook's
ThisWorkbook module *not* a standard module or a sheet module:

Right-click the Excel icon on the worksheet
(or the icon to the left of the File menu if your workbook is maximised)
Select 'View Code' from the menu and paste the code.
Alt-F11 to return to Excel.