ChatGPT-Thema: Name des Verfassers eintragen

Schlüsselwortsuche im Archiv: Name, Verfasser, Properties

Wie kann ich in Excel über VBA den Namen des Verfassers einer Arbeitsmappe in eine Zelle einer Tabelle in dieser Arbeitsmappe eintragen lassen?
Um den Namen des Verfassers einer Excel-Arbeitsmappe in eine Zelle einer Tabelle in dieser Arbeitsmappe einzutragen, können Sie den folgenden VBA-Code verwenden:
Drücken Sie die Tastenkombination ALT + F11, um das Visual Basic Editor-Fenster zu öffnen.

Klicken Sie im Menü "Einfügen" auf "Modul".

Fügen Sie den folgenden Code in das Modulfenster ein:

Sub EinfügenVerfasser()
ActiveSheet.Range("A1").Value = ThisWorkbook.BuiltinDocumentProperties("Author")
End Sub

Dieser Code setzt den Wert des Namens des Verfassers in die Zelle A1 der aktiven Tabelle.

Speichern Sie das Makro und schließen Sie den Visual Basic Editor.

Führen Sie das Makro durch, indem Sie es in der Registerkarte "Entwicklertools" aufrufen oder durch drücken von ALT+F8 und wählen Sie das Makro aus.

Der Name des Verfassers wird nun in die Zelle A1 eingetragen.