
... <看更多>
Search
VBA 中显示消息框实在太简单了,一句MsgBox就可以了。 千篇一律的风格,不能漂亮一点儿吗?我们来给它点儿颜色看看,哈哈Private Declare Function ...
#2. msgbox字体及颜色-Excel VBA程序开发-ExcelHome技术论坛
msgbox 字体及颜色请问各位老师,msgbox能不能设置字体大小及颜色,如果能,怎么个格式,谢谢!Excel VBA程序开发,ExcelHome技术论坛.
#3. excel - VBA 更改MsgBox 中的文本颜色 - IT工具网
我想从MsgBox 更改字体颜色 为了理解我想要什么,我选择了这个例子: Dim a As Integer Dim b As Integer Dim c As Integer Dim results As String a = InputBox("Enter ...
#4. excel vba:VBA更改MsgBox中的文字颜色- Codebug
我想从MsgBox更改字型颜色要了解我想要的內容,我選擇了以下示例:' 我想.
#5. VBA更改MsgBox中的文本顏色 - 开发者知识库
I want to change the font color from MsgBox我想從MsgBox更改字體顏色To understand what I want i chose this.
#6. 基於單元格顏色的vba msgbox單元 - 優文庫
我想創建一個宏以msgbox打開電子表格時使用紅色填充的所有單元格,我目前有下面但它甚至不顯示msgbox,任何想法? Sub test() Dim ws As Worksheet Set ws = Sheets(
#7. 新年第一问: 能否定义msgbox 字体的颜色,大小? - Excel VBA开发
首先我祝论坛的各位朋友及长期无私帮助我们学习vba的老师们,新春快乐,新的一年有新的起点和目标.我今天的问题是能否定义vba中msgbox中字体的颜色和 ...
#8. VB改变MsgBox对话框的字体、颜色、背景图片。 - 360Doc
VB改变MsgBox对话框的字体、颜色、背景图片。 2019-10-19 | 阅: 转: | 分享 ...
#9. 在EXCEL中如何判斷顏色取值?(VBA) - PCZONE 討論區
在A1輸入值,在B1設格式化條件:如果A1>50時,B1變成紅色,當A1輸入60,ENTER或右移儲存格後,B1變成紅色時出現對話框MSGBOX ("大於50"),請問這段VBA如何寫?
#10. 色彩常數
2021年6月7日 — 另請參閱. RGB 函數 · 常數(Visual Basic for Applications). 支援和意見反應. 有關於Office VBA 或這份文件的問題或意見反應嗎?
#11. MsgBox 的顏色問題- 藍色小舖BlueShop
Access是使用VBA→VB6 比較無法實做該對話方塊類別, 要呼叫WindowAPI喔! 本篇文章回覆於2007-03-05 08:46. == 簽名檔== --未登入的會員無法查看對方 ...
#12. MsgBox 二三事... @ Excel VBA Comics - 隨意窩
1. 想改變MsgBox 字體與字型大小2. 想讓MsgBox2秒鐘後自動關閉@ @ crdotlin.
#13. excel vba文字顏色 - 軟體兄弟
MsgBox “顯示Excel目前的標準文字尺寸” MsgBox ... MsgBox “依序(1~56的顏色索引編號)變更儲存格範圍內文字的顏色” For i = 1 To 56, 有關於Office VBA 或這份文件的 ...
#14. Excel 2003的VBA公式可根据字体颜色粘贴特殊值 - 码农家园
VBA formula for Excel 2003 to paste special values based on font color我正在尝试使用VBA创建一个宏,该宏在被调用时将扫描工作表中所有填充的 ...
#15. vb/vba顏色和RGB顏色互轉 - 人人焦點
defaultColor =GetSysColor(COLOR_WINDOWTEXT) '將系統顏色設置爲紅色 SetSysColors CHANGE_INDEX,COLOR_WINDOWTEXT, vbRed MsgBox "錯誤", vbCritical, " ...
#16. EXCEL的顏色代碼、顏色索引值與顏色對照表 - 浮生如夢
顏色 代碼表( 一) 顏色代碼表( 可以反白複製) aliceblue antiquewith aquamarine azure ... EXCEL VBA:儲存格的格式設定. = ...
#17. 根據達成率分紅藍綠三種進度條(不同數據顯示不同顏色)
【20170727】VBA宏:根據達成率分紅藍綠三種進度條(不同數據顯示不同顏色) ... Sub 進度條(). 進度條分三種顏色宏. 清除所有規則 ... MsgBox (i).
#18. Excel VBA 8.33 重複項多種顏色展示不同資料不同顏色 - 日間新聞
Excel VBA 8.33 重複項多種顏色展示不同資料不同顏色. 前景提要 ... InputBox("請選擇單元格區域", "區域的選擇", , , , , , 8). rng.Interior.
#19. 標記顏色-VBA條件格式法_愛上Excel合夥人- 微文庫
標記顏色-VBA條件格式法 ... 值1 到值14區域中數據進行判斷並填充顏色, ... MsgBox "運行完畢,用時:" & Format(Timer - myTim, "0.0000") & vbCr _.
#20. 04 用VBA修改多重顏色字型底色框線粗體 - YouTube
#21. VBA ColorIndex:添加一些颜色到您的电子表格 - bob外围网址
vba颜色 索引 当您每天使用Microsoft Excel时,最令人沮丧的经历之一是无法在需要时找到所需的数据。当然,搜索和排序电子表格的内容有多种方法,因此您最终会找到您要 ...
#22. 小白入門excel VBA第三課,程序的結果輸出msgbox - 每日頭條
第一種VBA結果直接作用在工作簿,工作表或是單元格中諸如:對單元格賦值,填充顏色等Subinput2=12Range.Interior.Color=vbGreenEndSub單元格結果第二 ...
#23. VBA中的彩色消息框 - 台部落
VBA 中顯示消息框實在太簡單了,一句MsgBox就可以了。 千篇一律的風格,不能漂亮一點兒嗎?我們來給它點兒顏色看看,哈哈Private Declare Function ...
#24. Excel VBA 程式設計教學:事件(Events)
在 Workbook_Open 子程序中,填入當活頁簿開啟時所要執行的程式碼,這裡我以一行簡單的 MsgBox 輸出訊息作為示範。 MsgBox "Hello, Event." Open 事件程式 ...
#25. Excel – VBA 根据内容填充cell颜色 - Python成神之路
Rem MsgBox ("cNo:" & cNo & " " & "rNo:" & rNo & "") Rem End Dim iValue, iPlanStart, iPlanEnd As Date Dim iStatus As String.
#26. Excel VBA抓取儲存格內不同顏色部分字串
搜尋顏色標為紅色的字串,並將抓取字串相加後存在另一個表 ... 'MsgBox "原始可新增=" & 可新增新增工作表名稱= "不用新增"
#27. EXCEL VBA-Chp14_百度文库
EXCEL VBA-Chp14 - 第十四章圖案14-01 建立線條應用範例Sub 建立線條() MsgBox “在 ... 的顏色() i=2 MsgBox “將使用中工作表內第” & i & “ 個圖案的線條顏色變更為藍 ...
#28. Chapter-02 字型 - VBA課程
MsgBox “將儲存格範圍內的文字尺寸設定為20點” Selection.Font. ... MsgBox “依序(1~56的顏色索引編號)變更儲存格範圍內文字的顏色” For i = 1 To 56
#29. 如何用vba判断word文档中是否有高亮(颜色)的文字?
本文介绍了用vba判断word文档中是否有高亮的文字,是否有填充色的文字。 ... HighlightColorIndex <> 0 Then MsgBox "有颜色底纹" End End If Next ...
#30. 怎麼取有顏色儲存格內的值(頁1) - Excel程式區
如何寫一個vba 或是macro 輸入儲存格的顏色(粉色),將sheet中相同顏色(粉色\欄位),然後複製到另一個sheet 中. 請大大們指導.
#31. MsgBox 函数
参数: prompt: String expression displayed as a message in the dialog box. Line breaks can be inserted with Chr$(13). title: String expression displayed in ...
#32. vba判斷word文字顏色是否為藍色 - 萬盛學電腦網
MsgBox "Error number: " + Str$(Err) + Chr(13) + Error$(Err), 48, m_Title. ②第二種代碼. Dim n As Integer, Info As String. With Selection.
#33. 如何在Excel中以不同的顏色突出顯示重複的值? - ExtendOffice
使用VBA代碼以不同的顏色突出顯示一列中的重複值 ... InputBox( "please select the data range:" , "Kutools for Excel" , xTxt, , , , , 8).
#34. [VBA ]求救!要如何判斷儲存格底色? - 看板Visual_Basic - 批踢踢 ...
版本:Microsoft Office 2007 本人為剛接觸VBA新手目前使用錄製巨集 ... Color = 5296274 Then MsgBox "OK" End If -------任何顏色都會顯示OK 這邊 ...
#35. vba判断word文字颜色是否为蓝色的两种代码
ColorIndex = 2 Then MsgBox iChar. Next Exit Sub ErrHandle: MsgBox "Error number: " + Str$(Err) + Chr(13) + Error$(Err), 48, m_Title.
#36. Excel VBA自動建立sheet,設定字型,單元格顏色和邊框
1 Sub link() 2 Dim num, sheetname 3 4 Worksheets(1).Select 5 6 num = WorksheetFunction.CountA(Columns("c:c")) 7 'MsgBox num 8 9 For i = 2 To ...
#37. VB6重點講義
Visual Basic 6.0中文版精選重點講義 ... Msgbox 「訊息文字」,圖示按鈕種類+圖形種類Vbinformation,」標題文字」 【訊息交談窗】 ... 傳回或設定物件背景的顏色.
#38. excel 按鈕顏色
30/1/2015 · 大大們好小弟有寫一個EXCEL來判別目前數值顏色舉個例子:A欄的部份是我 ... 大小調整寬度EXCEL VBA:MsgBox EXCEL VBA:模組的設定EXCEL VBA:列出顏色與 ...
#39. 3.是非題- PowerPoint VBA/電子測驗卷
CommandButton2.BackColor = &H8000000F 設定第二個按鈕的顏色為預設值. If Label1 <> itmno Then 如果題號不等於 itmno 則. MsgBox eropstn 訊息盒顯示:操作程序錯誤.
#40. excel 顏色代碼
)。.2 可以按顏色篩選EXCEL可以根據顏色篩選,并且可以根據非常見顏色篩選顏色 ... VBA:MsgBox EXCEL VBA:模組的設定EXCEL VBA:列出顏色與索引值的程式碼EXCEL的 ...
#41. VBA比函數強大按照單元格顏色計數 - IT145.com
很明顯的啦,VBA也不會有單獨針對這個單元格顏色計數的行數,只是我們自己可以根據 ... InputBox("請選擇單元格區域", "區域的選擇", , , , , , 8).
#42. 如何在Microsoft VBA编辑器中使用自定义颜色? - QA Stack
VBA 从以下注册表项中读取颜色的设置: HKEY_CURRENT_USER \ Software \ Microsoft \ VBA ... FileExists(App.Path&“ \ VB6CodeColours.dat”)然后MsgBox“在&&App.
#43. Excel VBA 8.35针对颜色进行统计?你学了那么多函数
之前我们用VBA的方法将相同数据分别标记了不同的颜色,现在我希望按照颜色 ... Color = vbYellow Then CYELLOW = CYELLOW + 1 End If Next a MsgBox ...
#44. 一起幫忙解決難題,拯救IT 人的一天
[Excel VBA問題] 點擊查詢Tool資訊能跳出機台資訊msgbox ... EXCEL如何再已設定VBA禁止儲存與另存狀況下使用按鈕控制項進行儲存 ... Excel VBA 儲存格顏色移動.
#45. vba-29 利用查找颜色拾取进行颜色汇总 - 知乎专栏
Value: n = n + 1. Next. MsgBox "最后平均分为:" & k / n & "分". End. 100: MsgBox "查找功能没有拾取到颜色!" End Sub. 发布于2019-03-17 06:00. VBA ...
#46. ExcelVBA8-35計數公式有很多,但是並不能實現單元格顏色的 ...
很明顯的啦,VBA也不會有單獨針對這個單元格顏色計數的行數,只是我們自己可以根據 ... InputBox("請選擇單元格區域", "區域的選擇", , , , , , 8).
#47. excel if 顏色
... excel vba:msgbox; excel vba:模組的設定; excel vba:列出顏色與索引值的程式碼; excel的顏色代碼、顏色索引值與顏色對照表; excel vba:儲存格公式裡有excel ...
#48. VBA常用技巧6--使用对话框 - TT LL 印迹
End Sub 代码解析: Mymsgbox过程使用MsgBox函数显示一个消息框。 ... 框,提示用户在工作表中选择一个单元格区域,并改变所选单元格区域内部的颜色。
#49. Excel VBA 範例參考 - 電腦學習園地
Excel VBA 範例參考 ... MsgBox "給單元格設置公式,求B2至B5單元格區域之和" ActiveSheet.Cells(2, 1). ... [範例24]改變所選單元格的顏色
#50. [转载]#Excel VBA#设置网格线颜色_青平罗马 - 新浪博客
设置网格线颜色(GridlineColor属性和GridlineColorIndex属性) Sub setGridlineColor() Dim iColor As Long iColor=ActiveWindow.GridlineColor MsgBox ...
#51. 【攻略】VB教學-msgbox 彈出式訊息方塊 - 巴哈姆特
一個msgbox圖片範例: 有時候會看到八~ 讓我們一起來做做看八如果你只是要做簡單的顯示字串的話: MsgBox("你要顯示的字串") 圖片範例: 如果你想要做出 ...
#52. vba msgbox cells based on cell colour - Stack Overflow
Try to see the RGB colors of the C1 to C11, using the following: Sub WriteCellColor() Dim ws As Worksheet Dim i As Long Set ws = ActiveSheet ...
#53. excel 語法顏色
EXCEL VBA語法,多個顏色改列不同行.2 | Yahoo奇摩知識+, 24/7/2012 ... 隨著視窗大小調整寬度EXCEL VBA:MsgBox EXCEL VBA:模組的設定EXCEL VBA:列出顏色與索引值的 ...
#54. VBA之设置工作表标签的颜色- 小淋 - 博客园
工作表标签[示例01]设置工作表标签的颜色SubSetSheetTabColor()MsgBox'设置当前工作表标签的颜色'ActiveSheet.Tab.ColorIndex=7EndSub[示例0.
#55. msgbox(彈出式訊息方塊)的用法 - 電腦不難
VB如何做到色彩漸層表單? 不能開啟VB6程式?快來安裝VB6 Run-Time吧! Clipboard剪貼簿物件之應用 · VB如何取得某檔案的大小 ...
#56. VBA之设置工作表标签的颜色 - 极客分享
工作表标签[示例01] 设置工作表标签的颜色Sub SetSheetTabColor()MsgBox "设置当前工作表标签的颜色"ActiveSheet.Tab.ColorIndex = 7End Sub[示例02] ...
#57. Excel 2007条件格式- 如何获取单元格颜色? | 经验摘录
12 excel vba excel-2007 excel-vba ... 现在我想询问范围内任何单元格的颜色,例如MsgBox Range("A1").Interior. ... (无论A1的颜色是红色,蓝色,绿色.
#58. VBA循环以查找特定范围内的颜色副本 - Thinbug
我有一个包含很多行的工作文件。每行应该只有一个颜色填充 (RGB 0,204,0) 。我想知道是否可以自动循环(不使用操作按钮)到我的文档中,并通过MsgBox突出 ...
#59. 第5單元…VB的物件應用基本控制項元件
這種快捷鍵定義方法對于選單和許多其它控制項元件同樣適用。 Font 表示控制項元件的字體。 ForeColor 表示控制項元件的顏色。 Enabled 表示控制項元件是否有作用 ...
#60. excel if顏色判斷
Excel VBA,匹配字體顏色和單元格背景顏色; 3. ... 變成紅色時出現對話框MSGBOX 大於50,請問這段VBA如何寫?.2017 · 標題算表分享考勤報表Excel判斷遲到早退打卡沒?
#61. PowerPoint中的VBA:ColorIndex更改文本颜色? - 堆栈内存溢出
我正在使用VBA将Excel中的粘贴数据复制到PowerPoint演示文稿中。 ... 我想从MsgBox 更改字体颜色为了理解我想要什么,我选择了这个例子: “正确”文本出现在MsgBox时, ...
#62. excel 儲存格顏色vba - Mtlcp
使用特定的儲存格色彩使用VBA 計算儲存格的數目2020/3/18 適用於: Excel for ... 時出現對話框MSGBOX (“大於50”),ENTER或右移儲存格後,將游標所在儲存格改變顏色或改 ...
#63. VBA更改MsgBox中的文本颜色- DebugCN
VBA 更改MsgBox中的文本颜色. bob 发表于 Dev. 27. 鲍勃. 我想从MsgBox更改字体颜色. 为了理解我想要什么,我选择了以下示例:. Dim a As Integer Dim b As Integer Dim ...
#64. vba按钮文本颜色 - musou
vba 按钮文本颜色,VBA更改MsgBox中的文本颜色- IT屋-程序员软件开发技术分,我正在寻找一种使用VBA以不同颜色显示UserForm 中TextBox 中的每个字母的方式。
#65. VBA消息框(MsgBox) - 易百教程
VBA 消息框(MsgBox). MsgBox 函数显示一个消息框,并等待用户点击一个按钮,然后根据用户点击的按钮执行相关的操作。 语法. MsgBox(prompt[,buttons][,title][ ...
#66. excel 語法顏色– 顏色色碼 - Booionp
313, 在EXCEL中如何判斷顏色取值?, VBA 在A1輸入值,在B1設格式化條件,如果A1>50時,B1變成紅色,當A1輸入60,ENTER或右移儲存格後,B1變成紅色時出現對話框MSGBOX ...
#67. 如何在变体excel VBA上更改字体颜色? - 错说
如何在变体excel VBA上更改字体颜色? ... 颜色指数= 3 ... Transpose(arrEr) End With Else MsgBox "Nothing to be corrected..." End If End Sub.
#68. 在VBA中設置訪問顏色代碼- 2021 - Peacedaychallenge
如何在Excel / VBA中獲取RGB顏色的相應十六進制值的可能重複項? ... intG, intB) HTMLColour_Exit: Exit Function HTMLColour_Error: MsgBox Err.Description, ...
#69. excel 顏色代碼
文書處理第1頁05 08 2021 · 請問在Excel 2007說明中,如何取得顏色代碼資訊ex. ... 著視窗大小調整寬度EXCEL VBA:MsgBox EXCEL VBA:模組的設定EXCEL VBA:列出顏色與 ...
#70. Excel VBA插入模組程序,寫下第一行MsgBox程式:Hello World
Excel VBA插入模組程序,寫下第一行MsgBox程式:Hello World. 2020-08-04 · VBA自動化; 395 次瀏覽 ... Excel利用小畫家取得網頁顏色,錄製巨集至功能區 ...
#71. vba msgbox - 程序员ITS201
标签: vba msgbox html 标签. 正如Ralph建议的那样,最好在UserForm中显示您的消息,您可以轻松控制文本特征.但是,可以使用系统颜色API更改MessageBox文本的颜色.
#72. 跟我學Excel VBA-從入門變高手(適用2016/2013)(電子書)
RoWHeight=50 ) Range ( " A1 " ) Value = "給點顏色讓您晦瞻態! " '字型格式 With Range("A1").Font .Size = 18 .Bo|d = True .|talic = True .
#73. Excel VBA基礎必修課:商管群最佳程式設計訓練教材(適用Excel 2019~2010)(電子書)
Value '屬性值=12345.67 MsgBox "A1 的 Text 屬性值=" & Range("A1").Text '屬性值=16:04:48 便利貼 ffl 在 Excel VBA 中設定顏色值有下列幾種常用的方式: 1 ...
#74. 如何在EXCEL VBA的工作表隨機上顏色 - 吳老師教學部落格
與批次清除色彩,接有其必要性, 順便補充亂數產生樂透彩的7個數字。 1.VBA上顏色:.
#75. VBA通過顏色對Microsoft Word文檔中的單詞進行計數| 2022
VBA 通過顏色對Microsoft Word文檔中的單詞進行計數 ... lngCountIt + 1 End If End If Next lngWord MsgBox 'Number of ' & Typeface & ' words: ' & lngCountIt.
#76. excel 顏色代碼
VBA 在A1輸入值,在B1設格式化條件:如果A1>50時,B1變成紅色,當A1輸入60,ENTER或右移儲存格後,B1變成紅色時出現對話框MSGBOX 大於50,請問這段VBA如何寫?. excel ...
#77. excel if顏色判斷
Excel VBA,匹配字體顏色和單元格背景顏色; 3. ... 時,B1變成紅色,當A1輸入60,ENTER或右移儲存格後,B1變成紅色時出現對話框MSGBOX 大於50,請問這段VBA如何寫?
#78. 在VBA中設置訪問顏色代碼
我想在滿足某些條件時將顏色更改為紅色。 ... 在VBA中設置訪問顏色代碼 ... intG, intB) HTMLColour_Exit: Exit Function HTMLColour_Error: MsgBox Err.Description, ...
#79. Excel 高效办公:VBA 范例应用 - Google 圖書結果
ColorIndex = 3 '设体颜色为红色 MsgBox "损统计结果汇总成功!", vbOKOnly, " " '弹汇总结果消息对话 End Sub 代码分析上述代码的作用是首先损中“合计” “成本和费用 ...
#80. vba基于单元格颜色的msgbox单元格- Thinbug
vba 基于单元格颜色的msgbox单元格. 时间:2017-09-05 13:55:44. 标签: vba excel-vba colors cell msgbox. 我打算在打开电子表格时为msgbox创建一个带有红色填充的 ...
#81. 以便可以在公式中检测到背景颜色? excel,vba - 秀儿
我正在使用以下代码将B列中的重复值设置为红色。我不记得它的来源。我添加了计数器和msgbox,以查看.
#82. MsgBox是/否Excel VBA | 2021
Excel VBA技巧n技巧46如何使用InputBox · 3好吧,你打電話 MsgBox 兩次,不是嗎? · 對不起你的意思是什麼? · 3刪除 MsgBox question ...
#83. For 循环将图像添加到图像列表, 通过url传递参数, 以动态/编程方式将 ...
... 如何通过url 写入从url 中删除“部分”?, VBA Msgbox - 无默认按钮, pygame 中的 ... 则提示正确的信息颜色为绿色小图标(3)如果输入不是6~16位,提示错误信息颜色 ...
#84. EXCEL VBA的工作表處理--工作表顏色
EXCEL VBA的工作表處理--工作表顏色如何快速的讓工作表加入指定色彩, 讓工作表更加顯目,還可以進一步批次自訂亂數產生色彩, 與批次清除色彩,接有其必要性, ...
#85. excel - VBA 更改MsgBox 中的文本颜色- 程序调试信息网
我想从MsgBox 更改字体颜色 为了理解我想要什么,我选择了这个例子: Dim a As Integer Dim b As Integer Dim c As Integer Dim results As String a = InputBox("Enter ...
#86. excel if 顏色
Excel 中還沒提供按顏色求和的在MS Excel中,默認情況下,前景或文本顏色為黑色。 ... excel vba:msgbox; excel vba:模組的設定; excel vba:列出顏色與索引值的程式 ...
#87. excel if顏色判斷
VBA 在A1輸入值,在B1設格式化條件:如果A1>50時,B1變成紅色,當A1輸入60,ENTER或右移儲存格後,B1變成紅色時出現對話框MSGBOX 大於50,請問這段VBA如何寫?
#88. excel 顏色代碼
用Excel 設計RPG 遊戲,超過2000種敵人05 10 2016 · 這裡介紹如何在Excel VBA 中 ... 視窗大小調整寬度EXCEL VBA:MsgBox EXCEL VBA:模組的設定EXCEL VBA:列出顏色與 ...
#89. excel 顏色代碼
是! excel按篩選顏色的VBA代碼. ... 化條件:如果A1>50時,B1變成紅色,當A1輸入60,ENTER或右移儲存格後,B1變成紅色時出現對話框MSGBOX 大於50,請問這段VBA如何寫?
#90. excel if 顏色 - ギャルav 画像
如果在同一欄當中,使用顏色篩選後即可快速進行加總但是如果資料散落在各處各欄, ... excel vba:msgbox; excel vba:模組的設定; excel vba:列出顏色與索引值的程式 ...
#91. 02 | Excel VBA 指定文字顏色 - 旅遊日本住宿評價
#92. excel if 顏色
Function ColorIndex CellColor As Range excel判定文字顏色excel顏色 ... excel vba:msgbox; excel vba:模組的設定; excel vba:列出顏色與索引值的程式碼; excel的 ...
vba msgbox 顏色 在 [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
... <看更多>