With Selection Interior. Pattern xlSolid. PatternColorIndex xlAutomatic. Color 65535. TintAndShade 0. PatternTintAndShade 0. End With. End Sub PatternColorIndex xlAutomatic. Color 65535. TintAndShade 0. End With Selection FormatConditions1. StopIfTrue False RangeH8 patterncolorindex = xlautomatic 12 Okt. 2002. PatternColorIndex xlAutomatic. End With End Sub. Was auerdem gut wre wenn ich bestimmte Zellen ausschlieen knnte im Makro so 14. Mrz 2013. PatternColorIndex xlAutomatic. Color 255. TintAndShade 0. PatternTintAndShade 0. End With RangeC8. Select With Selection Pattern xlsolid. Patterncolorindex xlautomatic. Color 255. TintAndShade 0. PatternTintAndShade 0 End With Hier mssen Sie realisieren, dass Sie eben PatternColorIndex xlAutomatic If iRow 1 Then. Color rgbDarkGrey ElseIf iRow 2 Then. Color rgbLightGrey ElseIf iRow 3 Then 21 Nov. 2016. PatternColorIndex xlAutomatic. Color RGBi, 0. 5 i, 0 End With ActiveCell. Offset1, 0. Activate Next i. End Sub. Dieses Makro schreibt dir in patterncolorindex = xlautomatic 1000, MusterfarbenIndex, PatternColorIndex. 1001, Mustervorlage, Template. 1002, Nach. 1461, xlAutomatisch, xlAutomatic. 1462, xlAutoffnen, xlAutoOpen PatternColorIndex xlAutomatic End With Case Nachunternehmer With Interior. ColorIndex 26. Pattern xlSolid. PatternColorIndex xlAutomatic End With 19. Mai 2016. PatternColorIndex xlAutomatic. Color 5296274. TintAndShade 0. End With Selection FormatConditions1. StopIfTrue False Selection PatternColorIndex xlAutomatic. End With. End If Next. End Sub. Wenn eine andere Farbe oder ein anderes Muster gewnscht wird, so zeichnen wir ein Makro patterncolorindex = xlautomatic PatternColorIndex xlAutomatic. ThemeColor xlThemeColorAccent5. TintAndShade 0 799981688894314. PatternTintAndShade 0. End With. End With. H 5 Dez. 2017. PatternColorIndex-Eigenschaften Excel Interior. PatternColorIndex-Eigenschaften Excel. Inhaltsverzeichnis. Einfhrung in VBA in Excel 15 Okt. 2011. Strikethrough False. ColorIndex xlAutomatic. End With. PatternColorIndex xlAutomatic. Pattern xlSolid. End With. Exit Sub. ErrNum: RangeM10: M12. Select RangeM12. Select With Selection Interior. ColorIndex 36. Pattern xlSolid. PatternColorIndex xlAutomatic. End With End Sub PatternColorIndex xlAutomatic. ThemeColor xlThemeColorLight2. TintAndShade 0 399975585192419. PatternTintAndShade 0 PatternColorIndex xlAutomatic. Dabei werden aber die Color-Angaben glcklicherweise nicht berschrieben. Bedeutet hier. Colorindex0 Pattern xlSolid. PatternColorIndex xlAutomatic End With RangeA1. Select End Sub Private Sub OptionButton2_Click CaptionRot RangeA1, A3, A5.