Seite 1 von 1
[Gelöst] In Calc über ein Ereigniss den PC User abfragen
Verfasst: Mo 17. Feb 2025, 16:54
von IanWhistler
Hallo Zusammen,
für die folgende vba Programmierung benötige ich ein Calc Basic Pendant:
Code: Alles auswählen
Set Netzwerk = CreateObject("wscript.network")
Select Case Netzwerk.UserName
Case "User1"
pc_user = True
Case "User2"
pc_user = False
End Select
Kann mir da jemand weiterhelfen?
Danke und Gruß,
Sebastian
Re: In Calc über ein Ereigniss den PC User abfragen
Verfasst: Mo 17. Feb 2025, 21:39
von karolus
Vielleicht!?
Code: Alles auswählen
p_sub = createUnoService("com.sun.star.util.PathSubstitution")
user = psub.substituteVariables("$(username)",1)
Re: In Calc über ein Ereigniss den PC User abfragen
Verfasst: Di 18. Feb 2025, 08:23
von mikele
Hallo,
oder
Code: Alles auswählen
p_sub = createUnoService("com.sun.star.util.PathSubstitution")
user = p_sub.getSubstituteVariableValue("$(username)")
auch wieder was gelernt

Re: In Calc über ein Ereigniss den PC User abfragen
Verfasst: Di 18. Feb 2025, 14:23
von karolus
Hallo
@Mikele: Du zitierst falsch, da fehlt in der zweiten Codezeile , 1
Edit: Ok mein Fehler … ich merke gerade, du benutzt ja auch …getSubstituteVariableValue anstelle von …subsituteVariables
Re: In Calc über ein Ereigniss den PC User abfragen
Verfasst: Di 18. Feb 2025, 14:38
von mikele
Hallo,
@karolus: Es war weniger ein Zitat sondern mehr die Nutzung einer anderen Funktion (wenn ich die API richtig gelesen habe, mit der ich mich nach wie vor schwer tue).
Re: In Calc über ein Ereigniss den PC User abfragen
Verfasst: Fr 21. Feb 2025, 11:32
von IanWhistler
Hallo ihr Beiden,
und erstmal vielen Dank für die Hilfe! Funktioniert wunderbar.
Sorry das ich jetzt erst schreibe, bin leider früher nicht dazu gekommen das zu testen.
@mikele, kannst du mir sagen wo du das gelesen hast?
Ein schönes Wochenende und Gruß,
Sebastian
Re: In Calc über ein Ereigniss den PC User abfragen
Verfasst: Fr 21. Feb 2025, 12:45
von karolus
IanWhistler hat geschrieben: ↑Fr 21. Feb 2025, 11:32
@mikele, kannst du mir sagen wo du das gelesen hast?
Sebastian
Ich wurde zwar nicht gefragt, aber
https://api.libreoffice.org/