如何用vba设置excel单元格背景色 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何用vba设置excel单元格背景色

共有3623人关注过本帖树形打印复制链接主题：如何用vba设置excel单元格背景色

chen_sheng

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：700 积分：6236 威望：0 精华：0 注册：2018/5/10 9:05:00

如何用vba设置excel单元格背景色 发帖心情

Post By：2021/9/8 9:55:00 [只看该作者]

如何用vba实现把excel

指定区域的空白单元格设置指定背景色

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110802 积分：563948 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/9/8 10:03:00 [只看该作者]

http://www.foxtable.com/webhelp/topics/2121.htm

chen_sheng

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：700 积分：6236 威望：0 精华：0 注册：2018/5/10 9:05:00

Post By：2021/9/8 10:41:00 [只看该作者]

蓝版有没有示例的代码可以参考帮助的点比较分散,组合起来使用还是有点困难,这个场景比较特殊,帮忙指导一下谢谢!

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110802 积分：563948 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/9/8 10:48:00 [只看该作者]

帮助都是

Interior

利用Range对象的Interior属性，可以设置单元格的填充颜色、背景图案和背景颜色等。如：

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.UsedRange
With Rg.Interior
    .ColorIndex = 3'单元格填充颜色为红色
    .Pattern = MSExcel.XlPattern.xlPatternCrissCross   '单元格背景图案为十字图案
    .PatternColorIndex = 6 '单元格背景颜色为黄色
End With
App.Visible = True

自己再去看看怎么通过range获取指定单元格

下一主题 >> << 上一主题

主题：如何用vba设置excel单元格背景色