Formel über Makro in Zelle schreiben
09.01.2004 15:05:16
Jürgen
ich möchte in einem Makro eine Formel in eine Zelle schreiben.
Habe folgendes versucht:
test = "=" & "WENN(J" & z & Chr(61) & Chr(34) & Chr(34) & Chr(59) & Chr(34) & Chr(34) & ";WENN(HEUTE()-DATWERT(TAG(J" & z & Chr(41) & Chr(38) & Chr(34) & Chr(46) & Chr(34) & Chr(38) & "MONAT(J" & z & Chr(41) & Chr(38) & Chr(34) & Chr(46) & Chr(34) & Chr(38) & "JAHR(HEUTE()))<0;JAHR(HEUTE())-JAHR(J" & z & ")-1;JAHR(HEUTE())-JAHR(J" & z & ")))" & Chr(34)
If a = 11 Then Cells(z, a) = test
z ist dabei eine Variable.
Beim übergeben mit cells(z,a) = test erhalte ich eine Fehlermeldung
Bitte um Hilfe