![](https://cdn-ak-scissors.b.st-hatena.com/image/square/6d3d86bb87ba1d6b6622dc9126d930021c90a0c1/height=288;version=1;width=512/https%3A%2F%2Fqiita-user-contents.imgix.net%2Fhttps%253A%252F%252Fcdn.qiita.com%252Fassets%252Fpublic%252Farticle-ogp-background-9f5428127621718a910c8b63951390ad.png%3Fixlib%3Drb-4.0.0%26w%3D1200%26mark64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTkxNiZoPTMzNiZ0eHQ9JUUzJTgwJTkwVkJBJUUzJTgwJTkxJUUzJTgyJUI3JUUzJTgzJUJDJUUzJTgzJTg4JUUzJTgxJUFCJUU2JTk0JUI5JUUzJTgzJTlBJUUzJTgzJUJDJUUzJTgyJUI4JUUzJTgyJTkyJUU4JUE4JUFEJUU1JUFFJTlBJUUzJTgxJTk3JUUzJTgyJTg4JUUzJTgxJTg2JUUzJTgxJUE4JUUzJTgxJTk3JUUzJTgxJTlGJUUzJTgyJTg5JUUzJTgyJUE4JUUzJTgzJUE5JUUzJTgzJUJDJUUzJTgxJThDJUU4JUI1JUI3JUUzJTgxJThEJUUzJTgyJThCJnR4dC1jb2xvcj0lMjMyMTIxMjEmdHh0LWZvbnQ9SGlyYWdpbm8lMjBTYW5zJTIwVzYmdHh0LXNpemU9NTYmdHh0LWNsaXA9ZWxsaXBzaXMmdHh0LWFsaWduPWxlZnQlMkN0b3Amcz0wMTFiYTA5MGNmMmI2YzE5Y2FkZGI1MzRhMTJjNTEzMw%26mark-x%3D142%26mark-y%3D112%26blend64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTYxNiZ0eHQ9JTQwaGlyb191bmRlcmNsYXNzJnR4dC1jb2xvcj0lMjMyMTIxMjEmdHh0LWZvbnQ9SGlyYWdpbm8lMjBTYW5zJTIwVzYmdHh0LXNpemU9MzYmdHh0LWFsaWduPWxlZnQlMkN0b3Amcz01ZDI4ZDVhY2FhYzhjYTRhZTJkOWI0YmEzMzY1ZGQ5ZA%26blend-x%3D142%26blend-y%3D491%26blend-mode%3Dnormal%26s%3Dcb7faca0f538d58cce2c7266a06ebb3d)
エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
【VBA】シートに改ページを設定しようとしたらエラーが起きる - Qiita
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
【VBA】シートに改ページを設定しようとしたらエラーが起きる - Qiita
Dim r As Long r = Worksheets(1).HPageBreaks(i).Location.Row などとして区切り線の位置を取得しよう... Dim r As Long r = Worksheets(1).HPageBreaks(i).Location.Row などとして区切り線の位置を取得しようとすると、実行時エラーがおきることがあります。 これは、画面に表示されていない範囲にある区切り線の位置が取得できないことがあることが原因かもしれません。 詳細はこちら↓ HPageBreaks または VPageBreaks.Location 使用時の "インデックスが有効範囲にありません" エラーについて 回避策としては、最終セルの選択を行います。 Worksheets(1).Cells.SpecialCells(xlCellTypeLastCell).Select Dim r As Long r = Worksheets(1).HPageBreaks(i).Location.Row