請教VBA改儲存格顏色的函數是?

cooldean · 2004-08-24, 04:07 PM

改字的顏色是
selection.cells(x,y).font.indexcolor=3
那請問要改儲存格顏色是?
謝謝thz ~~~

mini · 2004-08-25, 01:21 PM

VB是 .BackColor 屬性
比如
obj.BackColor=RGB(255,0,0)

VBA 就不知了 (應該也可以)

劍痞憶秋年 · 2004-08-25, 01:32 PM

泥應該是問 Excel VBA 吧

(1)用錄製巨集的結果：
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
(2)經小弟測試簡化：
Selection.Interior.ColorIndex = 3

cooldean · 2004-08-25, 10:30 PM

引用:

原文由劍痞憶秋年所發表
泥應該是問 Excel VBA 吧

(1)用錄製巨集的結果：
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
(2)經小弟測試簡化：
Selection.Interior.ColorIndex = 3

=======================================
喔!!收護良多，原來有用錄製巨集找到程式的方法！謝謝大大
幫了一個大忙

劍痞憶秋年 · 2004-08-25, 11:27 PM

引用:

原文由 cooldean 所發表
=======================================
喔!!收護良多，原來有用錄製巨集找到程式的方法！謝謝大大
幫了一個大忙

啊哈，好說好說，不用客氣！
教學相長囉！！相信泥應該可以藉由錄製巨集玩出很多功能∼∼
當不知道時 or 不太熟 or 不想企記時，都可以用到它，真是不錯的功能！
目前好像是 Excel 的獨家功能(PS:偶沒用過 Office 2000之後的版本)

2004-08-24, 04:07 PM	#1
cooldean 長老會員榮譽勳章勳章總數3 UID - 7638 在線等級: 註冊日期: 2002-12-09 文章: 138 精華: 0 現金: 10626 金幣資產: 19636 金幣	請教VBA改儲存格顏色的函數是? 改字的顏色是 selection.cells(x,y).font.indexcolor=3 那請問要改儲存格顏色是? 謝謝thz ~~~

	送花文章: 101, 收花文章: 38 篇, 收花: 72 次

2004-08-25, 01:21 PM	#2 (permalink)
mini 管理版主榮譽勳章勳章總數17 UID - 4144 在線等級: 註冊日期: 2002-12-07 文章: 13246 精華: 0 現金: 26235 金幣資產: 3024045 金幣	VB是 .BackColor 屬性比如 obj.BackColor=RGB(255,0,0) VBA 就不知了 (應該也可以)

	送花文章: 1999, 收花文章: 7956 篇, 收花: 26748 次

2004-08-25, 01:32 PM	#3 (permalink)
劍痞憶秋年長老會員榮譽勳章勳章總數4 UID - 15 在線等級: 註冊日期: 2002-12-06 住址: 步雲崖文章: 280 精華: 0 現金: 15847 金幣資產: 20867 金幣	泥應該是問 Excel VBA 吧 (1)用錄製巨集的結果： With Selection.Interior .ColorIndex = 3 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With (2)經小弟測試簡化： Selection.Interior.ColorIndex = 3
	__________________ 一切有為法如夢幻泡影如露亦如電應作如是觀
	送花文章: 150, 收花文章: 33 篇, 收花: 130 次

主題工具
顯示可列印版本郵寄本頁給好友
顯示模式
平板模式切換到混合模式切換到樹形模式

Google 提供的廣告