Excelのマクロ

質問

Excelのあるセルに、12345という数字があった時、これをマクロ(Visual Basic)を使って赤文字にするのは出来るのです。ただ、1だけ赤、23を緑、45を黄というように、セル内でも数字を分割して扱うことは出来るのでしょうか？
もしよろしければ、教えて下さい。

回答No.2

popesyu

数字は１文字単位で分割して書式を設定することは出来ません（数字はバラバラにして扱うものではないですから）。

文字列なら可能です。
A1セルに"あいうえお"と入っている場合
※あるいは"'12345"でも。
---
Set R = Range("A1")
R.Characters(1, 1).Font.ColorIndex = 1
R.Characters(2, 1).Font.ColorIndex = 2
R.Characters(3, 1).Font.ColorIndex = 3
R.Characters(4, 1).Font.ColorIndex = 4
R.Characters(5, 1).Font.ColorIndex = 5

回答No.1

Admiral

数字を数値でなく文字列としてよければ、
Cells(1, 1).Characters(Start:=1, Length:=1).Font.ColorIndex = 3
Cells(1, 1).Characters(Start:=2, Length:=2).Font.ColorIndex = 4
Cells(1, 1).Characters(Start:=4, Length:=2).Font.ColorIndex = 6
でどうでしょうか？