作者s881718 (除念 何必争长短)
看板Visual_Basic
标题[VBA ] IF 用法
时间Fri Dec 29 16:37:39 2017
我想用如果字体是黄色 另一个储存格变2,却没跑出,我想请问大家这是为什麽
以下是程式码
If Cells(3, 9).Font.Color = -16711681 And Cells(3, 9).Font.TintAndShade = 0
Then Cells(3, 10) = 2
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 111.248.165.203
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1514536661.A.361.html
1F:推 manforwan: endif 12/29 18:47
2F:推 napyang: 打在同一行的话end if可以省略喔!试试看把and後面的条 12/29 19:09
3F:→ napyang: 件砍掉吧,可能被这个条件影响了(或者你的颜色码是错 12/29 19:09
4F:→ napyang: 的 12/29 19:09
5F:→ vincent0926: 也要注意if写在什麽事件,例如当工作簿储存格发生的 12/29 21:48
6F:→ vincent0926: 改变时执行 12/29 21:48
7F:推 notsag: Debug.Print Cells(3,9).Font.Color 会得65535 12/30 21:17