2015-12-23 2 views
1

Я создал макрос в MS Outlook для электронной почты. Пользователь вводит ответ на вопрос, в результате которого переменная хранит эти данные в виде строки. Затем в HTML создается электронное письмо с гиперссылкой, содержащей эту переменную. Я не могу понять, как объединить переменную «strTrackingNumber» в полную гиперссылку. Какие-либо предложения?Outlook VBA переменная в HTML-тело


Option Explicit 
Sub TestFile 

Dim strTrackingNumber as String 
strTrackingNumber = InputBox("Please input the Tracking Number") 
Set objMsg = Application.CreateItem(olMailItem) 

With objMsg 
    .To = "[email protected]" 
    .CC = "" 
    .BCC = "" 
    .Subject = "Forecast" 
    .Categories = "" 
    .BodyFormat = olFormatHTML ' send HTML message 
    .HTMLBody = "<style> body{color:black;font-family:Arial;font-size: 12pt;}" & _ 
"<HTML><body>Dear Member,<br><br>&emsp;The following document is ready for your review."<a href= 'http://www.bluewave.com/' & strTrackingNumber>Tracking & strTrackingNumber.</a></body> 

.Display 
End With 
Set objMsg = Nothing 
End Sub 

ссылка Вывод должен выглядеть следующим образом: http://www.bluewave.com/Tracking Количество например http://www.bluewave.com/RA-15-30922

+0

Помогло бы привести пример того, как должна выглядеть конечная ссылка. Это не ясно из вашего кода. –

+0

Спасибо, я могу видеть из вашего ответа, в некоторых местах отсутствовали кавычки. – Greg

ответ

2
.HTMLBody = "<style> body{color:black;font-family:Arial;font-size: 12pt;} </style>" & _ 
     "<HTML><body>Dear Member,<br><br>&emsp;" & _ 
     "The following document is ready for your review. " & _ 
    "<a href= 'http://www.bluewave.com/" & strTrackingNumber & "'>Tracking " & _ 
     strTrackingNumber & ".</a></body>"