Hallo,
ich bin gerade dabei ein kleines Zeiterfassungssystem in VBA für mich zu programmieren und habe ein kleines Problem mit der Syntax.
Das erste Beispiel funktioniert Umwandlung in Textformat. Für mich wichtig "optische" Darstellung der negativen Zeit, hat nichts mit der Berechnung der Zeit zu tun.
If Range("D" & i) kleiner als "0" Then 'Kleiner als Zeichen kann ich nicht verwenden
Range("D" & i).FormulaLocal = "=TEXT(ABS(C" & i & " - G" & i & ");""-""&""hh:mm"")"
Das zweite Beispiel sieht so aus und funktioniert nicht: Fehlermeldung in der betroffenen Zelle #Name? Ich gehe davon aus das die Syntax falsch ist. Kann mir da jemand weiterhelfen?
Netto = Range("D" & i) 'rechnerische Variable definiert als Double
If Range("D" & i) kleiner als "0" Then
Range("E" & i).FormulaLocal = "=TEXT(ABS(Netto - F" & i & ");""-""&""hh:mm"")" 'Anzeige in Textformat