Makro funzt net
29.11.2005 09:42:22
Glenn
ich habe folgendes makro geschrieben aber beim starten kommt gleich der fehler mit der nummer 400, ich habe leider keine ahnung was er bedeutet und wie man ihn beheben könnte ausserdem bekomme ich einen laufzeitfehler 1004. hier erstmal der code:
Sub StatistikBerechnung()
'Incoming Date
Range("F17:F2000").FormulaLocal = "=WENN(UND('Tabelle1'!C17=0;' Tabelle1'!F17>=$C$4;' Tabelle1'!F17<=$D$4;G17<>"");'
Tabelle1'!F17;"")"
'Finish Date
Range("G17:G2000").FormulaLocal = "=WENN(UND(' Tabelle1'!C17=0;' Tabelle1'!G17>=$C$4;' Tabelle1'!G17<=$D$4;' Tabelle1'!F17>=$C$4;' Tabelle1'!F17<=$D$4);' Tabelle1'!G17;"")"
'FAR
Range("H17:H2000").FormulaLocal = "=WENN(UND(F17<>"";G17<>"");WENN(' Tabelle1'!C17=0;VERKETTEN(' Tabelle1'!A17;" / ";' Tabelle1'!B17);"");"")"
'Test Result
Range("I17:I2000").FormulaLocal = "=WENN(H17<>"";' Tabelle1'!AB17;"")"
'TAT
Range("J17:J2000").FormulaLocal = "=WENN(UND(F17<>"";G17<>"");Tage360(F17;G17);"")"
End Sub
die formeln müssten stimmen, hab sie alle überprüft. würde mich freuen, wenn mir jemand helfen könnte.
gruss
glenn