Thread: Message boxes
View Single Post
  #2   Report Post  
Bob Phillips
 
Posts: n/a
Default Message boxes

Private Sub Workbook_Open()
Dim ans
ans = MsgBox("Update")
If ans = vbYes Then
'do something
End If
End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code



--

HTH

RP
(remove nothere from the email address if mailing direct)


"JaB" wrote in message
...
Hi there

Does anyone know how to create pop up message boxes? Basically Id like a
box that pops up when a user opens the spreadsheet and asks, 'Update?'

with a
'Yes' or'No' selection option.
Ive seen it in other spreadsheets, but not sure how to do it.

Thanks