Wie Sie die EINGABETASTE, um zwischen Formularfelder in einem geschützten Formular in Word verschieben code

SPRACHE AUSWÄHLEN SPRACHE AUSWÄHLEN
Artikel-ID: 211219 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Ein Microsoft Word 97-Version dieses Artikels finden Sie unter 187985.
Alles erweitern | Alles schließen

Auf dieser Seite

Zusammenfassung

Dieser Artikel enthält vier Microsoft Visual Basic für Applikationen-Makros, die Sie zum Emulieren von Microsoft Word 6.0 für Windows-Funktionalität der EINGABETASTE zum Verschieben zwischen Formularfelder in geschützte Dokumente verwenden können.

Weitere Informationen

Microsoft bietet Programmierbeispiele für Abbildung nur ohne Gewährleistung oder konkludent, einschließlich, aber nicht beschränkt auf konkludenten Garantien der Handelsüblichkeit und/oder Eignung für einen bestimmten Zweck. Die zur Verfügung gestellten Makro- und Programmierungsbeispiele sollen lediglich exemplarisch die Funktionsweise des Beispiels aufzeigen. Spezialisten von Microsoft Support Services können bei Erläuterung die Funktionalität einer bestimmten Prozedur helfen, Sie werden ändert jedoch nicht Beispielen bieten Funktionen hinzugefügt oder Verfahren, um Ihren speziellen Anforderungen erstellen.
Wenn Sie Programmiererfahrung, beschränkt haben, sollten Sie ein Microsoft Certified Partner oder die Microsoft Advisory Services wenden. Weitere Informationen finden Sie auf diese Websites von Microsoft:

Microsoft Certified Partner - https://partner.microsoft.com/global/30000104

Microsoft-Sicherheitsempfehlung Services - http://support.microsoft.com/gp/advisoryservice

Weitere Informationen zu den Supportoptionen, die verfügbar sind und wie Sie Microsoft kontaktieren besuchen Sie in der folgenden Website: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS
Weitere Informationen über das Ausführen von Codebeispielen finden Sie im folgenden Artikel der Microsoft Knowledge Base:
212536OFF2000: Wie zum Ausführen von Beispielcode aus Knowledge Base-Artikel

Geben Sie Key-Funktion in Word 6.0

In Word 6.0 für Windows Wenn drücken die EINGABETASTE in einem Dokument, das geschützt ist für Formulare, Einfügemarke die in das nächste Formularfeld. Im Gegensatz dazu in späteren Versionen von Word die Eingabe-Taste wird nicht verschoben auf das nächste Formularfeld jedoch stattdessen eine Absatzmarke eingefügt, wie in einem ungeschützten Dokument. Dadurch können Sie mehrere Textzeilen in einem Text-Formularfeld eingeben.

Makros

Im folgenden werden vier Visual Basic für Applikationen Makros, die Sie gemeinsam verwenden können, um Word 6.0 für Windows-Funktionalität der EINGABETASTE in neue Schlüssel emulieren Formular Feld Dokumente basierend auf einem Vorlage geschützt. Der folgende Code ist eine kurze Beschreibung der Funktionalität der jedes Makro:
  • Das erste Makro verschiebt die Einfügemarke in das nächste Formularfeld.
  • Das zweite Makro weist das erste Makro der EINGABETASTE Taste.
  • Das dritte Makro wird sichergestellt, dass wichtige Funktionen beim Öffnen eines Dokuments basierend auf der Formular-Vorlage in der Zukunft fortgesetzt wird.
  • Das vierte Makro entfernt das zugewiesene Makro aus der EINGABETASTE Schlüssel, den Standardfunktionen der EINGABETASTE wiederherstellen.
wichtig : Bei dieser Code funktioniert wie geschrieben, die Vorlage sollte nicht geschützt werden. Wenn die Vorlage geschützt ist, erhalten Sie folgende Fehlermeldung:
Der Kontext kann nicht geändert werden.
Gehen Sie folgendermaßen vor um die Vorlage zu aufzuheben:
  1. Öffnen Sie die Vorlage, die Makros in diesem Artikel beschriebenen enthält.
  2. Klicken Sie im Menü Extras auf Dokumentschutz .
  3. Klicken Sie im Menü Datei auf Speichern .
  4. Klicken Sie im Menü Datei auf Schließen .

Ersten Makro: Verschieben der Einfügemarke in das nächste Formularfeld

Dieses Makro verschiebt die Einfügemarke in das nächste Formularfeld. Wenn das aktuelle Formularfeld der letzten Zeile im Dokument ist, verschiebt es die Einfügemarke in das erste Formularfeld.

Dieses Makro verwendet die Textmarken Auflistung, um den Namen des aktuellen Formularfeldes abzurufen. Der Name des jeweiligen Formularfelds ist auch der Name einer Textmarke für das Formularfeld eingefügt. Wenn Sie Weitere Textmarken in Ihrem Dokument haben, müssen Sie hier weitere Code hinzufügen, um mögliche Fehler zu behandeln. Im Makro wird außerdem davon ausgegangen, dass alle Formularfelder in den Dokumenten Benutzereingaben zulassen. Wenn dies nicht der Fall in Ihrem Dokument ist, müssen Sie zusätzlichen Code in Ihrem Makro hinzufügen.

Das Makro überprüft, ob im aktuelle Abschnitt ist geschützt oder ungeschützt und dann zum nächsten Formularfeld (in einem geschützten Bereich wechselt) oder eine Absatzmarke (in einem ungeschützten Abschnitt fügt). Diese Funktionalität ist für Dokumente, die beide Abschnitte enthalten, die für Eingabe und ungeschützten Formular geschützt sind erforderliche Abschnitte.
Sub EnterKeyMacro()
' Check whether the document is protected for forms
' and whether the protection is active.
   If ActiveDocument.ProtectionType = wdAllowOnlyFormFields And _
   Selection.Sections(1).ProtectedForForms = True Then
      ' Retrieve the bookmark of the current selection.
      ' This is equivalent to the name of the form field.
      myformfield = Selection.Bookmarks(1).Name
      ' Go to the next form field if the current form field
      ' is not the last one in the document.
      If ActiveDocument.FormFields(myformfield).Name <> _
      ActiveDocument.FormFields(ActiveDocument.FormFields.Count) _
      .Name Then
         ActiveDocument.FormFields(myformfield).Next.Select
      Else
         ' If the current form field is the last one,
         ' go to the first form field in the document.
         ActiveDocument.FormFields(1).Select
      End If
   Else
   ' If the document is not protected for forms,
   ' insert a tab stop character.
      Selection.TypeText Chr(13)
   End If
End Sub
				

Zweite Makro: Zuweisen der EnterkeyMacro-Makro zu dem Schlüssel "EINGABETASTE"

Dieses Makro fügt das EnterKeyMacro-Makro an die EINGABETASTE, wodurch die Funktion des Schlüssels Neuprogrammierung, in Formularfeldern geschütztes Dokument verwendet wird. Wenn Sie dieses Makro in einer benutzerdefinierten Vorlage verwenden, nennen Sie AutoNew. Dadurch wird die Funktionalität der EINGABETASTE in allen neuen Formular Dokumenten basierend auf der Vorlage geändert.
Sub AutoNew()
 ' Do Not protect the template containing these macros.
   CustomizationContext = ActiveDocument.AttachedTemplate
   ' Bind the ENTER key to the EnterKeyMacro.
   KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyReturn), _
   KeyCategory:=wdKeyCategoryMacro, Command:="EnterKeyMacro"
   ' Reprotect the document with Forms protection.
   ActiveDocument.Protect Type:=wdAllowOnlyFormFields, NoReset:=True
End Sub
				

Dritte Makro: Zuweisen des AutoOpen-Makros zu dem Schlüssel "EINGABETASTE"

Fügen Sie ein AutoOpen-Makro mit dem folgenden Code hinzu. Dadurch wird sichergestellt, dass wichtige Funktionen beim Öffnen eines Dokuments basierend auf der Formular-Vorlage in der Zukunft fortgesetzt wird.
Sub AutoOpen()
' This macro will reassign the ENTER key when you open an existing
' Word form fields document.
   CustomizationContext = ActiveDocument.AttachedTemplate
   ' Bind the Enter key to the EnterKeyMacro.
   KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyReturn), _
   KeyCategory:=wdKeyCategoryMacro, Command:="EnterKeyMacro"
End Sub
				
Hinweis : Diese Makros ausführen kann möglicherweise einige Funktionen, z. B. AutoKorrektur und AutoText, deaktivieren und anderen Features, die abhängig von der EINGABETASTE für den ordnungsgemäßen Betrieb beeinträchtigen. Müssen Sie das vierte Makro um den Standardfunktionen der EINGABETASTE wiederherzustellen, oder starten Sie Microsoft Word ausführen.

Vierte Makro: Entfernen des Befehls die EINGABETASTE Taste zugewiesen

Dieses Makro stellt den Standardfunktionen der EINGABETASTE wieder her. Wenn Sie dieses Makro in einer benutzerdefinierten Vorlage verwenden, nennen Sie AutoClose.
Sub AutoClose()
   CustomizationContext = ActiveDocument.AttachedTemplate
   FindKey(KeyCode:=BuildKeyCode(wdKeyReturn)).Disable
   ' Disables prompt to save template changes.
   Templates(1).Save
End Sub
				
Hinweis : die CustomizationContext -Eigenschaft der Speicherort, in denen die Tastaturanpassung gespeichert werden die Vorlage an das aktive Dokument angefügt, in diesem Fall festgelegt.

Informationsquellen

Zusätzliche Informationen zu verfügbaren Ressourcen zum Erstellen benutzerdefinierter Lösungen mit Visual Basic für Applikationen und Microsoft Word 2000 finden Sie folgenden Artikel der Microsoft Knowledge Base:
212623WD2000: Makro Programmierung Ressourcen
226118OFF2000: Ressourcen für die Programmierung mit Visual Basic für Applikationen

Eigenschaften

Artikel-ID: 211219 - Geändert am: Donnerstag, 23. November 2006 - Version: 2.7
Die Informationen in diesem Artikel beziehen sich auf:
  • Microsoft Word 2002 Standard Edition
  • Microsoft Word 2000 Standard Edition
Keywords: 
kbmt kbautomation kbmacro kbprogramming kbhowto kbinfo kbinterop KB211219 KbMtde
Maschinell übersetzter Artikel
Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.
Den englischen Originalartikel können Sie über folgenden Link abrufen: 211219
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.

Ihr Feedback an uns

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com