B
Beth W
Does anyone know why this doesn't work?
Sub ShowListStylesDialog()
With Dialogs(wdDialogFormatBulletsAndNumbering)
.DefaultTab = wdDialogFormatBulletsAndNumberingTabListStyles
.Show
End With
End Sub
The Default Tab for the following work:
.DefaultTab = wdDialogFormatBulletsAndNumberingTabBulleted
.DefaultTab = wdDialogFormatBulletsAndNumberingTabNumbered
.DefaultTab = wdDialogFormatBulletsAndNumberingTabOutlineNumbered
Sub ShowListStylesDialog()
With Dialogs(wdDialogFormatBulletsAndNumbering)
.DefaultTab = wdDialogFormatBulletsAndNumberingTabListStyles
.Show
End With
End Sub
The Default Tab for the following work:
.DefaultTab = wdDialogFormatBulletsAndNumberingTabBulleted
.DefaultTab = wdDialogFormatBulletsAndNumberingTabNumbered
.DefaultTab = wdDialogFormatBulletsAndNumberingTabOutlineNumbered