ich möchte in Excel mit folgendem Makro in einem markierten Bereich für jede Zeile den Kleinstwert (Minimum) mit rot kennzeichnen.
Für den markierten Bereich wird ein Min-Wert eingefärbt, da ich jedoch nicht so fit in VBA bin, schaffe ich dies nicht zeilenweise.
Wer kann mir helfen, ich bin am Verzweifeln bin schon verzweifelt.
******************************************
Private Sub Kleinstwerte_Click()
Dim Zelle As Range
Dim i As Integer
Sheets("Werte").Activate
i = selection.Rows.Count hier Zeilen zählen und irgendwie schleifen
For Each Zelle In selection
Zelle.Font.ColorIndex = 1 'alle schwarz
If Zelle = Application.Min(selection) Then
With Zelle
.Font.ColorIndex = 3 'rot
.Font.Bold = True
End With
End If
Next Zelle
End Sub
************************************************
Danke!
Gruß
Christian