Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

If or Bedingung | Herbers Excel-Forum


Betrifft: If or Bedingung von: Gregor
Geschrieben am: 08.01.2010 08:52:38

Hallo zusammen

Ich möchte alle Zelleinträge mit Jahreszahlen "grösser/gleich 2010" und alle Zelleinträge mit "offen" und benutze folgende Bedingung:

For Each c In Bereich
If c >= 2010 Or c = "offen" Then

Dabei erhalte ich aber auch die Zeilen mit dem Zelleintrag "FIA". Woran kann das liegen, das ist falsch?

Vielen Dank und Gruss
Gregor

  

Betrifft: AW: If or Bedingung von: welga
Geschrieben am: 08.01.2010 09:14:28

Hallo Gregor,

schwer ohne Beispiel zu sagen.

Kannst du mal eine Beispieldatei mit deinem Makro hochladen?

Gruß
welga


  

Betrifft: MsgBox "FIA" >= "2010"... von: ransi
Geschrieben am: 08.01.2010 09:22:50

HAllo

..., das ist nunmal so!


Versuch es mal so:
Tabelle1

 A
11280
2303
31273
4offen
5132
62158
7FIA
8745
92444
101302


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4


Public Sub test()
    Dim Bereich As Range
    Dim C As Range
    Set Bereich = Range("A1:A10")
    For Each C In Bereich
        If IsNumeric(C.Value) Then
            If C.Value >= 2010 Then MsgBox C
            Else:
            If C.Value = "offen" Then MsgBox C
        End If
    Next
End Sub


ransi


  

Betrifft: AW: MsgBox "FIA" >= "2010"... von: Gregor
Geschrieben am: 08.01.2010 10:38:35

Hallo

Vielen Dank, mit dem Vorschlag von ransi komme ich zum Ziel.
Ich verstehe zwar nicht, wieso das "... nun mal so ist"

Gruss Gregor


Beiträge aus den Excel-Beispielen zum Thema "If or Bedingung"