HELP with Outlook/Excel VBA

  • Thread starter Thread starter Memnoch
  • Start date Start date
M

Memnoch

Im using VBA in Outlook XP to create a hyperlink to send an email from
Excel. But it will only work if the Msg is under a certain length. ie I can
usually only have two or three lines in the body or the hyperlink doesnt
show up.

How can I work around this ?

cheers,

Memnoch


Msg = Msg & "Text Line 1" & "%0D%0A" & "%0D%0A"
Msg = Msg & "Text Line 2" & "%0D%0A" & "%0D%0A"
Msg = Msg & "Text Line 3" & "%0D%0A" & "%0D%0A"
Msg = Msg & "Text Line 4" & "%0D%0A" & "%0D%0A"
Msg = Msg & "Text Line 5" & "%0D%0A" & "%0D%0A"

xlRg.Offset(2, 12).Formula = "=HYPERLINK(" & Chr(34) & "mailto:" &
Email & "?subject=" _
& xlRg.Offset(2, 1).Value & "&Body=" & Msg & Chr(34) & ", " & Chr(34) &
"Send Email" & Chr(34) & ")"
 
Back
Top