colorindex对应56个值,小于1就是无色了! 大于56就要报错了,大家可以测试! 下面时演示代码: Sub 按钮1_Click() r = 1 c = 1 For j = 1 To 56 r = r + 1 Cells(r, c).Interior.ColorIndex = j Cells(r, c + 1) = j If r = 15 Then r = 1 c = c + 2 End If Next j End Sub...
Range("B4:B13").Font.ColorIndex = 3 [3is theColorIndexofRed.] ⧭Output: Run this code, and you’ll find the font color of the rangeB4:B13turnedred. Example 3 – Set the Cell Border Color Using ColorIndex in Excel VBA We’ll change the color of the border of the rangeB4:B13to...
ActiveWorkbook.Colors(39) = RGB(226, 197, 255) ‘修改color index为39的颜色 WorkSheets(1).Cells(1,1).Value.Interior.ColorIndex = 39 ‘将cell A1的值设置为color index为39的颜色
Cells(t, i).Interior.ColorIndex = 19 * (i - 1) + t - 1 Next Next MsgBox ("ok!") End Sub 下面是代码录入后的截图:步骤2 在工作表sheet1中,画个圆,右键连上上面的”YS”宏:步骤3. 点击圆按钮,查看效果:非常的漂亮,和图1一样,这就是VBA中利用Interior.ColorIndex方法的简单介绍,实...
Cells(t, i).Interior.ColorIndex = 19 * (i - 1) + t - 1 Next Next MsgBox ("ok!") End Sub 下面是代码录入后的截图: 步骤2 在工作表sheet1中,画个圆,右键连上上面的”YS”宏: 步骤3. 点击圆按钮,查看效果: 非常的漂亮,和图一显示是一样。这就是VBA中利用Interior.ColorIndex方法的简单介绍...
1 首先需要建立一张空白表格,然后再界面下创建一个按钮控件,以便可以体现ColorIndex =11部分属性的情况,如下图所示:2 点击鼠标右键,找到指定宏,进入到EXCEL的vba的project项目模式下,如下图所示:3 找到指定宏后,就可以进入到vba的project项目模式下,在模块中编写可以体现ColorIndex =11部分属性的代码,如下...
1 首先建立一个空白的EXCEL表格,并设置简单的按钮控件,以便可以执行ColorIndex=xlAutomatic属性代码,如下图所示:2 点击鼠标右键,进入到指定宏的界面下,新建模块,以便可以执行代码,如下图所示:3 接下来就是进入到vba的project项目模式下,可以编写代码的界面,如下图所示:方法/步骤2 1 接下来就是编写代码,...
使用VBA在Excel中着色一系列单元格,可以通过以下步骤实现: 1. 打开Excel,并在需要着色的工作表中选择要着色的单元格范围。 2. 按下Alt+F11打开Visual Basic编辑器。 ...
ColorIndex 表達 代表Borders 物件的變數。 註解 如果四條框線的色彩都不同,則此屬性會傳回 Null。 該色彩可指定為目前調色盤中的索引值,或可以為下列其中一個 XlColorIndex 常數:xlColorIndexAutomatic 或xlColorIndexNone。 支援和意見反應 有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並...
接下来,介绍在EXCEL中利用VBA自动控制颜色显示的方法:步骤1:打开宏编辑界面,点击“ALT+F11”,在模块中插入代码。代码如下:Sub YS()Sheets("SHEET1").Select For i = 1 To 3 For t = 1 To 19 Cells(t, i).Select Cells(t, i).Interior.ColorIndex = 19 * (i - 1) + t - 1 ...