ID非公開
ID非公開さん
2021/1/29 13:00
1回答
マクロについて質問です
マクロについて質問です 以下のようにひとつずつクリックして数字（p6→P7）のように変更していくのですが、一括でp6→p7にしたら他のqrや違うセルにあるPも7に自動で変更できるようにできないでしょうか？ Range("E14").Select ActiveCell.FormulaR1C1 = "=INDIRECT(RC27&""!p7"")" Range("F14").Select ActiveCell.FormulaR1C1 = "=INDIRECT(RC[21]&""!q7"")" Range("G14").Select ActiveCell.FormulaR1C1 = "=INDIRECT(RC[20]&""!r7"")" Range("J14").Select ActiveCell.FormulaR1C1 = "=INDIRECT(RC28&""!p7"")" Range("N14").Select
Visual Basic・20閲覧
ベストアンサー
すべてINDIRECT関数なのでしょうか。 であればわざわざマクロにしなくても、どこかのセルに行番号を入れておき、それを変更すれば一括で変更できます。 例えばセルA1に「6」と入れておき セルE14の式は =INDIRECT(RC27&"!p"&$A$1) セルF14の式は =INDIRECT(RC[21]&"!q"&$A$1) セルG14の式は =INDIRECT(RC[20]&"!r"&$A$1) セルJ14の式は =INDIRECT(RC28&"!p"&$A$1) と変更しておきます。 こうしておけば、セルA1の値を「6」→「7」と変更するだけで参照先が変わります。
質問者からのお礼コメント
ありがとうございました！ うまくいきました！ 勉強になりました！
お礼日時：1/29 15:34
