3
VBA Textformatierung Kalenderwoche
Hallo,
ich habe folgende Formel im Excel...
=WENN(A10="";"";"40"+$G$6&TEXT(KALENDERWOCHE(($C$6);21);"00")&WOCHENTAG($C$6;2))
Beispielergebnis: 41071
diese möchte ich mit VBA in die Zelle schreiben. Das funktioniert auch soweit, bis auf
die Textformatierung für Kalenderwoche, hier bekomme ich nur eine 0 zurück.
Range("f10").FormulaLocal = "=WENN(A10=" & strA & ";" & strA & ";" & "40" & "+$j$6&TEXT(KALENDERWOCHE(($D$6);21);" & "00" & ")&WOCHENTAG($D$6;2))"
Beispielergebnis lautet dann: 4171
MfG
Florian86
ich habe folgende Formel im Excel...
=WENN(A10="";"";"40"+$G$6&TEXT(KALENDERWOCHE(($C$6);21);"00")&WOCHENTAG($C$6;2))
Beispielergebnis: 41071
diese möchte ich mit VBA in die Zelle schreiben. Das funktioniert auch soweit, bis auf
die Textformatierung für Kalenderwoche, hier bekomme ich nur eine 0 zurück.
Range("f10").FormulaLocal = "=WENN(A10=" & strA & ";" & strA & ";" & "40" & "+$j$6&TEXT(KALENDERWOCHE(($D$6);21);" & "00" & ")&WOCHENTAG($D$6;2))"
Beispielergebnis lautet dann: 4171
MfG
Florian86
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 329351
Url: https://administrator.de/contentid/329351
Printed on: April 27, 2024 at 02:04 o'clock
3 Comments
Latest comment
Moin,
ohne die Tabelle ist das hier schlicht Raterei.
Gruß Krämer
ohne die Tabelle ist das hier schlicht Raterei.
Gruß Krämer
anbei ein Screenshot
Die Formel steht in der Zelle für Code
Die Formel steht in der Zelle für Code
Range("f10").FormulaLocal = "=WENN(ISTLEER(A10);"""";""40""+$J$6&TEXT(KALENDERWOCHE(($D$6);21);""00"")&WOCHENTAG($D$6;2))"