Hi Ihr Lieben!
Ich hab folgendes Problem: Ich erstelle eine Tabelle von 1 - 24h (also ein Tag), welche mir alle Wege einer Gemeinde anzeigen. Angezeigt werden unter anderem der Start- und Ankunftszeitpunkt in einer Uhrzeit (hh:mm:ss). Diese Zahl wurde von mir in eine Dezimalzahl (0,0000) umgewandelt. So nun möchte folgendes machen, nämlich die umgerechneten Uhrzeiten den Tagesstunden (1-24) zuzuordnen. z.B: 8 - 8,6667
Folgende Ansätze hab ich gewählt:
1. If Tabelle11.Cells(tz, 1).Value <= tzZahl Then
Tabelle11.Cells(tz, 9).Copy Destination:=Tabelle11.Cells(m, 2)
m = m + 1
End If
Das funktioniert, wobie ja nur jede Zeile kontrolliert wird und damit die gleiche Tabelle ergibt.
2. If Tabelle11.Cells(tz, 1).Value = tzh Then
Tabelle11.Cells(tz, 9).Copy Destination:=Tabelle11.Cells(m, 2)
m = m + 1
End If
Wobei th = Format(tzUhr,"h") - sollte eig funktionieren, ändert aber rein garnix in der Tabelle, auch kein Zellenkopie.
Fragen: Kann in einer Zusammenhängen if Schleife gelöst werden? also:
if 1.Ansatz
if 2.Ansatz
Oder wie kann ich Code formilieren, dass einmal tzZahl größer als Zelleninhalt und einmal tzZahl kleiner wie Zelleninhalt ist? ob sich tzZahl zwischen zwei Stunden befindet: 8 < 8,5 < 9
Danke im Voraus für Eure Hilfe
|