Ich brauch einfach nur eine Zeitanzeige

[Glausius]

Hallo Andre,

wenn ich dir mal antworten darf und nicht Elex.
Das Makro kannst du dir mit [Alt]+[F11] ansehen bzw. wenn du einen Rechtsklick unten auf den Tabellenreiter machst und dort "Code anzeigen" auswählst.
Allerdings wird dir das nicht viel helfen, denn wenn man nichts von VBA versteht, ist der Makro-Code ein undefinierbares Gebilde - außerdem kann man bei Unachtsamkeit die ganze Funktionalität zustören. Wenn du also reinschauen willst, dann zu deiner Sicherheit bitte an einer Kopie!
Viel Spaß beim Studieren.

[Elex]

Hi

Wie es Günter schon schreibt wird es ohne jegliche Kenntnisse schwer mit Verstehen und eigenen Anpassungen.

Um auch Zeiten großer 24h Gesamt und arbeiten über Mitternacht richtig zu erfassen, sind folgende Anpassungen nötig.

1. Den alten Code durch diesen ersetzen.
2. Die Zellen für letzte Zeit und Gesamt mit dem Zellformat formatieren.
    Benutzerdefiniert:      [hh]:mm:ss

Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If (Target.Row + 2) Mod 4 = 0 And Not Application.Intersect(Range("C6:F37"), Target) Is Nothing Then
   If Target = "Start" Then
      Target = "Stopp"
      Target.Interior.ColorIndex = 3
      Target.Offset(1) = Now
   Else
      Target = "Start"
      Target.Interior.ColorIndex = 4
      Target.Offset(2) = Now - Target.Offset(1)
      Target.Offset(3) = Target.Offset(2) + Target.Offset(3)
      Target.Offset(1) = ""
   End If
Cancel = True
End If
End Sub

Gruß Elex

[Nighttrain02]

Ich Danke Euch allen !!! :98:

Ich habe das Makro mir angesehen, aber ich glaube das werde ich ohne das es mir jemand bei bringt nicht lernen.  :22:
Da sind ja die Makro`s auf der CNC fast ein Kinderspiel. Mich ärgert es nur, wenn ich dann irgend wann an meine Grenzen komme. Und ich von selbst nicht weiter komm.

MfG
Andre

[schauan]

Hallöchen,

das werden aber große Teile mit drehen und fräsen > 24h Ich hab anbei mal eine alte naive Version aber ohne die Formatänderung.
Ich hab da auch die Zeilenanzahl reduziert und statt der Buttons einfach die Zellen genommen. Sobald Du in so eine "Buttonzelle" klickst, erfolgt der Start oder der Stop.
Ein kleiner Haken ist noch dabei - wenn Du eine Zeit genommen hast und drückst nochmal Stop, dann wird die Zeit wieder geändert. Man müsste da etwas anders vorgehen, kann ich bei Bedarf noch einarbeiten. Z.B. statt einer Startzeit was anderes reinschreiben und erst bei Ende die Zeit. Dann würde ich bei Ende die Zeit nur neu berechnen, wenn Start in der Zeitzelle steht Oder man tut die Zele einfärben und die Farbe prüfen. Oder was auch immer …

Der Code wirkt dann in jeder zweiten Spalte ab D und weiter eingegrenzt, siehe auch die Kommentare im Code.

[Nighttrain02]

Also ich würde bei Elex seiner Variante bleiben. Habe den alten Code gegen den neuen ausgetauscht und in einer separaten Datei abgespeichert. Also sollten jetzt alle 2 Codes in 2 verschiedenen Dateien sein.

Danke noch mal. Sollte ich noch fragen haben, würde ich mich noch mal melden. Wenn ich darf ? :19:

MfG 
Andre