wie muß die Bedingung lauten wenn das Ergebnis der Formel
im TB als #Wert! angezeigt wird?
Range("E3").Select
ActiveCell.FormulaR1C1 = "=MID(RC[-4],FIND(""Geschäftsjahr"",RC[-4]),95)"
If Range("E3").Value = ? Then
MACH ETWAS
End If
Gruß Reinhardt
Sub t()
Range("E3").FormulaR1C1 = "=MID(RC[-4],FIND(""Geschäftsjahr"",RC[-4]),95)"
If IsError(Range("E3")) Then
MsgBox "Fehler"
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen