VBA-Blattschtschutz in Word???

Dieses Thema VBA-Blattschtschutz in Word??? im Forum "Windows XP Forum" wurde erstellt von Roger Lehmann, 30. Mai 2006.

Thema: VBA-Blattschtschutz in Word??? :-\Guten Morgen! Nach langen Recherchen im Internet habe ich jetzt den VBA- Code für den Blattschutz eines Word-...

  1. :-\Guten Morgen!

    Nach langen Recherchen im Internet habe ich jetzt den VBA- Code
    für den Blattschutz eines Word- Dokumentes:

    Const Passwort = ?test?

    Sub Sperren ()
    ÄÄÄ ActiveDocument.Protect Password:= Passwort, NoReset:=False, Type:= wdAllowOnlyFormFields
    End Sub

    Sub Entsperren()
    ÄÄÄ ActiveDocument.Unprotect Password:=Passwort
    End Sub

    Habe diese Information bei Bluewin.ch.

    Nun ist es aber so, dass folgende Meldung auftaucht:

    ?Fehler beim Kompilieren? : Nach End Sub, können nur Kommentare stehen.

    Gelb unterlegt bei Sub Entsperren ().

    Hast DU eine Ahnung was da falsch läuft?

    Über Ihre Hilfe würde ich mich freuen.

    Grüße aus Denzlingen!
     
  2. Hallo Roger Lehmann,

    bitte mache bei einem neuen Thema auch einen neuen Thread auf.
    Die Admins danken es dir  ;)

    Ich hab deinen Code mal geprüft. Gestört haben die ÄÄÄ und die Anführungszeichen um test.

    Gruß Matjes  :)
    Code:
    Const Passwort = test
    
    Sub Sperren()
      
      ActiveDocument.Protect _
                     Password:=Passwort, _
                     NoReset:=False, _
                     Type:=wdAllowOnlyFormFields
                    
    End Sub
    
    Sub Entsperren()
      ActiveDocument.Unprotect Password:=Passwort
    End Sub
     
Die Seite wird geladen...

VBA-Blattschtschutz in Word??? - Ähnliche Themen

Forum Datum
Welches ist das letzte kaufbare Office und Fehler beim Scrollen in Word: Text verdoppelt sich Microsoft Office Suite 14. Juli 2016
Word und Powerpoint hakeln. Filme abspielen führt zu Aufhängen Windows 10 Forum 17. Dez. 2015
Webhosting für WordPress auf Windows Server Webentwicklung, Hosting & Programmierung 21. Juli 2015
Öffnen mit Doppelklick funktioniert bei Word u. Excel Dateien nichtmehr Microsoft Office Suite 10. Feb. 2015
4x Word 2013 in einem Account, wie aktivieren? Microsoft Office Suite 22. Okt. 2014