Werkbalk

[Road Dogz]

Hoi,

Bestaat er een mogelijkheid om een installfile te maken die een werkbalk aan word toevoegd? De werkbalk bestaat uit knoppen met macro's die verband houden met een accessdatabase op een netwerk. Het zou dus handig zijn om op elke pc gewoon de installer uit te voeren in plaats van op elke pc die werkbalk manueel aan te maken. Belangrijker is de mogelijkheid om in geval dat de werkbalk weg is de mensen die niet handig zijn met office deze werkbalk makkelijk kunnen terug plaatsen met deze file.

 

[Axel Hagg]

Dag Road,

    With CommandBars("Menu Bar").Controls.Add(Type:=msoControlPopup)
      .Caption = "OpschriftA"
      With .Controls("OpschriftA").CommandBar.Controls.Add(Type:=msoControlButton)
        .Caption = "OpschriftB"
        .OnAction = "Macronaam"
      End With
    End With

Hierboven wordt in de menubalk een popup (keuzemenu) gezet en in de popup een button (opdracht), maar je kunt ook alleen een button plaatsen. Bij de button hoort een OnAction. Daarin staat de naam van de macro.

    Application.OrganizerCopy Source:="C:\Installatie.doc", Destination:=Options.DefaultFilePath(Path:=wdUserTemplatesPath) & "\Normal.dot", Name:="Macronaam", Object:=wdOrganizerObjectProjectItems

Hierboven wordt een macro die is opgeslagen in "C:Installatie.doc" geplaatst in Normal.dot.

gegroet,

Axel.