show label dialog box

[kurt]

Hi,

I would like to create a macro that displays the
envelope/label dialog box, but on the label tab. (I have
created a custom envelope macro, and therefore don't need
the Word envelope feature.) Any help on the macro
language to show the label dialog box?

THANKS!
Kurt

 

[Joost Verdaasdonk]

-----Original Message-----
Hi,

I would like to create a macro that displays the
envelope/label dialog box, but on the label tab. (I have
created a custom envelope macro, and therefore don't need
the Word envelope feature.) Any help on the macro
language to show the label dialog box?

THANKS!
Kurt
.

Hi Kurt,

Try This:

Option Explicit

Sub LabelIt()
Dim strHi As String
strHi = "Hi Kurt"

With ActiveDocument

With Dialogs(wdDialogToolsCreateLabels)
.AddrText = strHi
.Show
End With

End With

End Sub

Enjoy,
Joost Verdaasdonk