hallo word-meister 
gibt es eine möglichkeit, eine vorlage mit anklickbaren kästchen (quasi check-boxen) zu erstellen?
also es soll eine vorlage sein, wo man hinter bestimmten angaben ein häkchen hineinsetzen kann.
bin sehr gespannt!
viele grüße
mathias
Hallo,
du meinst unter Word? Aber selbstverständlich. Schalte mal die Symbolleiste Formular ein (Rechtsklick im Bereich der Symbolleisten). Damit erhälst du eine Auswahl aller unterstützter Formularelemente, u.a. auch Kästchen zum Ankreuzen.
Sind alle Elemente im Formular, musst du daran denken den Dokumentenschutz für die DOT auf „Formulareingaben“ zu stellen. Brauchst du neben den Ankreuzkästchen, etc. auch „normalen“ Text im Dokument, kannst du Abschnittswechsel einfügen und nur die Abschnitte mit den Formularelementen schützen.
Gruß vom Wiz
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hallo mathias,
gibt es eine möglichkeit, eine vorlage mit anklickbaren
kästchen (quasi check-boxen) zu erstellen?
also es soll eine vorlage sein, wo man hinter bestimmten
angaben ein häkchen hineinsetzen kann.
Die Checkboxen für die Formulare sind recht unschön.
Das untenstehende Macro erlaubt es zwei unterschiedliche Zeichen zu verwenden, welche dann auch zum verwendeten Zeichensatz passen.
' Makros für Checkboxen in einem normalen Text.
' Gefunden in der Vorlage "Aktuelles Fax.dot" von Word 2000
' Funktionsweise:
' "þ" entspricht einer gecheckten box (Basic verwendet einen falschen Zeichensatz)
' "¨" entspricht einer ungecheckten box (Basic verwendet einen falschen Zeichensatz)
' im Text wird eine Feldfunktion eingefügt, welche das Macro "CheckIt" aufruft
' und eine Checkbox anzeigt: {MACROBUTTON CheckIt ¨}
' Unter Extras-\>Autokorrektur...-\>TAB Autotext befinden Einträge
' "Checked Box" -\> {MACROBUTTON UncheckIt þ}
' und
' "Unchecked Box" -\> {MACROBUTTON CheckIt ¨}
' Bei einem doppelklick ersetzt das Makro sich selbst durch das jeweils andere
' das war's
Sub CheckIt()
ActiveDocument.AttachedTemplate.AutoTextEntries("Checked Box").Insert Where:=Selection.Range
End Sub
Sub UncheckIt()
ActiveDocument.AttachedTemplate.AutoTextEntries("Unchecked Box").Insert Where:=Selection.Range
End Sub
MfG Peter(TOO)
hallo wiz, hallo peter,
VIELEN dank für eure hilfe!
allerdings bin ich zu blöd, diese makro-funktionen einzubauen.
aber die lösung von wiz ist ok.
viele grüße
mathias
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]