Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
816to820
816to820
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Netzwerkloginzeit ermitteln

Forumthread: Netzwerkloginzeit ermitteln

Netzwerkloginzeit ermitteln
13.11.2006 12:53:14
Herbert
Hallo zusammen,
suche verzweifelt nach der Möglichkeit die Zeit zu ermitteln, zu der man sich Morgens im Netzwerk angemeldet hat. Wenn möglich auch die Endzeit vom Vortag.
Das Ganze soll zur meiner eigenen Zeiterfassung dienen.
Vielen Dank vorab
Herbert
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Win32_NetworkLoginProfile
ransi
Hallo
Versuch mal ob du hiermit etwas anfangen kannst...


Option Explicit
Public Sub Seit_wann_angemeldet()
Dim LoginProfiles
Dim Profil
Dim a
Set LoginProfiles = GetObject("winmgmts:").InstancesOf("Win32_NetworkLoginProfile")
   For Each Profil In LoginProfiles
    a = Profil.lastlogon
    If a <> "" Then
         MsgBox Profil.Name & vbCrLf & _
         Mid(a, 7, 2) & "." & Mid(a, 5, 2) & "." & Mid(a, 1, 4) & " " & _
         Mid(a, 9, 2) & ":" & Mid(a, 11, 2) & ":" & Mid(a, 13, 2)
    End If
   Next
End Sub


ransi
Anzeige
AW: Win32_NetworkLoginProfile
13.11.2006 16:20:12
Herbert
Vielen Dank!
Das mit der Loginzeit klappt. Kann man denn auch irgendwo abfragen wann das letzte Logout war?
Herbert
AW: Win32_NetworkLoginProfile
ransi
Hallo Herbert
a = Profil.lastlogoff
Aber:
LastLogoff
Data type: datetime
Access type: Read-only
User last logged off the system. This value is calculated from the number of seconds elapsed since 00:00:00, January 1, 1970. A value of " **************.******+*** " means that the last logoff time is unknown. The format of this value is yyyymmddhhmmss.mmmmmm sutc.
Example: 19521201000230.000000 000

ransi
Anzeige
AW: Win32_NetworkLoginProfile
13.11.2006 18:01:16
Herbert
Hallo Ransi,
das mit dem dem Logoff ist so wie Du es beschrieben hast. Die Ergebnis bringt auch "*".
Also Syntax ok, aber nicht das gewünschte Ergebnis.
Vielleicht ist es ja so, wie es Rainer nach Dir gesagt hat. Nur die Lösung dürfte etwas komplizierter sein.
Dankeschön erstmal an beide!
Vielleicht findet ja noch jemand eine Lösung.
Herbert
Anzeige
AW: Win32_NetworkLoginProfile
13.11.2006 16:55:02
Ramses
Hallo Ransi
Vorsicht:
Dies ist nur für den lokalen Rechner mit Lokalem Userprofile.
Es wird nicht das letzte Logon am Server bzw. AD-Controller abgefragt.
Gruss Rainer
;

Forumthreads zu verwandten Themen

Wechselnde Werte in VBA
Oliver

Hallo VBAler,
ich habe folgendes Problem, ich möchte gern eine Strategie an Hand von Hoch und Tiefpunkten testen, dies hat bisher einwandfrei funktioniert ... nun soll aber zwischen jedem ermitteltem Hoch zu einem Tief 3 Monate liegen - von Tief zu hoch besteht weiter mindesthaltedauer 1 M...
01.09.2008 14:39:15
Thread-ID: 1006370
6 Beiträge
VBA-Makro zum Gruppieren einzelner Tage
Christoph

Hallo Leute!
Bin neu hier im Forum und da ich relativ wenig Ahnung von Excel und VBA habe, mich aber beruflich in Zukunft häufiger damit beschäftigen werde, bin ich noch auf ein wenig Hilfe angewiesen.
Ich bastle gerade an einem Makro, das innerhalb einer Monats-Tabelle die einzelnen Ta...
26.09.2008 10:22:00
Thread-ID: 1012530
10 Beiträge
Anzeige
Umwandeln in Zahlen mit VBA
Bernhard

Hallo liebe Excel-Experten,
heute brauche ich Eure Hilfe für folgendes Problem: Ich importiere Daten aus einer anderen Anwendung nach Excel und ich bekomme die Zahlen als Text formartiert. Die Zahlen sehen z.B. wie folgt aus: 4.75m, was als Zahl 4750000 entspricht. Ist es mit einem VBA-Code...
25.11.2008 13:46:12
Thread-ID: 1027705
4 Beiträge
Formeln in Zellen tretz VBA beibehalten
Enrico

Ich benutze ein selbsterstelltes userform um Datensätze zu finden, zu modifizieren und zurückzuschreiben.
Läuft alles bestens. Nur der richtige Dreh um die Formeln einer Zellen beizubehalten fehlt mir noch.
Ein Beispiel. Angezeigt werden in B6 5 Stunden und in B7 7 Stunden. B8 wird das...
31.12.2008 15:11:47
Thread-ID: 1036151
2 Beiträge
Formeln in Zelle per VBA festlegen
Ryu

Hallo zusammen,
fällt jemanden auf warum es zu Fehler 1004 bei folgendem Code kommt? Es liegt an der Zeile wo ich die Formel in "H4" definiere. Dort möchte ich mit Funktion Verweis den Wert der Spalte C (Blatt Daten) rausfinden, wenn es dem Wert der Spalte D (Blatt Daten) gleich D11 (Blatt...
24.02.2009 16:15:40
Thread-ID: 1053577
9 Beiträge
VBA-Code für "Suchen in: Formeln"
Wolfango

Hallo Experten,
ich habe folgenden VBA-Code:
Sub nach_DokNr_suchen() Columns("A:A").Select Application.Dialogs(xlDialogFormulaFind).Show End Sub
Leider habe ich von VBA keine Ahnung!!!
Wie muss ich diesen Code ergänzen bzw. erweitern, dass im erscheinenden "Suchen-Dialogfeld...
20.04.2009 14:58:48
Thread-ID: 1069849
5 Beiträge
Statt Zahl "Textausgabe" in 3D Formel
Lorenz

Guten Morgen!
Mit folgender 3D-Formel wird aus mehreren Blättern(In diesem Fall "1."."2."."3.")nach dynamischen Suchkriterien ein Wert "ZAHL" ausgegeben. Funktioniert wunderbar!!!. Leider gelingt es mir nicht einen anderen Wert (den Zellinhalt als "Text") auszugeben
=SUMME(SUMMEWENN(IND...
14.08.2009 07:14:45
Thread-ID: 1095457
2 Beiträge
Anzeige
VBA:einzelnes Blatt in neuer Datei speichern +mehr
habneFrage

Hallo liebes Forum! Ich habe mich hier heute mal angemeldet, da ich schon seit längerer Zeit an einem Problem arbeite aber keine Lösung gefunden habe. Ich habe mit VBA nicht besonders viel am Hut, dafür kann ich mit anderen Dingen in Excel schon besser umgehen. Nun aber zu meinen Fragen:
Ic...
30.10.2009 08:03:49
Thread-ID: 1113145
14 Beiträge
VBA einzelne Jahre schreiben
manu

Hallo zusammen,
ich hätte heute mal eine Frage bezüglich VBA und das jährliche Ausschreiben einer Anzahl von Jahren.
Klingt etwas verwirrend, daher hier gleich die Datei zum Verständnis:
Die Datei https://www.herber.de/bbs/user/68058.xls wurde aus Datenschutzgründen gelöscht
Es...
17.02.2010 10:29:25
Thread-ID: 1139150
4 Beiträge
Formeln in Zellen durch VBA ersetzen
Kuhlmey

Hallo, liebe Excel-Freunde ich habe folgendes Problem:
Mittels VBA setzte ich durch Doppelclick ein „X“ in bestimmte Zellen. Diese Zellen werden
ausgelesen und für nachfolgende Formel benötigt:
{=WENN(ZEILE()>ZÄHLENWENN(Tabelle1!A:A;"WAHR");"";INDEX(Tabelle1!B:B; KKLEINSTE(WENN(...
13.03.2010 14:03:05
Thread-ID: 1145598
18 Beiträge
Anzeige
Formeln in VBA
PeterO

Hallo Forum,
ich möchte aus meiner Tabelle die Formeln raushaben und die Berechungen über VBA lösen. Es scheitert aber schon an der ersten Formel, die ich auf VBA umstellen will (leider konnte ich oben VBA sehr bescheiden nicht auswählen)
Fomel im Tabellenblatt in G20:

WENN(B16...
08.04.2010 14:21:56
Thread-ID: 1150666
10 Beiträge
Formel finden um Zahl zu extrahieren
Peter

Hallo Excel Experten,
ich bin kein Formel-Fan, muss aber eine Formel einsetzen, die mir aus diversen Werten in der Form 2020 x 1220 die rechte Zahl extrahiert.
Es ist nicht sichergestellt, dass es immer ein klein geschriebenes x ist,
es ist nicht sichergestellt, dass vor und nach de...
21.07.2010 15:43:53
Thread-ID: 1168149
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige