Question

我们的CRM要求将标记放入由<TaskID=xxxx>或<TicketID=xxxx>组成的传入/传出电子邮件的主题字段中，其中xxxx是我们CRM中生成的编号。

是否有人知道是否可以在Outlook中创建1个或2个功能区'按钮'以将此标记附加到主题行。理想情况下，当您单击此框时，我希望显示一个对话框，以便您可以输入故障单或任务ID，然后根据上面的内容将其附加到标记中。

我收集第一步非常简单，但没有大量的VB曝光意味着我有点卡在一个对话框，然后把条目放入主题。

非常感谢任何帮助...

Answer 1

选择消息，然后运行以下代码：

Sub SetSubjectCRM()

On Error GoTo ErrorHandler

Dim obj As Object
Dim msg As Outlook.mailItem
Dim response As Variant
Dim subjectPart As String
Dim tickettype As String

Set obj = ActiveExplorer.Selection.item(1)

If TypeName(obj) = "MailItem" Then
  Set msg = ActiveExplorer.Selection.item(1)
End If

With msg
  ' get CRM number and type
  subjectPart = InputBox("What is the CRM number for this email? Enter 'TaskID' or 'TicketID'")

  ' parse response
  response = Split(subjectPart, ",")
  subjectPart = response(0)
  tickettype = response(1)

  .Subject = msg.Subject & " <" & tickettype & "=" & subjectPart & ">"

  .Save
End With

ProgramExit:
  Exit Sub
ErrorHandler:
  MsgBox Err.Number & " - " & Err.Description
  Resume ProgramExit
End Sub

您需要按如下方式输入输入：

CRM编号，TaskID / TicketID

示例：

<强> 12345，的TaskID

或

<强> 13245，TicketID

将代码分配给QAT按钮，如下所示：

http://www.howto-outlook.com/howto/macrobutton.htm

使用用户可编辑变量将标记附加到Outlook主题字段中

1 个答案: