Har du set hvor smart det kan være?

Microsoft Office, Word skabeloner, Excel regnearkSmart Office Word skabelon system

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 Office Freeware Smart Data Management
Compare 2 Columns
Excel Super- Subscript
Teachers Excel Tools
         
Smart Office - Word og Excel specialist