Thema Datum  Von Nutzer Rating
Antwort
01.08.2008 11:32:02 Florian
NotSolved
02.08.2008 13:40:00 Holger
NotSolved
Rot Aw:Aw:Zeitdifferenz über mitternacht
 02.08.2008 17:48:35 Florian
NotSolved

Ansicht des Beitrags:
Von:
Florian		 Datum:
02.08.2008 17:48:35		 Views:
970		 Rating:
     
Antwort:
  Ja
Thema:
Aw:Aw:Zeitdifferenz über mitternacht
Hallo Holger

Vielen Dank

So kann ich das zwar nicht in mein bestehendes Programm einbauen, da meine "Arbeitsfläche" die Tabelle ist und mit den Comboboxen das immer online bearbeitet wird, aber ich einen Teil davon verwenden!!

Danke nochmals

Gruß



Holger schrieb am 02.08.2008 13:40:00:

Hallo Florian,
wenn ich dich richtig verstehe, willst du beim Initialisieren einer UserForm die aktuelle Zeit in eine Zelle (Zeile,11) schreiben. Bei einer weiteren Aktion sollen die dann aktuelle Zeit in die Zelle Zeile,12 und die Differenz zum Start in Zelle Zeile,13 geschrieben werden, letzteres in der Form hh:mm:ss oder ähnlich.
Wozu verwendest du eine ComboBox? Ich schlage vor, in der UserForm 3 CommandButtons zu verwenden, einen zum Neustart (Cmd_Neustart), einen zum Stoppen und Ausgeben der Zeitdifferenz (Cmd_Stopp) und den letzten zum Schließer der UserForm (Cmd_Abbrechen). Die UserForm heiße UserForm. zeile wird in meinem Beispiel auf 3 gesetzt. Du kannst dies verändern oder eine TextBox verwenden, in die du die gewünschte Zeilennummer eingeben kannst.

Private zeile

Private Sub Cmd_Abbrechen_Click()
Unload UserForm
End Sub

Private Sub Cmd_Neustart_Click()
Cells(zeile, 11) = Now
Cells(zeile, 12) = ""
Cells(zeile, 13) = ""
End Sub

Private Sub Cmd_Stopp_Click()
Cells(zeile, 12) = Now
Cells(zeile, 13) = Cells(zeile, 12) - Cells(zeile, 11)
Cells(zeile, 13).NumberFormat = "h:mm:ss;@"
End Sub

Private Sub userform_initialize()
zeile = 3
Cmd_Neustart_Click
End Sub

Ich hoffe, dir geholfen zu haben.
Gruß
Holger


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
01.08.2008 11:32:02 Florian
NotSolved
02.08.2008 13:40:00 Holger
NotSolved
Rot Aw:Aw:Zeitdifferenz über mitternacht
 02.08.2008 17:48:35 Florian
NotSolved