Moin,
ich muss in einer Excel-Tabelle jede 2. Zeile einfärben. Damit sich die einzelnen Zeilen leichter unterscheiden lassen.
(Will das ganze dann nach HTML ausgeben)
Ich habe alle möglichen Format-Dinger ausprobiert, aber keines konnte so agieren, wie ich es gern hätte.
Gruss, MAS
wolle (Anonym) (Anonym) „Jede 2. Zeile in Excel einfärben“
Hi,
hier das Makro:
Sub ZeilenFärben()
'
' Dim Zeile As Range, ZeilenNr As Integer
For Each Zeile In Selection.Rows
ZeilenNr = ZeilenNr + 1
If ZeilenNr Mod 2 = 0 Then
Zeile.Interior.ColorIndex = 6
Else
Zeile.Interior.ColorIndex = xlAutomatic
End If
Zeile.Borders.Weight = xlThin
Next
End Sub
Viel Spaß. Die Farben lassen sich noch manipulieren.
pansa (Anonym) „Jede 2. Zeile in Excel einfärben“
ne andere möglichkeit wäre: 1.zeile bleibt weiss, 2.zeile blau...dann makierst du beide zeilen...gehe auf den format übertragen pinsel (in der symbolleiste der pinsel) und zieh ihn runter, soweit du es brauchst...
gruß
pansa
