Re: Problem mit #NV
24.05.2002 10:02:53
Martin Beck
Hallo Timo,mal davon abgesehen, daß das Ersetzen von und Vergleichen auf #NV so nicht funktionieren kann, das #NV kein Text ist, enthält Dein Codeschnipsel einige "Merkwürdigkeiten", die mir unverständlich sind.
1. M.E. sind die IF- und ElseIf-Bedingungen identisch, sollen aber unterschiedliche Aktionen veranlassen. Das kann nicht funktionieren.
2. Selbst wenn die Bedingungen korrekt wären, können sie logisch nie erfüllt sein, sofern der Replace-Vorgang erfolgreich war. Nehmen wir mal an, lZ=6. Dann ersetzt Du im Bereich C4:E6 alle #NV. Danach überprüfst Du den Bereich E5:E6 auf #NV (For-Schleife und IF-Bedingung). Da kann dann aber kein#NV mehr sein.
3. Das With.ActiveSheet ist überflüssig.
Zum Ersetzen von und Vergleichen auf #NV kannst Du die WorksheetFunction IsNA verwenden (entspricht der Tabellenblattfunktion ISTNV). Das geht ansatzweise wie folgt:
Die ElseIF Bedingung mußt Du noch anpassen.
Gruß
Martin Beck