We need much more to go on than that or your worksheet code would be:

Code:
--------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Ans As String, Ans1 As String
If MsgBox("Do you want to update ranges?", vbYesNo, "Range Update?") = vbYes Then
Ans = Application.InputBox("Enter range in this fashion xx:xx", "Range Entry")
Else
If MsgBox("Do you want to enter times?", vbYesNo, "New Times") = vbYes Then
Ans1 = Application.InputBox("Enter new time in this fashion xx:xx", "Time Entry")
End If
End If
If Ans < "" Then
MsgBox "the range" & Chr(34) & Ans & Chr(34)
End If
If Ans1 < "" Then
MsgBox "the time" & Chr(34) & Ans1 & Chr(34)
End If
End Sub
--------------------


SFConklin1;385826 Wrote:
Hi There,

I'm trying to create a conditinal message box on open of an Excel
spreadsheet.


I would like it to do something like: "Do you want to update the date
ranges?
", If yes then a message box to enter the ranges, if no, then another
message
box to say "Do you want to enter new time", if yes then a message box
to
enter times, if no then end.

Thanks!


--
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=107888