ｖｂａ セレクション

質問

ｅｘｃｅｌｌでＶＢＡで
今ある列の連続した範囲(仮に$D$2：$D$8とか、$B$3：$B$7)とかがセレクトされているとする。
そのセレクトされている状態をマクロで処理し、そこに例えば$D$2：$D$8の場合は、順に２，３，４，５，６，７，８という数字を表示したい。その回答として

Sub test1()
For Each c In Selection
c.Value = c.Row
Next
End Sub

あるいはSub test2()
With Selection
.Formula = "=ROW()"
.Value = .Value
End With
End Sub
でできるのですが、
順に２，３，４，５，６，７，８という数字を表示のところを(2)，(3)，ーー，(8)と（　）を付けて表示するにはどうすればいいか。

回答No.1

kokorone · ベストアンサー

疑うわけではありませんが、質問の書き方が紋きりスタイルということは、何かの設問ですか？
c.Value = c.Row　→　　c.Value = "(" & c.Row & ")"
Value = .Value　→　　Value = "(" & .Value　 & ")"
これでいかが？