Gruppe
Allgemein
Bereich
Fenster
Thema
Fenstername ändern
Problem
Wie kann ich dem Namen des aktiven Fensters den Anwendernamen hinzufügen?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain
Sub FensterName()
With ActiveWindow
.Caption = .Caption & " - " & _
Application.UserName
End With
End Sub