Programáticamente añadir un botón de hipervínculo a Outlook 2007

Question

añado un barra de herramientas para Outlook.

La barra de herramientas tendrá un botón en él.

Este botón, cuando se pulsa, se abrirá un sitio web.

He creado el botón de la barra de herramientas y no hay problema, pero no puedo encontrar la manera de añadir un hipervínculo?

  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

Answer 1

Jaja!

Es necesario añadir que como la descripción:

  .ToolTipText  = "http://your_url"