Christopher fragt sich, ob es eine Möglichkeit gibt, den aktuellen Benutzernamen automatisch in der Word-Statusleiste oder der Titelleiste anzuzeigen. Als freiberuflicher Textprüfer muss er häufig den Benutzernamen ändern, um Änderungen verfolgen für einen bestimmten Job zu verwenden, und dann daran denken, sie zurückzusetzen, bevor er ein Dokument erstellt oder Änderungen für einen anderen Kunden verwendet. Wenn Christopher vergisst, kann es ihn Zeit und Verlegenheit kosten.

Er ist der Meinung, dass die Anzeige des Benutzernamens in der Statusleiste oder in der Titelleiste eine nützliche Erinnerung wäre.

Das Hinzufügen der Informationen zur Statusleiste ist eigentlich ziemlich einfach. Alles, was Sie tun müssen, ist, eine einzelne Zeile in Ihr Makro aufzunehmen, z. B.:

Application.StatusBar = Application.UserName

Das Makro erfasst den Wert der UserName-Eigenschaft aus dem Application-Objekt (das Word selbst darstellt) und fügt diese Informationen dann in die StatusBar-Eigenschaft ein. Einfach, oder?

Es gibt jedoch einige Probleme damit. Das größte Problem ist, dass Word die Statusleiste für viele Dinge verwendet, was bedeutet, dass alles, was Sie dort platzieren, nicht lange dort bleibt. Sie müssen beispielsweise nur ein einzelnes Zeichen eingeben und Word überschreibt alles, was Sie in der Statusleiste platziert haben.

Leider bietet Word keine integrierten Ereignishandler, die ein Zurücksetzen der Statusleiste auslösen könnten. Sie könnten natürlich ein timerbasiertes Makro erstellen, das die Statusleiste regelmäßig mit dem Namen des Benutzers aktualisiert. Dies könnte jedoch ablenken, da es zu einem Blinken führen würde, wenn Ihr Makro und Word um das ringen, was dort angezeigt wird.

Sie sollten auch wissen, dass Microsoft die StatusBar-Eigenschaft in Word 2013 anscheinend veraltet hat:

http://msdn.microsoft.com/en-us/library/office/ff845291%28v=office.15%29.aspx

Ich sage „anscheinend“, weil diese Abwertung etwas verwirrend ist. Tests haben gezeigt, dass die StatusBar-Eigenschaft in Word 2013 genau wie in früheren Versionen des Programms einwandfrei funktioniert. (Vielleicht wird es in der nächsten Version von Word vollständig entfernt, aber wer weiß?)

Aufgrund dieser Nachteile ist es möglicherweise besser, den Namen des Benutzers zur Titelleiste hinzuzufügen. Die folgenden Makros reichen aus:

Sub AutoOpen()

ActiveWindow.Caption = ActiveWindow.Caption & "  User: " & _       "  User: " & Application.UserName End Sub
Sub FileSaveAs()

If Application.Dialogs(wdDialogFileSaveAs).Show Then         ActiveWindow.Caption = ActiveWindow.Caption & _           "  User: " & Application.UserName     End If End Sub

Die Makros fügen den Benutzernamen am Ende des Dateinamens in der Fenstertitelleiste hinzu, wenn das Dokument zum ersten Mal geöffnet wird und wenn der Befehl Speichern unter verwendet wird. (Die Titelleiste wird von Word überschrieben, wenn der Dateiname des Dokuments geändert wird.)

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die beliebteste Textverarbeitungssoftware der Welt.) Dieser Tipp (13321) gilt für Microsoft Word 2007, 2010 und 2013.