View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
jc jc is offline
external usenet poster
 
Posts: 164
Default msg text body code for if then

I have the following code
If Msg = vbYes Then Application.Dialogs(xlDialogSendMail).Show "Jo",
"Adjustment Form"

If Msg = vbNo Then ActiveWorkbook.SendMail Recipients:="Jo",
Subject:="Adjustment Form", ReturnReceipt:=Yes, StrBody:="test"
want to add textbody msg part of email