nächste Zelle, Zellen vergleichen,
27.01.2009 14:36:00
ms_michael_2002@yahoo.de
Wie kann ich in die nächste Zelle gehen und dann automatisch die bedingte Formatierung durchführen? 1.) Wenn ich über die inputbox 3 eingebe, soll er von a1 nächste a2 dann a3 gehen ende, oder von einen bestimmten Punkt über die inputbox (mit der Maus zB auf a7 gehen) eingeben, zeigen- und danach die bedingte formatierung durchführen.
Das untere klappt nur für einen Wert und fängt immer mit A1 an.
Danke
Gruß Michael
Sub zellwert_makieren()
' zellwert_makieren Makro
Range("A1").Select
' Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="=$D$1"
Selection.FormatConditions(1).Interior.ColorIndex = 4
End Sub