HERBERS Excel-Forum - das Archiv
Thema: Formel in VBA
-
Formel in VBAThomas
-
AW: Formel in VBADaniel
-
AW: Formel in VBAThomas
Formel in VBA
Thomas
Hallo,
wie bekomme ich diese Formel
=TEXT(ABS(E6-D6);WENN(D6<E6;"-";) &"hh:mm")~f~
in diesen VBA Code: Worksheets(2).Cells(ab, 10).FormulaLocal =
so daß es funktioniert?
Hab es so gemacht, kommt aber nichts an.
~f~Worksheets(2).Cells(ab, 10).FormulaLocal = "=TEXT(ABS(E" & ab & "-D" & ab & ");WENN(D" & ab & "<E" & ab & ";"-";"+") &"hh:mm")"
Gruß Thomas
AW: Formel in VBA
Daniel
Hi
beachte: Anführungszeichen, die Bestandteil des Textes sind (hier: vor und nach dem - und hh:mm) müssen immer Doppelt eingegeben werden (aus " wird "")
der VBA-Interpreter unterscheidet an dieser Dopplung ob die Anführungzeichen zum Text gehören oder ob sie den Text begrenzen.
ausserdem solltest du die Z1S1-Adressierenungsart verwenden.
Dann brauchst du die Variable ab nicht in die Formel einfügen, weil du in der Z1S1-Bezugsart den relativen Zellbezug auch relativ beschreiben kannt:
.Cells(ab, 10).FormulaR1C1Local = "=Text(ABS(ZS4-ZS5);Wenn(ZS4<ZS5;""-"";""+"")&""hh:mm"")"
gruß Daniel
AW: Formel in VBA
Thomas
Besten Dank. Jetzt gehts...
Z1S1-Adressierenungsart ist mir im Moment noch zu hoch, obwohl betimmt ganz einfach :)
Thoma
Formel in VBA
Thomas
Hallo,
wie bekomme ich diese Formel
=TEXT(ABS(E6-D6);WENN(D6<E6;"-";) &"hh:mm")~f~
in diesen VBA Code: Worksheets(2).Cells(ab, 10).FormulaLocal =
so daß es funktioniert?
Hab es so gemacht, kommt aber nichts an.
~f~Worksheets(2).Cells(ab, 10).FormulaLocal = "=TEXT(ABS(E" & ab & "-D" & ab & ");WENN(D" & ab & "<E" & ab & ";"-";"+") &"hh:mm")"
Gruß Thomas
AW: Formel in VBA
Daniel
Hi
beachte: Anführungszeichen, die Bestandteil des Textes sind (hier: vor und nach dem - und hh:mm) müssen immer Doppelt eingegeben werden (aus " wird "")
der VBA-Interpreter unterscheidet an dieser Dopplung ob die Anführungzeichen zum Text gehören oder ob sie den Text begrenzen.
ausserdem solltest du die Z1S1-Adressierenungsart verwenden.
Dann brauchst du die Variable ab nicht in die Formel einfügen, weil du in der Z1S1-Bezugsart den relativen Zellbezug auch relativ beschreiben kannt:
.Cells(ab, 10).FormulaR1C1Local = "=Text(ABS(ZS4-ZS5);Wenn(ZS4<ZS5;""-"";""+"")&""hh:mm"")"
gruß Daniel
AW: Formel in VBA
Thomas
Besten Dank. Jetzt gehts...
Z1S1-Adressierenungsart ist mir im Moment noch zu hoch, obwohl betimmt ganz einfach :)
Thoma
Excel-Beispiele