使用自訂函數可以擴充原本Excel沒有的功能,用VBA 寫好程式碼,再加入增益集中即可方便重覆使用。
練習檔及程式碼下載
https://drive.google.com/drive/folders/1ZFOOEUvkn2gqk0rhVZ1xOUliKFyxZX1Y?usp=sharing
◆支持電腦學習園地 加入YouTube會員→https://pros.is/joinnow
✅購買完整課程內容
https://shopee.tw/alyoou
➡️訂閱我們的頻道
主頻道:https://pse.is/pclearncenter
OFFICE辦公室應用: https://pse.is/office
AutoCAD電腦製圖: https://pse.is/AutoCAD
美工設計: https://pse.is/PSAI
軟體應用: https://pse.is/soft
影片剪輯: https://pse.is/mclip
➡️FB粉絲團
https://www.facebook.com/pclearncenter
推薦課程
【illustrator CC AI基礎教學】
https://www.youtube.com/watch?v=fA4LTxGpOH0&list=PLwwPq48LW7z-2MFp-jA1a_IQLU7fe9ZjT
【PowerPoint PPT教學】
https://www.youtube.com/watch?v=rKNStKEFoW0&list=PLwwPq48LW7z-Rp_6BCqHTXha3F-BPpAPw
【Microsoft Excel教學】
https://www.youtube.com/watch?v=Vl0febV7Kmc&list=PLwwPq48LW7z_uFzBKXFsU0KZqSP7Ky_Up
【Excel VBA程式設計教學】
https://www.youtube.com/watch?v=bUNP9lVbSWc&list=PLwwPq48LW7z_vK171m2neLyz0GzyqRCZH
【Micorsoft Word教學】
https://www.youtube.com/watch?v=J8PpOwwcK7Q&list=PLwwPq48LW7z86-TqMtDejWBKjZD9u1_Rj
【PS教學Photoshop】
https://www.youtube.com/watch?v=kbMyyt8WS6M&list=PLwwPq48LW7z9lyFs6xEiae4uDddWJ1x9e
【會聲會影X9 影片剪輯教學】
https://www.youtube.com/watch?v=QfcXIC_l33Q&list=PLwwPq48LW7z8CNIHEPi3lrQwJMAv-ceiW
【AutoCAD製圖教學】
https://www.youtube.com/watch?v=W7kGvMBgdEs&list=PLwwPq48LW7z_g02sbOzipI3_y1HIyXEUN

vba儲存格顏色 在 [VBA ]求救!要如何判斷儲存格底色? - 看板Visual_Basic 的推薦與評價
版本:Microsoft Office 2007
本人為剛接觸VBA新手
目前使用錄製巨集
錄製<格式化條件>
程式如下
Range("B4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlBetween, _
Formula1:="=100", Formula2:="=50"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 5296274
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
上面表示選取範圍儲存格內數字介於50~100,底色變為淺綠色
這邊有個疑問想請教!
如何下判斷,當範圍內皆為淺綠色跳出MSGBOX顯示"OK"
以下為自己寫的判斷式(下列皆無法有效判斷)
If Range("B4").Interior.Color = RGB(146, 208, 80) Then
MsgBox "OK"
End If -------無法判斷
If Range("B4").Interior.Color = 5296274 Then
MsgBox "OK"
End If -------任何顏色都會顯示OK
這邊先是測試單一儲存格能否做判斷,最終是要判斷範圍內所有儲存格
PS:淺綠色RGB(146,208,80)
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.241.172.206
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1559312106.A.84E.html
... <看更多>