|
|
|
|
|
|
Har du set hvor smart det kan være?
|
|
SmartOffice - PageSetUp
Makro'en kan bruges til visning af dialogboksen Filer/Sideopsætning med en specifik tab-fane valgt.
Eksempel 1
Public Sub PageSetup_Show()
'Flemming Vadet, November 2001, fv@smartoffice.dk
With Application.Dialogs(wdDialogFilePageSetup)
'Kender du denne ?
.DefaultTab = wdDialogFilePageSetupTabCharsLines
'Layout
.DefaultTab = wdDialogFilePageSetupTabLayout
'Margin
.DefaultTab = wdDialogFilePageSetupTabMargins
'Papirstørrelse
.DefaultTab = wdDialogFilePageSetupTabPaperSize
'Papirkilde
.DefaultTab = wdDialogFilePageSetupTabPaperSource
.Show
End With
End Sub
Når du tester, så skal der kun være en linie med
.DefaultTab=
Rester udkommenteres med en ' ligesom f.eks. teksten "Kender du denne ?" er
|
|
|
|
Smart Data Management
Compare 2 Columns
Excel Super- Subscript
Teachers Excel Tools
|
|
|
|
|
|