44问答网
所有问题
用VBA如何实现在EXCEL中某一区域内所有空单元格中填充颜色
如题所述
举报该问题
推荐答案 推荐于2016-08-01
亲,测试效果和代码如下:
Sub tc()
Dim rg As Range
For Each rg In Range("A1:D5")
If rg = "" Then rg.Interior.Color = RGB(0, 255, 255)
Next
End Sub
温馨提示:答案为网友推荐,仅供参考
当前网址:
http://44.wendadaohang.com/zd/DVKYRWWKKZDKZZWDV3.html
相似回答
EXCEL中如何用VBA
将某个
单元格填充颜色
?
答:
cells(x,1).interior.colorIndex = 3'单元格值等于6时,该
单元格填充
红色 end if next x end sub 方法二:简单一点,假设数据在A1~A10,取6这个值 sub xxx()for i=1 to 10 if cells(i,1)=6 then cells(i,1).interior.colorindex=3 next i end sub 方法三:如果你
的
...
再
Excel中
,
如何
用条件格式或者
VBA
,指定
某单元格
内一部分字符变
颜色
答:
值得注意的是,
如果单元格中的内容是数字,需要将其格式先设置为文本,否则VBA设置的颜色可能因数字格式化而无法显示
。设置单元格格式为文本的具体操作是,选择相应单元格,右击选择“格式单元格”,在弹出的对话框中选择“文本”格式,然后应用。这个例子展示了如何通过VBA代码实现单元格内容部分颜色的改变。...
如何
批量设置
EXCEL某
个
单元格
内数字后几位
的颜色
(
用VBA
或者函数都可以...
答:
打开你
的excel
表,假设你的数据在sheet1,按ALT+F11,进入VBE,双击左上角的sheet1,在右侧的空白处录入下面的代码。Sub aa()For Each c In UsedRange '遍历所以有数据
的区域
If Len(c.Value) > 0 Then '如果
单元格
不为空值,进行变色 c.Value = "'" & c.Value '将单元格数字转...
excel
为
所有
工作表
的某一单元格填充颜色
答:
可以使用VBA来完成,打开工作簿,
按Alt+F11,双击左侧工程窗口中的某个工作表,将下面代码复制到右侧的代码窗口,再点击上面的运行按钮
,即可对所有工作表中单元格内容为A的单元格填充紫蓝色 sub FillA()Dim rng As Range, i As Integer, iworksheets As Integer iworksheets = ThisWorkbook.Sheets....
大家正在搜
相关问题
EXCEL中如何用VBA将某个单元格填充颜色?
EXCEL中,如何用VBA统计某一区域空白单元格的数量,并填...
excel用VBA程序怎么一个文件夹中的所有工作簿的特定单元...
EXCEL中如何用VBA将某个单元格填充颜色,也就是高亮显示...
EXCEL如何用VBA设置符合条件的单元格填充颜色为红色?
Excel 如何用VBA写A列中某个单元格与项中相同值自动填...
在VBA中如何编程实现:Microsoft Excel工作薄...
EXCEL中,如何将某列中满足特定条件的单元格填充颜色?