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

Public Sub SetBookmarkAgain(ByRef sName As String, _
    ByRef sContents As String)
'Flemming Vadet, Maj 2000, fv@smartoffice.dk
    'Finder bogmærket "sName" - indsætter i og gendanner bogmærket
    Dim rBookmark As Range
    If ActiveDocument.Bookmarks.Exists(sName) Then
        Set rBookmark = ActiveDocument.Bookmarks(sName).Range
        rBookmark.Text = sContents
        rBookmark.Bookmarks.Add sName
    End If
End Sub