Office: Word 2016

Hallo zusammen,

ich hätte da mal ein kleines Anliegen und hoffe, dass mir da jemand helfen kann.
Und zwar habe ich ein Word Formular erstellt. Bei diesen gibt es zwei Felder die zwingend ausgefüllt werden sollen, bevor es gedruckt werden kann. Evtl auch mit Fehlermeldung, wenn die Felder leer sind.

Felder wurden über Textformularfelder erstellt.
1. Feld heißt Kostenstellen
2. Feld heißt Einrichtung

Wäre es also irgendwie möglich über ein Makro dieses Dokument so zu steuern, dass es nur gedruckt werden darf, wenn diese beiden Felder gefüllt sind.

Super wäre es auch noch, wenn beim ausfüllen des Feldes Kostenstelle zwingend 11 Zahlen rein müssten. Nicht das es mit einer 123 umgangen werden kann.

Das Dokument wird dann noch zur Bearbeitung gesperrt, sodass nur noch die Textformularfelder gefüllt werden können. Hoffe, dass stört das Makro nicht.

Schon mal danke für eure Hilfe.

Viele Grüße
Christian

:)

 

Hallo Christian,

im Anhang ein Beispieldokument.

Zwecks einfacherer Prüfung per Schleife sind die Pflichtfelder dort mit "Pflichtfeld" plus einem fortlaufenden Index benannt.
Da im Dokument selber keine Änderungen vorgenommen werden müssen, funktioniert das auch bei gesetztem Dokumentschutz.

Weitere Erklärungen im Dokument.

 

......

 

So habe jetzt mal im VBA etwas eingegeben.

Ich möchte mit diesem Befehl erzeugen, dass er mit dem öffnen dieses Dokumentes startet. Oder

Aber speichern kann ich irgendwie nicht. Muss ich im VBA dann das Makro auch noch eingeben?

 

Ok das mit dem Speicher habe ich jetzt auch hinbekommen. War ja irgendwie logisch. :-)
Aber wo muss ich jetzt das mit den Makros hingeben? Direkt unter den Text oder ein neues Makro anlegen?

 

Hallo Christian,

was meinst du mit "direkt unter den Text (welchen(?)oder ein neues Makro anlegen?
Die Makros müssen alle ins Codefenster von ThisDocument, genau so wie es im Musterdokument gemacht wurde. Die Reihenfolge ist egal.

 

Hallo Gerhard,
jetzt habe ich es doch tatsächlich geschafft.
Habe alles ins VBA reingegeben. Siehe Anhang.

Wenn die Pflichtfelder nicht gefüllt sind, kommt der Fehler Hinweis. TOP!

Doch sobald ich eine 1 reinschreibe, geht der Druck doch.

Also der Druck sollte ja nur gehen, wenn mindenstens bei Pflichtfeld1 10 Zahlen drin stehen. Sorry 11 war ein Fehler.
Beim Pflichtfeld2 kommt eine Einrichtung rein, also Buchstaben und Zahlen.
Da die Anzahl vielleicht auf 13 stellen.

Und gibt es einen Weg, dass das Dokument nur bearbeitet werden kann, wenn man auch die Makros aktiviert. Da ich die Makros immer extra aktivierern muss und wenn ich das nicht mache, kann ich das Dokument einfach so bearbeiten.

Viele Grüße
Christian

 

Hallo Christian,

erst mal: Das Makro, das du verwendest, hast du direkt aus dem Dokument rauskopiert. Das ist eine alte Version, die ich vergessen habe, anzupassen. Sie prüft nur auf "leer". Die Prüfung auf 11 Ziffern hättest du im Modul ThisDocument gefunden.

Aber da die Anforderung jetzt eine andere ist (Formularfeld 1 auf 10 Ziffern prüfen, Formularfeld 2 auf mindestens 13 Zeichen), hab ich das Makro ein wenig umgebaut:
Code:

Siehe angehängtes Dokument

Den Rest habe ich nicht verstanden: "Da ich die Makros immer extra aktivierern muss..."
Musst du? Das würde ja die automatische Prüfung der Textfelder aushebeln.

Derzeit ist es ja so: Das Makro wird automatisch "scharfgestellt" anlässlich des Öffnens eines ganz bestimmten Dokuments, nämlich dasjenige, in dem auch die Makros gespeichert sind. Ausgelöst wird das Makro beim Einleiten des Drucks. Ist das bei dir anders?

 

Hallo Gerhard,

erstmal Danke für das neue Makro.
Klappt super spitze. *Smilie

Also bei mir ist das so, wenn ich das Dokument öffne, steht bei mir oben "Sicherheitswarnung - Makros wurden deaktiviert. Inhalt aktivieren."
Einstellung von Word ist bei uns in der Firma anscheinend so vorgegeben.

Wenn ich jetzt den Inhalt nicht aktiviere, kann ich das Dokument ja trotzdem bearbeiten und die Pflichtfelder werden auch nicht geprüft.

Gibt es in Word eine Möglichkeit, dass man diese Dokument nur bearbeiten darf, wenn man auch die Makros aktiviert?

 

Hallo Christian,

du kannst deine Admins fragen, ob du dir einen vertrauenswürdigen Speicherort einrichten darfst (Optionen > Sicherheitscenter > Einstellungen für das Sicherheitscenter).

Eine Möglichkeit wie nachgefragt kenne ich nicht (was nicht heißen muss, dass es sie nicht gibt). Aber wenn bei euch generell Makros untersagt sind, wird die Pflichtfeldprüfung nur per "wachsames Auge" funktionieren.

 

Ok dann werde ich mal weiter im Internet suche, ob es vielleicht so eine Möglichkeit gibt.

Aber auf jeden Fall besten Dank für deine super Hilfe.

 

Also jetzt habe ich mal einen Code gefunden bei diesem man nur drucken kann, wenn die Makros aktiv sind.

----------------

Sub FilePrintDefault()

ActiveDocument.ActiveWindow.PrintOut Range:=wdPrintFromTo, From:="2", To:="3"

End Sub

----------------------------

Geht so etwas auch für das Speichern und speichern unter? Vielleicht kannst du mir da ja nochmal helfen. Danke.

Oder gibt es eine Möglichkeit zu sagen, dass dieses Dokument nur in .docm gespeichert werden darf und halt nicht der Dateityp beim speichern verändert werden kann.

 

Hallo Christian,

einerseits: es gibt ein BeforeSave-Ereignis. Es funktioniert fast genau so wie das BeforePrint-Ereignis.
Andererseits: Wäre das nicht etwa so wie bei "Ein Loch ist im Eimer, o Henry, o Henry"? Deine Admins haben die Ausführung von Makros unterbunden, und du willst als Lösung ein Makro anwenden, das den Druck modifiziert?

Du wirst dich wohl mit deinen Admins arrangieren müssen.

 

Ok mal ein anderer Ansatz.

Gäbe es denn die Möglichkeit, dass man durch ein Makro einen Dokumentschutz aufhebt (Schreibgeschützt mit Passwort) und danach wieder einen Dokumentenschutz (Ausfüllen mit Formularen mit Passwort) setzten kann?

Idee ist das Dokument komplett mit Dokumentenschutz (Schreibgeschützt mit Passwort) zu sperren. Und sobald man Makros aktiviert, wird das Dokument von komplett von schreibgeschützt in den Schutz "Ausfüllen von Formularen" mit Passwort umgewandelt.

 

Hallo Christian,

kann es sein, dass wir uns grundsätzlich missverstehen?

"Makros wurden deaktiviert. Inhalt aktivieren. - Einstellung von Word ist bei uns in der Firma anscheinend so vorgegeben." Das interpretiere ich so, dass in eurer Firma keinerlei Makros zugelassen sind. Dann kannst du dir doch jeden Versuch sparen, ein Makro, und sei es über ein anderes, zu aktivieren.

Andernfalls aber auch, denn dann würden das Beispiel aus Nr. 8 ohne weitere Tricksereien funktionieren.

Der Vorschlag, einen vertrauenswürdigen Speicherort einzurichten, würde das Problem insofern lösen, als Makros in Dokumenten, die dort gespeichert sind, unbeschadet sonstiger Schutzeinstellungen funktionieren würden. Deine Firma, denk ich mal, wenn sie sich drauf einlässt, würde sicher gern überwachen, was in diesem Speicherort so drin ist.