[Gelöst] In Calc über ein Ereigniss den PC User abfragen

[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

[karolus]

Vielleicht!?

Code: Alles auswählen

p_sub = createUnoService("com.sun.star.util.PathSubstitution")

user = psub.substituteVariables("$(username)",1)

[mikele]

Hallo,
oder

Code: Alles auswählen

p_sub = createUnoService("com.sun.star.util.PathSubstitution")
user = p_sub.getSubstituteVariableValue("$(username)")

auch wieder was gelernt

[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

[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).

[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

[karolus]

@mikele, kannst du mir sagen wo du das gelesen hast?
Sebastian

Ich wurde zwar nicht gefragt, aber https://api.libreoffice.org/