ExcelマクロVBA技術解説 | Application.Goto使用時の注意 | Excelマクロの問題点と解決策、エクセルVBAの技術的解説



最終更新日:2016-09-19

Application.Goto使用時の注意

Applicationのメソッドに、Gotoメソッドがあります、

Application.Gotoメソッドは、指定ブックの、指定シートの、指定セル範囲を選択します、
そのブック・シートがアクティブでなければアクティブにします。

最初に、Application.Gotoの一般的な文法説明をします。


Application.Goto(Reference, Scroll)

Reference
移動先を指定します。
Range オブジェクト、R1C1 形式のセル参照文字列、および Visual Basic のプロシージャ名を表す文字列です。
この引数を省略すると、移動先は、直前に Goto メソッドを使ったときのセル範囲になります。


Scroll

移動先セル範囲の左上端がウィンドウの左上端に表示されるようにウィンドウをスクロールするには、True を指定します。
ウィンドウをスクロールしないようにするには、False を指定します。
既定値は False です。


Selectメソッドとは、以下の点で違いがあります。

アクティブでないワークシートのセル範囲を指定すると、そのシートに切り替えてからセル範囲が選択されます。
※Selectメソッドでは、最前面にないワークシートを対象としたとき、そのセル範囲は選択されますが、ワークシートはアクティブにはなりません。
Goto メソッドには引数 Scroll があり、ウィンドウを自動的にスクロールできます。
Select メソッドには引数 Replace がありますが、Goto メソッドにはありません。



とても便利なメソッドです。
ウィンドウ枠の固定をしているときには、特に重宝します。
ウィンドウ枠を固定をしているときは、単にA1をSelectしても元の選択セル位置によっては、完全にはスクロールされません。
固定枠の外側が選択されているとき、固定枠の外側はスクロールされないのです。
しかし、Application.Gotoを使えば、完全にスクロールが行われます。

しかし、時に問題があるようです。

Excelのアプリケーションそのものが異常終了してしまう事が有ります。
どのような条件で発生するかが判明していませんが、
間違いなく、このApplication.Gotoが原因でExcelが終了してしまいます。
原因および発生条件が不明なので、断定した発言はしづらいのですが、
複数の環境(PC)で確認していますし、
Application.Gotoの使用を取りやめたことで解決してます。


ただし、発生条件と言うほどでもないのですが、
Application.Gotoの実行以前に、かなりのシート操作(つまり複雑な処理)が行われているマクロに限定されるようです。
短めのVBAコード(つまり簡単な処理)であれば、現象は発生していません。
恐らく、解決方法としては、
DoEvents
Application.ScreenUpdating = True
このあたりとの組み合わせにより回避できるのではないかと思われますが、
SelectとActiveWindow.LargeScrollで書き直した方が確実に対処で来ます。

ネットで検索しても、同様の報告が見当たりませんでしたので、
自身の覚書の意味で掲載しておきます。
原因および発生条件等で、何か情報がありましたら、ご一報いただけると助かります。




同じテーマ「ExcelマクロVBA技術解説」の記事

ExecuteExcel4Macroについて
再帰呼出しについて(再帰プロシージャー)
リボンを非表示、2003以前ならメニューを非表示
Excelのバージョンを判断して「名前を付けて保存」
印刷ページ設定の余白をセンチで指定する(CentimetersToPoints)
入力規則のドロップダウンが消えてしまうマクロ(Shapes内のDrop Down)
フォルダー・ファイル(ブック)・シートの文字制限

新着記事 ・・・新着記事一覧を見る

メモの挿入・削除と改行文字|Google Apps Script入門(12月6日)
リンクの挿入・編集・削除|Google Apps Script入門(12月6日)
セルに数式を入れる|Google Apps Script入門(12月1日)
セルのコピー&各種ペースト|Google Apps Script入門(11月22日)
Twitter Bot 作成|Google Apps Script応用(11月6日)
Excel流の最終行の取得|Google Apps Script応用(11月6日)
方眼紙Excelが楽に入力できるVBA|ExcelマクロVBAサンプル集(11月5日)
「ポケモンを確実に見つける方法」をExcelで数学してみた|エクセル雑感(11月4日)
スプレッドシート(ブック)の作成・名前変更|Google Apps Script入門(11月4日)
シートの挿入・削除・名前変更|Google Apps Script入門(11月3日)

アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|ExcelマクロVBA入門
2.RangeとCellsの使い方|ExcelマクロVBA入門
3.徹底解説(VLOOKUP,MATCH,INDEX,OFFSET)|エクセル関数超技
4.Range以外の指定方法(Cells,Rows,Columns)|ExcelマクロVBA入門
5.セルの参照範囲を可変にする(OFFSET,COUNTA,MATCH)|エクセル関数超技
6.セルのコピー&値の貼り付け(PasteSpecial)|ExcelマクロVBA入門
7.CSVの読み込み方法|ExcelマクロVBAサンプル集
8.変数とデータ型(Dim)|ExcelマクロVBA入門
9.セル・行・列の削除・挿入(Delete,Insert)|ExcelマクロVBA入門
10.ひらがな⇔カタカナの変換|エクセル基本操作



  • >
  • >
  • >
  • Application.Goto使用時の注意

  • このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


    記述には細心の注意をしたつもりですが、
    間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
    なお、掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。



    ↑ PAGE TOP