W
Wayne
Using Excel 97
I'm trying to get a message box to appear when cell F5 of
page "Labour Details" is selected. Then if ybYes is
selected "Hire Calculation" page is shown and if vbno the
message box dissapears....
This is the chunk of code that I'm trying to get to
work... As you can guess it doesn't!!!!
Can anyone help????
Thanks
Wayne
Private Sub worksheet_selectionChange(ByVal Target As
Excel.Range)
If Sheets("Labour Details").Target.Address = "$f$5"
Then
If ActiveCell.HasFormula Then
MsgBox ("Change Value via Hire calculation
Page")
MsgBox = MsgBox & MsgBox(vbLf)
MsgBox = MsgBox & ("Go to Hire Calculation
Page?")
Title = "Protected Cell"
COnfig = vbYesNo
Ans = MsgBox(Msg, COnfig, Title)
If Ans = vbNo Then End
Else If Ans = vbYes Then
Sheets("Hire Calculation").Select
End If
End If
End If
End Sub
I'm trying to get a message box to appear when cell F5 of
page "Labour Details" is selected. Then if ybYes is
selected "Hire Calculation" page is shown and if vbno the
message box dissapears....
This is the chunk of code that I'm trying to get to
work... As you can guess it doesn't!!!!
Can anyone help????
Thanks
Wayne
Private Sub worksheet_selectionChange(ByVal Target As
Excel.Range)
If Sheets("Labour Details").Target.Address = "$f$5"
Then
If ActiveCell.HasFormula Then
MsgBox ("Change Value via Hire calculation
Page")
MsgBox = MsgBox & MsgBox(vbLf)
MsgBox = MsgBox & ("Go to Hire Calculation
Page?")
Title = "Protected Cell"
COnfig = vbYesNo
Ans = MsgBox(Msg, COnfig, Title)
If Ans = vbNo Then End
Else If Ans = vbYes Then
Sheets("Hire Calculation").Select
End If
End If
End If
End Sub