エクセルのマクロの相対範囲の設定の仕方を教えて頂きたいです。
（例）
Sub
Range(”B1:B5).Select B1:B5の範囲選択
Selection.Copy コピー
Range(”C1”).elect Ｃ1選択
ActiveSheet.P ste 貼り付け
Range(”D1:D5”).Select D1:D5の範囲選択
Selection.ClearContents 削除
End Sub
以上のプログラムをA?:A??を範囲選択して
マクロを実行させると以下自動的に
① Ｂ?:B??を選択・コピー
② C?選択・貼り付け
③ D?:D??選択・削除
にする方法を教えて下さい。
※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。
ログインして回答する
みんなの回答
-
akibare
満足20pt
こんな感じでどうぞ。
Sub MacroNumberOne()
Dim r1, r2, r3, r4 As Range
Set r1 = Selection
Set r2 = r1.Offset(1)
Set r3 = r1.Offset(2)
Set r4 = r1.Offset(3)
r2.Select
r2.Copy
r3.Select
r3.PasteSpecial
r4.ClearContents
End Sub
- その他の回答を読む
まだオープンされてない回答
この質問へのコメント
質問の情報
- 登録日時
- 2005-07-25 23:02:29
- 終了日時
- --
- 回答条件
- 回答にURL必須 1人2回まで
この質問のカテゴリ
この質問に含まれるキーワード
人気の質問
-
高二男子です。なんか最近知らない女性によく話しかけられます。要件はそんなに大したことじゃなくただlin…
匿名質問者
1
-
岳父(がくふ)というと、妻の父です。妻の母は、丈母(じょうぼ) でもよいようです。さて、①夫の父は、何と…匿名質問者
-
アメリカ本土は、４つの時間があるようですが、同じ州なのに、ふたつに分かれているところがあります。銀行…匿名質問者
-
2025年3月のJR東海ダイヤ改正で最も可能性の高い内容はどれでしょうか？ １ 315系東海道線・御殿場線・身延…匿名質問者
-
2025年3月のJR東日本のダイヤ改正で最も可能性の高い内容はどれでしょうか？ 1 中央線快速グリーン車サービ…
KUWA