Makro und Bedingte Formatierung beissen sich
30.12.2014 11:14:58
Manu
Hallo Profis,
ich habe mal wieder ein kleine Excel Problemchen, bei dem ich Eure Kompetenzen benötige.
Ich habe eine Excel Tabelle mit folgendem Makro versehen:
Sub ausblenden()
Dim zeile As Long
For zeile = 3 To ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
If Cells(zeile, 3) = "x" Then
Rows(zeile).EntireRow.Hidden = True
Else
Rows(zeile).EntireRow.Hidden = False
End If
Next zeile
End Sub
Wenn in Spalte 3 ein "x" steht wird die Zeile ausgeblendet. So weit so gut!Jetzt zu meinem eigentlichen Anliegen:
Ich möchte dieses Makro erweitern um die Regel "Du sollst die Zeile auch ausblenden wenn in Spalte 2 ein "y" steht"
Die Zeilen in denen ein "y" steht sind aber Überschriften mit einer bedingten Formatierung (Wenn " dann grün Markieren)
Diese bedingte Formatierung kann ich aus verschiedensten Gründen nicht löschen!
Kopiere ich das obige Makro und füge es zusätlich ein, mit veränderter Zeilennummer und einem y statt einem x, so wird das obige, ursprüngliche Makro nicht mehr ausgeführt und die Überschriften mit dem y sind immer noch da.
Was muss ich tun um alles so hinzubekommen wie ich es mir vorstelle?
Vielen Dank im Voraus!