Legen Sie alle Blätter' Füllfarbe auf "Keine Füllung" verwenden von VBA in excel

Wie kann ich alle Blätter füllen Farbe No fill mit VBA in excel (alle Zellen). Gleiche wie wählen Sie alle Blätter, Wählen Sie alle Zellen (Strg+A), und ändern Sie fill color zu No fill.

InformationsquelleAutor user2991243 | 2016-12-05

  1. 13

    Ungetestet aber sollte den job tun:

    Sub No_Fill_Wb()

Dim ws as worksheet

For each ws in Thisworkbook.Worksheets
    ws.Cells.Interior.ColorIndex = 0
Next ws

End Sub
    Äquivalent wäre auch ws.Cells.Interior.ColorIndex = xlNone

    InformationsquelleAutor Jordan

  2. 10

    Habe ich "0" in meinem code (siehe unten) arbeiten mit Excel 2016 und er hat meine Spalten schwarz.

    Master.Columns(Col_Start).Interior.Color = 0

    Mit "xlNone" je weiter unten, jedoch hat Arbeit für mich.

    Master.Columns(Col_Start).Interior.Color = xlNone

    InformationsquelleAutor Corrie Steele

  3. -2

    Hey Jungs, Sie können diese nach Gebrauch in der Auswahl "Keine Füllung" - option "ThisWorkbook.Sheets(1).Innenraum.Color = xlNone" andernfalls, wenn Sie möchten, eine beliebige Hintergrundfarbe, die Sie verwenden können, auf diese Weise", "ThisWorkbook".Sheets(1).Innenraum.Color = vbgreen"

    InformationsquelleAutor Prashant Mallick

Schreibe einen Kommentar