麻辣家族討論版版 » Excel程式區 » 文字返回原來設定顏色

返回列表下一主題上一主題發帖

[發問] 文字返回原來設定顏色

中學生 Rank: 2

帖子: 99
主題: 18
精華: 0
積分: 164
點名: 167
作業系統: Win 10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2019-1-17
最後登錄: 2026-10-13

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2024-3-21 10:42 | 顯示全部帖子

[發問] 文字返回原來設定顏色

Set xA = Intersect(Target, Range("C:C"))
If Not xA Is Nothing Then
For Each xR In xA
Range(Cells(xR.Row, 1), Cells(xR.Row, 9)).Font.ColorIndex = 3 ^ -((xR Like "*假") + (xR = "出差") + (xR = "否") <> 0)
Next
End If

請問怎麼在不是這些條件需求的時候返回原來選擇的文字顏色

謝謝~

樓主熱帖

收藏

中學生 Rank: 2

帖子: 99
主題: 18
精華: 0
積分: 164
點名: 167
作業系統: Win 10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2019-1-17
最後登錄: 2026-10-13

2^#

發表於 2024-3-21 14:01 | 顯示全部帖子

回復 2# Andy2483

感謝Andy2483大抽空回覆，
但選擇了不是條件內的選項結果還是紅色...並沒有返回原先的文字顏色

中學生 Rank: 2

帖子: 99
主題: 18
精華: 0
積分: 164
點名: 167
作業系統: Win 10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2019-1-17
最後登錄: 2026-10-13

3^#

發表於 2024-3-21 14:26 | 顯示全部帖子

本帖最後由 wayne0303 於 2024-3-21 14:28 編輯

回復 4# Andy2483

例如我原先設定是綠色(手動選擇)，選擇"不是"代碼條件內的選項所顯示的文字顏色就希望是返回綠色

謝謝~

中學生 Rank: 2

帖子: 99
主題: 18
精華: 0
積分: 164
點名: 167
作業系統: Win 10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2019-1-17
最後登錄: 2026-10-13

4^#

發表於 2024-3-21 14:40 | 顯示全部帖子

回復 6# Andy2483

所以還是必需有原來文字顏色的設定就是了。了解！

感謝Andy大~

中學生 Rank: 2

帖子: 99
主題: 18
精華: 0
積分: 164
點名: 167
作業系統: Win 10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2019-1-17
最後登錄: 2026-10-13

5^#

發表於 2024-5-21 12:00 | 顯示全部帖子

回復 9# 准提部林

謝謝版主~

靜思自在 : 看別人不順眼，是自己修養不夠。

返回列表下一主題上一主題