View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
A Mad Doberman A Mad Doberman is offline
external usenet poster
 
Posts: 22
Default Msg Box Yes / No Q

On Jan 15, 8:17*am, Seanie wrote:
How could I correct the code below that a Y/N Msg Box appears if
AS1=1, if user clicks "Yes" then complete rest of code, if user
clicks "No" go to cell K10. I have a half baked attempt below

* * With Worksheets("Sheet A")
* *If .Range("AS1").Value = 1 Then
* * * MsgBox "You have Sales that are not posted yet. If this is
correct Click ""Yes"", if not Click ""No"" and amend as necessady"

* * * Sheets("Sheet A").Select
* * * Range("K10").Select

* * * Exit Sub
* * End If

* * End With


Here is something like what I would do.

If .Range("AS1").Value = 1 Then
sSALES = MsgBox ("You have Sales that are not posted yet. Is this
correct?", vbYesNo + vbQuestion)
If sSALES = vbNo Then ----code
If sSALES = vbYes Then ----code