Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Excel
  Benutzername autom. in Kopfzeile

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Benutzername autom. in Kopfzeile (7352 mal gelesen)
Ruebe2000
Mitglied
Blechbatscher


Sehen Sie sich das Profil von Ruebe2000 an!   Senden Sie eine Private Message an Ruebe2000  Schreiben Sie einen Gästebucheintrag für Ruebe2000

Beiträge: 62
Registriert: 10.07.2012

Ansys Classic
Ansys Workbench
ProEngineer Mechanica

erstellt am: 16. Jul. 2012 14:58    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Leute,

ist es möglich den Namen des Benutzers automatisch in die Kopf- bzw. Fußzeile eintragen zu lassen?

Excel gibt ja schon gewisse Optionen unter "Kopf- und Fußzeilentools" an. Der Benutzername ist aber leider nicht dabei, was ich aber (im Moment jedenfalls) für recht wichtig halte. Und Excel kennt ja schließlich den Namen (Datei->Optionen->Allgemein->Benutzername) wie kann man evtl. über ein Makro auf diesen Name zugreifen?

Viele Grüße,
Markus

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Paulchen
Mitglied
Bauing./SW-Entwickler


Sehen Sie sich das Profil von Paulchen an!   Senden Sie eine Private Message an Paulchen  Schreiben Sie einen Gästebucheintrag für Paulchen

Beiträge: 1227
Registriert: 19.08.2004

Büro: Win10 Enterprise 64bit, Office Professional Plus 2013 - Privat: Linux Mint 15, LibreOffice

erstellt am: 16. Jul. 2012 15:41    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ruebe2000 10 Unities + Antwort hilfreich

Hi Markus,

Application.Username?

------------------
DIN1055.de  |  Lastannahmen für Anwender

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Ruebe2000
Mitglied
Blechbatscher


Sehen Sie sich das Profil von Ruebe2000 an!   Senden Sie eine Private Message an Ruebe2000  Schreiben Sie einen Gästebucheintrag für Ruebe2000

Beiträge: 62
Registriert: 10.07.2012

Ansys Classic
Ansys Workbench
ProEngineer Mechanica

erstellt am: 16. Jul. 2012 16:03    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


Makro_Benutzername.gif

 
Hallo Paulchen,

danke für deine schnelle Hilfe. Arbeite mich noch in das Thema Visual Basic ein und bin da noch nicht so sicher. Wenn ich den ganzen Vorgang mit dem Makrorecorder aufzeichne und als Beispiel die Seitenanzahl einfüge erhalte ich diesen Code (siehe Bild anbei).

An welche(n) Stelle(n) muss ich Application.Username einfügen?

Gruß,
Markus

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Thomas Harmening
Moderator
Arbeiter ツ




Sehen Sie sich das Profil von Thomas Harmening an!   Senden Sie eine Private Message an Thomas Harmening  Schreiben Sie einen Gästebucheintrag für Thomas Harmening

Beiträge: 2897
Registriert: 06.07.2001

Das Innerste geäussert
und aufs Äusserste verinnerlicht

erstellt am: 16. Jul. 2012 17:03    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ruebe2000 10 Unities + Antwort hilfreich

wenn bei .LeftHeader = "&S" steht um beim rest nix

könnte man "&S" durch Application.UserName ersetzen und mal testen was passiert.

Code:
.LeftHeader = Application.UserName
.CenterHeader = ""
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Ruebe2000
Mitglied
Blechbatscher


Sehen Sie sich das Profil von Ruebe2000 an!   Senden Sie eine Private Message an Ruebe2000  Schreiben Sie einen Gästebucheintrag für Ruebe2000

Beiträge: 62
Registriert: 10.07.2012

Ansys Classic
Ansys Workbench
ProEngineer Mechanica

erstellt am: 17. Jul. 2012 08:41    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Das hatte ich schon ausprobiert. Damit spuckt er als Name "wahr" aus.

Aber danke für den Tipp! 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

MWN
Mitglied
Dipl.-Ing.


Sehen Sie sich das Profil von MWN an!   Senden Sie eine Private Message an MWN  Schreiben Sie einen Gästebucheintrag für MWN

Beiträge: 492
Registriert: 14.02.2007

erstellt am: 17. Jul. 2012 09:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ruebe2000 10 Unities + Antwort hilfreich

Wenn du im VBA Editor einfach mal folgenden Code mit F8 durchlaufen lässt, siehst du, was Application.UserName zurückliefert! 

Code:
Sub test()
MsgBox Application.UserName
End Sub

Grüße

Tobias

------------------
Besucht mich doch mal in meiner Tischlerei

"...Kommunikation ist nur so gut wie ihr Ergebnis..." - frei nach Richard Bandler / John Grinder

"...Wenn du das tust, was du schon immer tust, wirst du auch nur das erhalten, was du schon immer erhalten hast..."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Ruebe2000
Mitglied
Blechbatscher


Sehen Sie sich das Profil von Ruebe2000 an!   Senden Sie eine Private Message an Ruebe2000  Schreiben Sie einen Gästebucheintrag für Ruebe2000

Beiträge: 62
Registriert: 10.07.2012

Ansys Classic
Ansys Workbench
ProEngineer Mechanica

erstellt am: 17. Jul. 2012 10:01    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Das ist ja alles recht schön, ich hätte gerne den Namen des momentanen Benutzers in ein Feld eingetragen bekommen. Die Tabelle wird von verschiedenen Rechnern aus gestartet und bearbeitet. Der Name dient dabei als Unterschrift des jeweiligen Benutzers.

[Diese Nachricht wurde von Ruebe2000 am 17. Jul. 2012 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

MWN
Mitglied
Dipl.-Ing.


Sehen Sie sich das Profil von MWN an!   Senden Sie eine Private Message an MWN  Schreiben Sie einen Gästebucheintrag für MWN

Beiträge: 492
Registriert: 14.02.2007

erstellt am: 17. Jul. 2012 10:11    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Ruebe2000 10 Unities + Antwort hilfreich

Probier mal:

Code:
Environ("USERNAME")

und/oder

Code:
Environ("COMPUTERNAME")

Grüße

Tobias

------------------
Besucht mich doch mal in meiner Tischlerei

"...Kommunikation ist nur so gut wie ihr Ergebnis..." - frei nach Richard Bandler / John Grinder

"...Wenn du das tust, was du schon immer tust, wirst du auch nur das erhalten, was du schon immer erhalten hast..."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Ruebe2000
Mitglied
Blechbatscher


Sehen Sie sich das Profil von Ruebe2000 an!   Senden Sie eine Private Message an Ruebe2000  Schreiben Sie einen Gästebucheintrag für Ruebe2000

Beiträge: 62
Registriert: 10.07.2012

Ansys Classic
Ansys Workbench
ProEngineer Mechanica

erstellt am: 17. Jul. 2012 10:31    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Tobias!!! Vielen Dank für den Tipp! So läuft die Sache!

Gruß,
Markus

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz