Hi, thank you for contacting JustAnswer.com. My name is Russell. I will do my best to provide the right answer to your question.
I think that this line:
If MsgBox("Send directly(Y) or display(N)?", vbYesNo) = vbYes Then
is defective owing to the right-hand parenthesis being too early in the line. Something like
If MsgBox("Send directly(Y) or display(N)?", vbYesNo = vbYes ) Then
very approximately, may make the subsequent Endif functional. Try something like that (as your programmer's good sense may indicate) and see if it works OK! let me know, by
Reply To Expert
and if needed I will advise you further.
I've changed my mind on that.
is probably OK. It's another IF block that is the problem.
Is there any number with that error code, or other line indication in the error?
'if sReady = True Then
have a ' in front of it?
Do you know what the
at the head of that line is doing?
And why that line's "IF" is spelled with a small 'i' ?
And yes, that's roughly where the problem is. You have a big block of code there, with two IFs, but only one End If. End with 'SharePoint has another
in it, and was that intentional? and is
End with Sharepoint
supposed to take the place of an
that definitely isn't there ?
Something about that code block and the way you are using If
is somehow incorrect.
I suspect that you should go back to your original code as stated to me at the beginning, then concentrate on getting that block beginning with
and ending with
End With 'Sharepoint
and refine esp. those two beginning and ending statements to where they actually work as the book says they should, not just more-or-less. That's where the problem is for sure, anyway.
Let me know what progress you make, please.