Anzeige
Archiv - Navigation
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

problem mit oder-anweisung

problem mit oder-anweisung
27.05.2004 14:46:09
mika
Hallo zusammen,
ich möchte Spalten meiner Arbeitsblätter nach Kriterien ausblenden.
Mit einer einzigen Anweisungen funktioniert es wunderbar
For i = 2 To 50
If .Cells(1, i) "" Then
If .Cells(1, i) Worksheets("GuV 1").Range("a1") Then
.Columns(i).EntireColumn.Hidden = True
End If
End If
Next i
Wenn ich es aber mit der OR Anweisung versuche, um nach 2 Kriterien auszublenden
For i = 2 To 50
If .Cells(1, i) "" Then
If .Cells(1, i) Worksheets("GuV 1").Range("a1")
or .Cells(1, i) Worksheets("GuV 1").Range("a2") Then
.Columns(i).EntireColumn.Hidden = True
End If
End If
Next i
werden ALLE NICHT-LEEREN Spalten ausgeblendet.
Wieso klappt das nicht?
Beste Grüße
Mika

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: problem mit oder-anweisung
27.05.2004 14:52:15
Matthias
Hallo Mika,
wenn Mittagessen Fisch oder Mittagessen Fleisch...
Das stimmt immer, oder?
besser so:
If .Cells(1, i)  Worksheets("GuV 1").Range("a1") _
AND .Cells(1, i) <> Worksheets("GuV 1").Range("a2") Then
Gruß Matthias
AW: problem mit oder-anweisung
Andreas
Deine Logik besagt:
Ausblenden, wenn entweder (cells(i,1) ungleich A1) oder (cells(1,i) ungleich A2)
Anders ausgedruckt:
Es wird nicht ausgeblendet, nur wenn (cells(i,1) gleich A1) UND (cells(1,i) gleich A2)
Ist das was du willst?
AW: problem mit oder-anweisung
27.05.2004 19:03:22
mika
Hallo Andreas,
ich möchte sagen:
Es wird nicht ausgeblendet, nur wenn (cells(i,1) gleich A1) ODER (cells(1,i) gleich A2)
Wie kann ich das ausdrücken?
Gruß,
Mika


Anzeige
AW: problem mit oder-anweisung
27.05.2004 19:37:13
Matthias
Hallo Mika,
Dann vielleicht so:
.Columns(i).EntireColumn.Hidden = (.Cells(1, i) = Worksheets("GuV 1").Range("a1") _
Or .Cells(1, i) = Worksheets("GuV 1").Range("a2"))
Gruß Matthias

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige