Ich glaub ich habs:
Da ich gern mit Macros arbeite, hab ich auch eines fürs Clearen bei ner neuen Rechnung. Ich häng zus. ins Macro rein:
Range("B23:B45").Formula="=WENN(A:A>0;Sverweis(Rec hnung!A23;Artikel!A:F;2;0))"
Damit schreibt sich die Formal autom. wieder rein, wenn ich eine neue Rechnung schreiben will(wird per Macro aktiviert), und speichere zusätzlich den Bereich B23:B45 mit:
step 0 to 23, i=0+1,Cells(2,23)
next i
if Range ("B23:B45"). i = " " then Archiv! Cells(50,73).Value
mfg Excal
|