Vba 以编程方式将超链接按钮添加到outlook 2007

Vba 以编程方式将超链接按钮添加到outlook 2007,vba,vbscript,outlook,outlook-2007,Vba,Vbscript,Outlook,Outlook 2007,我正在向Outlook添加工具栏 工具栏上有一个按钮 按下此按钮将打开一个网站 我已经创建了按钮和工具栏没有问题,但无法确定如何添加超链接 Set oTBar = oView.Add("toolbarname") oTBar.Position = 1 oTBar.Visible = true Set oButton = OTBar.Controls.Add With oButton .Caption = "Click here!" .Style =

我正在向Outlook添加工具栏

工具栏上有一个按钮

按下此按钮将打开一个网站

我已经创建了按钮和工具栏没有问题,但无法确定如何添加超链接

  Set oTBar = oView.Add("toolbarname")
  oTBar.Position = 1
  oTBar.Visible = true

  Set oButton = OTBar.Controls.Add
  With oButton
      .Caption = "Click here!"
      .Style = 3
      .HyperlinkType = 1
      .FaceId = 1707     
   End with
哈哈

您需要将其添加为工具提示:

  .ToolTipText  = "http://your_url"