[VBA ] 設定格式化條件

看板Visual_Basic作者 ( )時間10年前 (2014/01/22 23:57), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/1
請問各位 我的資料形式類似如下 C1 C2 C3 C4 C5 C6 . . . .. .. . SPEC_L SPEC_H R1 5 9 1 6 7 11 R2 R3 R4 6 11 2 8 10 15 R5 R6 . . . 大概就是每三列會重複一次 每一次的SPEC都不一樣 然後 我希望在那一列之後的數值能跟SPEC_L&H比較 不在範圍內的就變色 因為之後可能會在新增資料或是變更 所以希望能用巨集的形式去做 而不手動去改格式 我的程式如下 SPEC_L = Sheets("Summary Format").Cells(2 + 3 * i, 7).Value SPEC_H = Sheets("Summary Format").Cells(2 + 3 * i, 8).Value Sheets("Summary Format").Select Cells(2 + 3 * i, 10 + Current_grade).Select Selection.FormatConditions.Delete Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlNotBetween, _ Formula1:="SPEC_L", Formula2:="SPEC_H" ^^^^^^ ^^^^^^ Selection.FormatConditions(1).Font.ColorIndex = 3 問題在我執行時 程式沒辦法接受SPEC_H&L ? 我也不確定是不是這個錯誤 因為我是先用錄寫 再借用它的程式 假如有更好的方式 也請各位不吝賜教 感謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 180.177.13.252
文章代碼(AID): #1It-fv1W (Visual_Basic)