Excel表格底板颜色怎么设置？如何调整？

Excel表格底板颜色设置与调整指南

在Excel中，底板颜色的设置和调整是美化表格、提高数据可读性的重要手段。通过合理设置底板颜色，可以使表格更加清晰、专业。以下将详细介绍如何在Excel中设置和调整表格底板颜色。

一、设置底板颜色

1. 打开Excel表格：首先，打开你想要设置底板颜色的Excel表格。

2. 选择底板区域：在Excel中，底板通常指的是工作表的背景区域。你可以通过以下两种方式选择底板区域：

点击“开始”选项卡下的“对齐方式”组中的“合并后居中”按钮，然后选择“设置边框和底纹”。

或者直接右键点击工作表标签，选择“查看代码”，在VBA代码中找到对应的底板设置。

3. 设置底板颜色：

使用“设置边框和底纹”对话框：在“开始”选项卡中，点击“对齐方式”组中的“设置边框和底纹”，在弹出的对话框中，选择“填充”选项卡，然后从颜色列表中选择你喜欢的颜色。

使用VBA代码：在VBA编辑器中，你可以使用以下代码来设置底板颜色：

```vba

With ThisWorkbook.Sheets("Sheet1").PageSetup

.PrintArea = "A1:Z100"

.PrintBackground = True

.LeftMargin = 0.5

.TopMargin = 0.5

.RightMargin = 0.5

.BottomMargin = 0.5

.HeaderMargin = 0.5

.FooterMargin = 0.5

.PrintHeadings = False

.PaperSize = xlPaperA4

.Orientation = xlPortrait

.Zoom = 100

.ValidPrinterInfo = True

.PrintQuality = 600

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.PrintTitleColumns = False

.OddAndEvenPagesHeaderFooter = False

.DifferentFirstPageHeaderFooter = False

.ScaleWithDocument = True

.PrintWhat = xlPrintAllPages

.PrintAreas = ""

.PrintPageOrder = xlDownThenOver

.PrintRange = xlPrintAllPages

.PagesPerSheet = 1

.Order = xlDownThenOver

.BlackAndWhite = False

.ColoredInk = False

.LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = "Page &P of &N"

.RightFooter = ""

.TopMargin = Application.InchesToPoints(0.5)

.BottomMargin = Application.InchesToPoints(0.5)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.LeftMargin = Application.InchesToPoints(0.5)

.RightMargin = Application.InchesToPoints(0.5)

.HeaderHeight = Application.InchesToPoints(0.5)

.FooterHeight = Application.InchesToPoints(0.5)

.PrintTitleRows = False

.