2022年6月6日
给所选区域单元格的某部分固定文字改变颜色
摘要： Public Sub ChgTxtColor() Set myRange = Range("A1:A100") '検索範囲 substr = "(RD)" '赤になる文字 txtColor = 3 '文字色 For Each myString In myRange lenstr = Len(mySt 阅读全文
posted @ 2022-06-06 17:16 人鬼情未了 阅读(147) 评论(0) 推荐(0)