Hallo liebes Forum,
leider komme ich bei meinem Problem nicht weiter und hoffe auf Eure Hilfe.
In den Zellen A1 bis A30 stehen String, die alle eine Uhrzeit und einen Zusatz enthalten. Leider ist der Zusatz unregelmäßig, so dass mit einer Standartfunktion nicht gearbeitet werden kann.
Beispiele: A1: " FG / 12:24 / HH", A2: „22:09“, A3: „22:19 /FV“
Wie komme ich am besten an die reine Uhrzeit, also nur „hh:mm“?
Vielen Dank für Eure Hilfe.
Gruß
Hallo, habe es mittlerweile selbst rausgefunden:
Sub testen()
If Not InStr(Range("A1").Value, ":") = 0 Then
MsgBox Mid$(Range("A1").Value, InStr(Range("A1").Value, ":") - 2, 5)
End If
End Sub
MsgBox „Gruß“
OT @Mod bitte mitlesen ansonsten nur harmlose Nachfrage
Sub testen()
If Not InStr(Range(„A1“).Value, „:“) = 0 ThenMsgBox Mid$(Range(„A1“).Value, InStr(Range(„A1“).Value, „:“) -
2, 5)End If
End Sub
Hallo Achim,
Du weißt daß dein Code nur funktioniert wenn in z.B. A1 steht
„22:19“
er versagt (keine Msgbox) aber wenn dies in A1 steht
22:19
Im letzeren Fall ist 22:19 eine Zahl ohne Doppelpunkt.
Das nur zur Info. Meine Frage ist, wird wohl so sein aber ich weiß es halt nicht, kriegste die Tabelle von einem anderen System, SAP, oder was da noch rumkreucht präsentiert?
Ich für mich finde es recht unnormal da Gänsefüßchen vorne und hinten Zellwerten zu setzen.
Okay, okay, für deinen Code war das ja sehr hilfreich. Mein Zweitnick ist halt Neugier, also sprich bitte warum, wieso, wofür die Gänsefüßchen, bedanke mich wenn du das machst.
Zum @Mod im Betreff, wenn du Achim deinen Beitrag und meinen anschaust so siehst du Leerzeilen. Da ich das schon ab und zu sah meine Frage an dich Achim, hast DU die Leerzeilen eingeben? Dann ist es ja okay.
Wenn nicht, wars wohl w-w-w und dann meine Frage an Thomas, war das schon mal Thema im Bugsbrett? Keine Panik, nur wenn du das auswendig weißt. Sofern das Bugsbrett für Suche frei ist finde ich das dann schon.
Gruß
Reinhard
.
Hallo Reinhard,
die Daten werden von einem externen Zeiterfassungsterminal so geliefert, das ist aber ok, der Code funktioniert ja dann so.
Mit denn Leerzeilen kann ich Dir ehrlich gesagt nicht ganz folgen, sorry. Bei mir ist jedenfalls alles ok.
Viele Grüße
Hallo Achim,
die Daten werden von einem externen Zeiterfassungsterminal so
geliefert, das ist aber ok, der Code funktioniert ja dann so.
sehr schön.
Mit denn Leerzeilen kann ich Dir ehrlich gesagt nicht ganz
folgen, sorry. Bei mir ist jedenfalls alles ok.
Schaue dir bitte dieses Bild deines Beitrages. Im Code sind zwei Leerzeilen zu erkennen. Dadrum geht es mir da ich das schon ab und zu sah. Deshalb fragte ich nach ob du die eingefügt hast.
Du hast anzunehmenderweise den pre-Tag benutzt um die Msgbox-Codezeile mit Leerzeichen eingerückt anzuzeigen. Das ist immer super. Länger Code ohne Einrückungen ist fürchterlich zu lesen.
Und zurück zu den eingefügten Leerzeilen, stelle dir mal längeren Code vor der hier schon zu sehen war und aus 30 Zeilen Code waren dann in der Ansicht 60 Zeilen. *igitt*
Von dir erbitte ich mir nur die Auskunft ob du die Leerzeilen auch in deinem Modul/Prozedur hast die du hier reinkopiert hast.
Wenn ja, hat sich das mit Mod erledigt.
Gruß
Reinhard