ｅｘｃｅｌ ｖｂａ セレクションされている範囲に対する処理

質問

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

Selection.addressというのを使用して処理するのでしょうか、教えてください。

回答No.1

n-jun · ベストアンサー

Sub test()
With Selection
.Formula = "=ROW()"
.Value = .Value
End With
End Sub
このことですか。

お礼

はい、そのとおり。うまくいきました。
おかげで解決しました。どうもありがとうございました。

回答No.3

xls88

こんな風にもできるようです。

Sub test()
　　Dim i As Long
　　For i = 1 To Selection.Count
　　　　Selection(i).Value = Selection(i).row
　　Next i
End Sub

お礼

皆さん、すべてとても参考になりました。どうもありがとうございます。

回答No.2

okormazd

下記のようなことですか。

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

お礼

はい、そのとおり。うまくいきました。
おかげで解決しました。どうもありがとうございました。