Michele;386896 Wrote:
Hi,

New to Macros, but have been picking up a bit here and there.

I'd like to create a msgbox for an interactive workbook where after a
user
has opened the workbook, and then subsequently actives a specific sheet
(only
the first time they do so in the workbook), they receive a dialog box
reminding them to 'Please remember to enter a,b,c for item 1,2,3 before
moving on'.

Example, they start on Sheet1, move to Sheet3, but then when the move
to
Sheet2 they get the reminder.

They do not need to received the message again if the revisit Sheet2
before
they save/exit the workbook.

I'd like to display the same reminder on exiting the workbook.

Is this possible?

Thanks in advance!
Michele
Sure put this code in the Thisworkbook code module:

Code:
--------------------
Public SD As Integer
Private Sub SheetViewed()
SD = 0
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "Enter A,B,C in Items 1,2,3", vbOKOnly, "Entry Reminder"
SheetViewed
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name = "Sheet2" And SD < 1 Then
SD = 1
MsgBox "Enter A,B,C in Items 1,2,3", vbOKOnly, "Entry Reminder"
End If
End Sub
--------------------


--
Simon Lloyd

Regards,
Simon Lloyd
'The Code Cage' (http://www.thecodecage.com)
------------------------------------------------------------------------
Simon Lloyd's Profile: http://www.thecodecage.com/forumz/member.php?userid=1
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=108187