Message Box "Login"

The code for the third button:
Private Sub CommandButton3_Click()
Dim message As Integer
message = MsgBox("Click Yes to Proceed, No to stop", vbYesNo, "Login")
If message = 6 Then
Range("A1").Value = "You may proceed"
ElseIf message = 7 Then
End If
End Sub
The nessage box displayes Yes and No buttons

Popular posts from this blog

50 Excel VBA Oral Interview Questions