#1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 97
Default Nested Ifs

I need 3 consecutive message boxes to show if conditions are met
and User responds yes.
I can make 2 work but I can't get the 3rd IF to work.
e.g.,
This portion works fine:
--------------------------------
If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
MsgBox " Are you sure?",vbYesNoCancel
--------------------
'This last one is the one I need help with:

If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
------------------------------
Thanks in advance, you are all great!

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,272
Default Nested Ifs

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
End If
End If

Indenting helps to see the flow.

--

HTH

RP

"Myriam" wrote in message
...
I need 3 consecutive message boxes to show if conditions are met
and User responds yes.
I can make 2 work but I can't get the 3rd IF to work.
e.g.,
This portion works fine:
--------------------------------
If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
MsgBox " Are you sure?",vbYesNoCancel
--------------------
'This last one is the one I need help with:

If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
------------------------------
Thanks in advance, you are all great!



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 97
Default Nested Ifs

Thanks, Bob,
I appreciate it!

"Bob Phillips" wrote:

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
End If
End If

Indenting helps to see the flow.

--

HTH

RP

"Myriam" wrote in message
...
I need 3 consecutive message boxes to show if conditions are met
and User responds yes.
I can make 2 work but I can't get the 3rd IF to work.
e.g.,
This portion works fine:
--------------------------------
If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
MsgBox " Are you sure?",vbYesNoCancel
--------------------
'This last one is the one I need help with:

If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
------------------------------
Thanks in advance, you are all great!




  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 97
Default Nested Ifs

Bob,
I thought I had it all but I am still having trouble with the vbNo.
Where do you position the vbNo 'do nothing ?
Thanks,

"Bob Phillips" wrote:

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
End If
End If

Indenting helps to see the flow.

--

HTH

RP

"Myriam" wrote in message
...
I need 3 consecutive message boxes to show if conditions are met
and User responds yes.
I can make 2 work but I can't get the 3rd IF to work.
e.g.,
This portion works fine:
--------------------------------
If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
MsgBox " Are you sure?",vbYesNoCancel
--------------------
'This last one is the one I need help with:

If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
------------------------------
Thanks in advance, you are all great!




  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,272
Default Nested Ifs

Myriam,

As it is the vbNo does nothing already.

YOu are not referring to the first message are you?

--

HTH

RP

"Myriam" wrote in message
...
Bob,
I thought I had it all but I am still having trouble with the vbNo.
Where do you position the vbNo 'do nothing ?
Thanks,

"Bob Phillips" wrote:

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
End If
End If

Indenting helps to see the flow.

--

HTH

RP

"Myriam" wrote in message
...
I need 3 consecutive message boxes to show if conditions are met
and User responds yes.
I can make 2 work but I can't get the 3rd IF to work.
e.g.,
This portion works fine:
--------------------------------
If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
MsgBox " Are you sure?",vbYesNoCancel
--------------------
'This last one is the one I need help with:

If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
------------------------------
Thanks in advance, you are all great!








  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 97
Default Nested Ifs

Yes, Bob, I still need more help.
See below:

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response =vbNo
'do nothing
ElseIf Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
If Response=vbNo
'do nothing
ElseIf Response =vbYes
Save....etc.....do the specified action
End If
End If
End If
----------------------
The 1st vbNo 'do nothing works fine. It is the second response that still
preforms
the actions as if the response had been a vbYes.
In other words vbYes and vb No perform the action that should only be done
if vbYes is pressed.
Thanks!


---------------------




"Bob Phillips" wrote:

Myriam,

As it is the vbNo does nothing already.

YOu are not referring to the first message are you?

--

HTH

RP

"Myriam" wrote in message
...
Bob,
I thought I had it all but I am still having trouble with the vbNo.
Where do you position the vbNo 'do nothing ?
Thanks,

"Bob Phillips" wrote:

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
End If
End If

Indenting helps to see the flow.

--

HTH

RP

"Myriam" wrote in message
...
I need 3 consecutive message boxes to show if conditions are met
and User responds yes.
I can make 2 work but I can't get the 3rd IF to work.
e.g.,
This portion works fine:
--------------------------------
If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
MsgBox " Are you sure?",vbYesNoCancel
--------------------
'This last one is the one I need help with:

If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
------------------------------
Thanks in advance, you are all great!







  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,272
Default Nested Ifs

Myriam,

How is this?

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox(" Are you sure?", vbYesNoCancel)
If Response = vbNo Then
'do nothing
ElseIf Response = vbYes Then
Response = MsgBox("Do Action", vbYesNoCancel)
If Response = vbNo Then
'do nothing
ElseIf Response = vbYes Then
Save....etc.....do the specified action
End If
End If
End If


--

HTH

RP

"Myriam" wrote in message
...
Yes, Bob, I still need more help.
See below:

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response =vbNo
'do nothing
ElseIf Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
If Response=vbNo
'do nothing
ElseIf Response =vbYes
Save....etc.....do the specified action
End If
End If
End If
----------------------
The 1st vbNo 'do nothing works fine. It is the second response that still
preforms
the actions as if the response had been a vbYes.
In other words vbYes and vb No perform the action that should only be

done
if vbYes is pressed.
Thanks!


---------------------




"Bob Phillips" wrote:

Myriam,

As it is the vbNo does nothing already.

YOu are not referring to the first message are you?

--

HTH

RP

"Myriam" wrote in message
...
Bob,
I thought I had it all but I am still having trouble with the vbNo.
Where do you position the vbNo 'do nothing ?
Thanks,

"Bob Phillips" wrote:

If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
Response = MsgBox (" Are you sure?",vbYesNoCancel)
If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
End If
End If

Indenting helps to see the flow.

--

HTH

RP

"Myriam" wrote in message
...
I need 3 consecutive message boxes to show if conditions are met
and User responds yes.
I can make 2 work but I can't get the 3rd IF to work.
e.g.,
This portion works fine:
--------------------------------
If date1 Date Then
MsgBox "Cancel Action", vbOKOnly
ElseIf date1 <= Date Then
MsgBox " Are you sure?",vbYesNoCancel
--------------------
'This last one is the one I need help with:

If Response = vbYes Then
MsgBox "Do Action",vbYesNoCancel
------------------------------
Thanks in advance, you are all great!









Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
nested ifs dave glynn Excel Discussion (Misc queries) 4 November 13th 09 07:55 PM
Nested IFs Pieyed Piper Excel Worksheet Functions 1 November 9th 09 12:04 AM
nested if based on nested if in seperate sheet. how? scouserabbit Excel Worksheet Functions 5 March 2nd 07 04:03 PM
Nested if mwavra Excel Worksheet Functions 4 February 6th 07 06:57 PM
What is quicker? Nested or non nested ifs andycharger[_17_] Excel Programming 2 February 25th 04 03:58 PM


All times are GMT +1. The time now is 08:03 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"