I have a password protected Excel spreadsheet that I want to enable viewers to suggest changes through email. I have set up SendMail, but I want the user to be able to edit the body to suggest the changes they would like made.
Send Email & Write to Email Body
-
-
-
Re: Send Email From Protected Spreadsheet
I assume when you refer to editing the body you mean of the email and not excel sheet?
I think you may be better off using the sendforreview command and using show message as the changes
Something like -
Re: Send Email From Protected Spreadsheet
I've tested this, sorry should have done that first and it doesn't work for me ... mmmm?
Anyway, using the same theory and some old code this does ... I have also changed the string to a variant as that is what it should be.
Code
Display MoreSub tstmail() Dim varBody As Variant Set msotlApp = CreateObject("Outlook.Application") Set msotlNewMail = msotlApp.CreateItem(olMailItem) varBody = Application.InputBox("Please advise the changes you would like here") With otlNewMail .to = "[email protected]" .cc = "" .Subject = "Changes to spreadsheet" .body = varBody .send End With End Sub
Participate now!
Don’t have an account yet? Register yourself now and be a part of our community!