マクロ 各シートからシート1に戻るボタンを設置する
各シートの同じ位置に「シート1に戻る」ボタンを付けるマクロを実行したいです。
前回教えていただいたことから、ボタンを設置するマクロはわかったのですが、
『2枚目以降のシートから、シートが終わるまで、各シートにボタンを設置する』マクロがわかりません。
1枚目は目次?的なページですので、
2枚目以降から、シートが終わるまで、決められた位置に「戻る」ボタンをつける。
という作業をマクロに記憶させたいと考えています。
※下記は、こちらで教えていただいたものを参考にしたマクロです。
「戻る」という言葉をどこに入れてよいかもわからりません。
・・・・・・・・・・・・・・・・・・・・・・・・・・・
Sub 戻るボタン設置()
With ActiveSheet
For i = 1
'幅140、高さ20のボタンを追加
.Buttons.Add(145 * i, 120, 140, 20).Text = i
Next i
End With
End Sub
お礼
Visual Editorは知りませんでした。とても便利そうですね。さっそくインストールしてみます。ありがとうございました。