資料作成に役立ちそうなマクロを作ってみた
1. マクロを作成しようと思ったきっかけ
設計書などの資料をエクセルで作成する際、以下のような点で困ることがある。
- レビュー前などに、ブック内の全シートの選択セルをA1にする。
- 文字列検索した際にオブジェクト内の文字やシート名は検索されない。
2. 今回作成したマクロ
- ブック内の全シートの選択セルをA1にする
3. 作成手順
3.1. 個人用ブックで「マクロの記録」を行う。
3.2. 以下の項目の入力を行う。
項目名 | 入力内容 |
---|---|
マクロ名 | 任意のマクロ名 |
ショートカットキー | マクロを実行するショートカット |
マクロの保存先 | 個人用マクロブック |
3.3 「マクロの記録」を終了する。
3.4 記録したマクロにロジックを記述する。
' ブック内の全シートの選択セルをA1にし、倍率を100%にする
Sub focusOnA1()
' ループ変数
Dim targetSheet As Object
' ブック内のシートでループ
For Each targetSheet In ActiveWorkbook.Sheets
targetSheet.Activate
ActiveSheet.Range("A1").Select
ActiveWindow.Zoom = 100
Next targetSheet
' ブック内の先頭シートをアクティブにする
Sheets(1).Select
End Sub
4. ソースコードについては以下を参照
5. 参考にしたサイト
こちらは当人のブログ よねらぼ です。
プログラミングに関する情報を発信していますので、よければ読んでください。
Author And Source
この問題について(資料作成に役立ちそうなマクロを作ってみた), 我々は、より多くの情報をここで見つけました https://qiita.com/obscure723/items/71dc4083ed8f4c5de9c3著者帰属:元の著者の情報は、元のURLに含まれています。著作権は原作者に属する。
Content is automatically searched and collected through network algorithms . If there is a violation . Please contact us . We will adjust (correct author information ,or delete content ) as soon as possible .