返回列表 上一主題 發帖

[發問] Interior.ColorIndex = xlNone

a703130

帖子
97 
主題
32 
精華
0 
積分
167 
點名
0  
作業系統
WinXP 
軟體版本
Office2003 
閱讀權限
20 
性別
男 
註冊時間
2011-3-22 
最後登錄
2017-8-16 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2014-12-26 22:56 | 只看該作者

[發問] Interior.ColorIndex = xlNone

請教各位大大

我想要判斷單一儲存格的顏色除了 "未填滿" 或是 "白色" 就做哪些事情

如果有個儲存格cells(1,2), 我先手動設成"無填滿", 之後做以下判斷

If (cells(1,2).Interior.ColorIndex = xlNone) or (cells(1,2).Interior.ColorIndex = 2) then
    Msgbox("無顏色")
Else
    Msgbox("有顏色")
Endif

但是 程式都會判定成有顏色, debug 後發現, 程式將未填滿定義成   cells(1,2).Interior.ColorIndex = -4142

是否我要將 xlNone 改成 -4142 ???
收藏 分享

a703130

帖子
97 
主題
32 
精華
0 
積分
167 
點名
0  
作業系統
WinXP 
軟體版本
Office2003 
閱讀權限
20 
性別
男 
註冊時間
2011-3-22 
最後登錄
2017-8-16 
4#
發表於 2014-12-28 18:50 | 只看該作者
謝謝, 問題已解決

TOP

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
3#
發表於 2014-12-27 06:22 | 只看該作者
回復 1# a703130


   
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

owen06
　暱稱: 阿軒

中學生Rank: 2

帖子
396 
主題
12 
精華
0 
積分
425 
點名
0  
作業系統
Win10 
軟體版本
Office 2016 
閱讀權限
20 
性別
男 
來自
台中 
註冊時間
2013-7-2 
最後登錄
2024-8-23 

2015羊年全勤獎章2014馬年全勤獎章熱烈參與勳章
2#
發表於 2014-12-27 00:12 | 只看該作者
回復 1# a703130


    是的，改成-4142就符合了

TOP

        靜思自在 : 一個人的快樂．不是因為他擁有得多，而是因為他計較得少。
返回列表 上一主題