Har du set hvor smart det kan være?

Word - Smart Office Skabelon system
Word - Søg og erstat i flere dokumenter
Excel - File Export
Excel - Data Management (Freeware)

SmartOffice - FileSaveAs

Når dialogboksen "Filer / Gem som" ønskes vist for brugeren, samtidig med at der skal være skiftet til den rigtige mappe, og måske forslå et filnavn. Denne metode er den bedste Win-Consult har mødt endnu.

Eksempel 1

Public Sub FileSaveAsInDirectory_01()
'Flemming Vadet, Maj 2001, fv@smartoffice.dk
    With Dialogs(wdDialogFileSaveAs)
        .Name = "C:\Temp\"
        .Show
    End With
End Sub

Eksempel 2

Public Sub FileSaveAsInDirectory_02()
'Flemming Dahl, Maj 2001, fd@smartoffice.dk
    With Dialogs(wdDialogFileSaveAs)
        .Name = "C:\Temp\" & ActiveDocument.Name
        .Show
    End With
End Sub

Eksempel 3

Public Sub FileSaveAsInDirectory_03()
'Flemming Dahl, Maj 2001, fd@smartoffice.dk
    With Dialogs(wdDialogFileSaveAs)
        .Name = "C:\Temp\" & "Beskrivelse"
        .Show
    End With
End Sub

Smart Data Management

Compare 2 Columns

Excel Super- Subscript

Teachers Excel Tools