5 Zellen an Hand der Zahl 5 markieren
26.04.2006 17:18:28
Andreas
ist möglich in VBA wenn ich
a = 5 habe das dann die 5 Zellen rechts neben der Zelle aus der der wert 5 kommt markiert werden um sie dann zum Beispiel alle Gelb zu färben ?
Es ist mir durch meine bissherigen VBA Kenntnisse möglich die nächsten 5 Zellen manuell und einzeln anzusprechen und dann einzeln auch gelb zu färben.
es geht also um einen Code der a = x und dann anhand der zahl x automatisch erkennt wieviele zellen zu markieren sind und diese dann auch färbt.
Die ensprechenden Zahlen habe ich vor über ein Feld in einer Schleife wie untenstehend einzulesen und dann in einer 2.Schleife die jeweiligen zellen rechts daneben entsprechend einzufärben.
Sub Grafik()
Dim Feld(1 To 10) As Double
Dim i As Integer
For i = 1 To 10 Step 1
Feld(i) = Cells(i, 1)
Next
End Sub
Anzeige