MSG BOX through macro
 

I would like to setup the macro to confirm they want the macro to b
performed. Can someone please help with this

The macro will be assigned to a push button on the worksheet, once th
report is complete they push the button and then i want it to create
pop up asking "do you wish to close this report YES/NO"
if yes then peform close, if not do nothing.

thank

--
XCESI
-----------------------------------------------------------------------
XCESIV's Profile: http://www.excelforum.com/member.php...fo&userid=2427
View this thread: http://www.excelforum.com/showthread.php?threadid=53847

MSG BOX through macro
 

Answer = MsgBox("Would You Like To Close The Workbook?", vbYesNo)
If Answer = vbYes Then
ActiveWorkbook.Save
ActiveWorkbook.Close
Else:
Cells.Select


"XCESIV" wrote in
message ...

I would like to setup the macro to confirm they want the macro to be
performed. Can someone please help with this

The macro will be assigned to a push button on the worksheet, once the
report is complete they push the button and then i want it to create a
pop up asking "do you wish to close this report YES/NO"
if yes then peform close, if not do nothing.

thanks


--
XCESIV
------------------------------------------------------------------------
XCESIV's Profile:
http://www.excelforum.com/member.php...o&userid=24271
View this thread: http://www.excelforum.com/showthread...hreadid=538473

MSG BOX through macro
 

Try something like

Dim Res As VbMsgBoxResult
Res = MsgBox("Do you want to close this report?", vbYesNo)
If Res = vbYes Then
' do something
Else
' do nothing
End If



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"XCESIV"
wrote in message
...

I would like to setup the macro to confirm they want the macro
to be
performed. Can someone please help with this

The macro will be assigned to a push button on the worksheet,
once the
report is complete they push the button and then i want it to
create a
pop up asking "do you wish to close this report YES/NO"
if yes then peform close, if not do nothing.

thanks


--
XCESIV
------------------------------------------------------------------------
XCESIV's Profile:
http://www.excelforum.com/member.php...o&userid=24271
View this thread:
http://www.excelforum.com/showthread...hreadid=538473

MSG BOX through macro
 

XCESIV, here is a general macro that shows a message box with yes, no, and
cancel options, just change to fit your needs

Sub Message_box_test()
Dim Msg, Title, Response As String
Msg = "Put message here"
Title = "Put title here"
Response = MsgBox(Msg, vbYesNoCancel + vbQuestion, Title)

If Response = vbNo Then
'your code if no is clicked here
MsgBox "you clicked no"
Exit Sub ' Quit the macro
End If

If Response = vbCancel Then
'your code if Cancel is clicked here
MsgBox "You clicked cancelled"
Exit Sub ' Quit the macro
End If

'your code if Yes is clicked here
MsgBox "you clicked yes"
End Sub

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"XCESIV" wrote in
message ...

I would like to setup the macro to confirm they want the macro to be
performed. Can someone please help with this

The macro will be assigned to a push button on the worksheet, once the
report is complete they push the button and then i want it to create a
pop up asking "do you wish to close this report YES/NO"
if yes then peform close, if not do nothing.

thanks


--
XCESIV
------------------------------------------------------------------------
XCESIV's Profile:
http://www.excelforum.com/member.php...o&userid=24271
View this thread: http://www.excelforum.com/showthread...hreadid=538473

MSG BOX through macro
 

Sub myMacro()
Dim ans As Long
ans = MsgBox("Continue?",vbYesNo)
If ans = vbNo Then Exit Sub
' rest of code
End Sub

--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

"XCESIV" wrote in
message ...

I would like to setup the macro to confirm they want the macro to be
performed. Can someone please help with this

The macro will be assigned to a push button on the worksheet, once the
report is complete they push the button and then i want it to create a
pop up asking "do you wish to close this report YES/NO"
if yes then peform close, if not do nothing.

thanks


--
XCESIV
------------------------------------------------------------------------
XCESIV's Profile:
http://www.excelforum.com/member.php...o&userid=24271
View this thread: http://www.excelforum.com/showthread...hreadid=538473

MSG BOX through macro
 

You could adapt this

Select Case MsgBox("cntr=" & RecentCntr & " " _
& Application.RecentFiles(RecentCntr).Name _
& vbNewLine & "Delete?", vbYesNoCancel + vbDefaultButton2)
Case vbCancel
GoTo endpgm
Case vbYes
Application.RecentFiles(RecentCntr).Delete
MsgBox "File deleted from recent files list"
Case vbNo
' Do nothing
Case Else
' Do nothin
End Select


"XCESIV" wrote:


I would like to setup the macro to confirm they want the macro to be
performed. Can someone please help with this

The macro will be assigned to a push button on the worksheet, once the
report is complete they push the button and then i want it to create a
pop up asking "do you wish to close this report YES/NO"
if yes then peform close, if not do nothing.

thanks


--
XCESIV
------------------------------------------------------------------------
XCESIV's Profile: http://www.excelforum.com/member.php...o&userid=24271
View this thread: http://www.excelforum.com/showthread...hreadid=538473

MSG BOX through macro
 

sub example1

answer = msgbox ("Do you wish to close thi
report?",vbYesNo,Title:="Just to Confirm")

if answer=vbyes then activeworkbook.close

end su

--
funkymonkU
-----------------------------------------------------------------------
funkymonkUK's Profile: http://www.excelforum.com/member.php...fo&userid=1813
View this thread: http://www.excelforum.com/showthread.php?threadid=53847