show label dialog box

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
Wed Jul 07 13:41:33 CDT 2004


>-----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