Hallo,
danke erst mal für die bisherigen Hinweise, aber leider kommt das Programm über den Befehl nicht hinaus...
Hier noch einmal der komplette Befehl mit der ExcelFormel:
Range(Cells(tabend + 4, 6), Cells(anzahl, 6)).FormulaLocal = _
"=WENN(RECHTS(cell(tabend+5,6);1)=""S"";-1*WERT(WENN(LÄNGE(cell(tabend+5,6))=6;LINKS(cell(tabend+5,6);4);WENN(LÄNGE(cell(tabend+5,6))=7;LINKS(cell(tabend+5,6);5);WENN(LÄNGE(cell(tabend+5,6))=8;LINKS(cell(tabend+5,6);6);WENN(LÄNGE(cell(tabend+5,6))=9;LINKS(cell(tabend+5,6);7);WENN(LÄNGE(cell(tabend+5,6))=10;LINKS(cell(tabend+5,6);8);WENN(LÄNGE(cell(tabend+5,6))=11;LINKS(cell(tabend+5,6);9))))))));WERT(WENN(LÄNGE(cell(tabend+5,6))=6;LINKS(cell(tabend+5,6);4);WENN(LÄNGE(cell(tabend+5,6))=7;LINKS(cell(tabend+5,6);5);WENN(LÄNGE(cell(tabend+5,6))=8;LINKS(cell(tabend+5,6);6);WENN(LÄNGE(cell(tabend+5,6))=9;LINKS(cell(tabend+5,6);7);WENN(LÄNGE(cell(tabend+5,6))=10;LINKS(cell(tabend+5,6);8);WENN(LÄNGE(cell(tabend+5,6))=11;LINKS(cell(tabend+5,6);9))))))))).address"
Die Formel soll einen Texteintrag im Feld "(cell(tabend+5,6)" nach Prüfung entweder in eine positive oder negative Zahl umwandeln. Die Formel funktioniert im Excel einwandfrei, aber ich kriege sie nicht so in mein Makro ... bisher.
Danke für eure Unterstützung