Erstmal Hallo an alle,
ich bräuchte dringend eure Hilfe. Ich bin absoluter VBA-Anfänger.
Ich habe eine Datei in Excel exportiert mit über 7000 Zeilen. Die Datei besteht hauptsächlich aus einem Input-Wert (erstmal irrelevant) und einem Zahlenwert, der die Zeit darstellen soll. Dieser Zahlenwert ist aber nicht in einem gängigen Zeitformat, also es sind weder Sekunden noch Minuten oder sonstiges. Beispiel: "04.492 tid". Jeder dieser Zahlen hat ist in diesem Format aufgebaut also hat drei Nachkommastellen und eine Lücke und ein tid am Ende.
Ich möchte jetzt bei jeder Änderung der Zahl vor dem Komma eine Sekunde in einer anderen Spalte hochzählen.
Beispiel der Excel Tabelle: (A will ich so weiterführen)
A B
00:01 04.488 tid
00:01 04.552 tid
00:01 04.726 tid
00:01 04.856 tid
00:02 05.088 tid
00:02 05.151 tid
00:02 05.165 tid
00:02 05.386 tid
00:02 05.735 tid
00:02 05.749 tid
00:02 05.769 tid
00:02 05.890 tid
00:03 06.284 tid
Ich habe mal selber versucht ein VBA-Skript zu schreiben, welches aber völliger Blödsinn ist. Ich kann es aber zur Vervollständigung mit anhängen.
Sub ZeitBerechnen()
Dim i As Long
i = 4
Dim x As Long
x = 0.01
Do While Range("C").Value >= 0
If Colums("C").Value >= i And Range("C").Value <= i - 1 Then
Range("A").Value = x
i = i + 1
x = x + 0.01
End If
Loop
End Sub
Ich würde mich für jede Hilfe freuen und bedanke mich schon mal im Voraus.
|