Hi:

I am dong something wrong, and don't know what it is. For some reason I am not detecting
the results of button presses with the following code. Can someone show me what I am doing
wrong please? OOPS is a tag I am going to further down in the macro.

Help much appreciated
sub macro()

Dim msgprompt As String
Dim msgbuttons As Integer, msgResults As Integer
msgprompt = "If you are not certain about installing the new spreadsheet click NO in the
area below." & "If you wish to proceed with installation, click YES"
msgbuttons = vbYesNo
MsgTitle = "Confirm Installation"
MsgResult = Msgbox(msgprompt, msgbuttons, MsgTitle)
Select Case msgResults
Case vbYes
GoTo oops
End Select
Range("aa1").Select
ActiveCell() = "No"
Range("a1").Select
Application.ScreenUpdating = False
and so on

to oops:




Thanks

John Baker