Microsoft Excel

Herbers Excel/VBA-Archiv

VBA If Bedingung auslösen wenn Zellwert #NV ist | Herbers Excel-Forum


Betrifft: VBA If Bedingung auslösen wenn Zellwert #NV ist von: chrissey
Geschrieben am: 20.01.2010 15:18:25

Hallo Leute,

bräuchte dringend Eure Hilfe. Wie kann ich eine IF Bedingung ausösen wenn der Zellwert #NV ist???

Habs so probiert, scheitert aber:

If Worksheets(1).Cells(ErsteZeile, 71).Value = "#NV" Then

Worksheets("Test").Cells(aktuelleZeile, 1).Value = Worksheets(1).Cells(ErsteZeile, 12).Value

End If

Danke & Grüße
Chrissey

  

Betrifft: AW: VBA If Bedingung auslösen wenn Zellwert #NV ist von: Tino
Geschrieben am: 20.01.2010 15:23:02

Hallo,
versuche es mal so

If Worksheets(1).Cells(ErsteZeile, 71).Text = "#NV" Then
oder auch
If IsError(Worksheets(1).Cells(ErsteZeile, 71)) Then
Gruß Tino


  

Betrifft: VarType von: Björn B.
Geschrieben am: 20.01.2010 15:27:17

Hallo,

du kannst auch mit der Funktion VarType den Zellinhalt prüfen.
Allerdings nur, ob irgendein Fehler darin ist, nicht ob der spezielle #NV drin steht.
Aber normalerweise reicht das.

Schau Dir VarType mal in der Hilfe an.

Gruß
Björn B.


  

Betrifft: AW: VBA If Bedingung auslösen wenn Zellwert #NV ist von: chrissey
Geschrieben am: 20.01.2010 15:44:29

DANKE! Funktioniert super


  

Betrifft: Natürlich geht auch Prüfung auf #NV mit... von: Luc:-?
Geschrieben am: 20.01.2010 17:58:02

...der Standard-Range-Eigenschaft Value, Folks...
If Worksheets(1).Cells(ErsteZeile, 71) = CVErr(xlErrNA) Then
Gruß Luc :-?


  

Betrifft: aber nur mit Fehlerbehandlung ;-) von: Tino
Geschrieben am: 20.01.2010 18:06:31

Hallo,
da fehlt aber noch ein On Error ... und weitere prüfungen damit er bei Fehler nicht in die If (True) rein geht.

Gruß Tino


  

Betrifft: ...die ich, falls nötig, in div Formen auch... von: Luc:-?
Geschrieben am: 20.01.2010 18:33:15

...verwende, Tino... ;-)
Gruß Luc :-?
PS: Liefert ...Text wirklich #NV oder vielleicht doch #N/A...?


  

Betrifft: bei mir liefert ...Text wirklich #NV. von: Tino
Geschrieben am: 20.01.2010 18:38:59

Hallo,
wenn es wirklich nur um den Fehlerwert NV geht würde ich es wahrscheinlich kombinieren.

If Range("A1").Text = "#NV" And IsError(Range("A1")) Then
 '...
 '...
End If
Gruß Tino


Beiträge aus den Excel-Beispielen zum Thema "VBA If Bedingung auslösen wenn Zellwert #NV ist"