ブックを開いた時に指定シートを表示（Workbook_Open）

最終更新日：2013-08-26

Workbook_Openは、ブックを開いた時に実行されるイベントです、

VBEの「Microsoft Excel Objects」内の「ThisWorkbook」に記述します。


  
    
      Private Sub Workbook_Open()

      　　Application.Goto Sheets(1).Range("A1"), True

End Sub

上記では、ブックが開かれると、先頭シートのA1セルに移動しています。

Application.Goto Sheets(1).Range("A1"), True

これは、

Sheets(1).Select
Range("A1").Select

でも、ほぼ同じですが、

ウインドウ枠を固定し、さらにスクロール状態で、そして固定枠内のセルが選択されている。
このような状態でも、A1セルを選択し、スクロールも戻す必要があるなら、
Application.Goto
を使うと簡単に実現できます。

Workbook_BeforeCloseは、ブックを閉じる直前に起動されるイベントです、手動で閉じる場合も、VBAで閉じる場合でも起動されます。ブックが未保存の場合、無条件でブックを保存するブックが未保存の場合は、Closeをキャンセルする。

シートが選択された時に指定セルに移動（Worksheet_Activate）

Worksheet_Activateはシートが選択された時に実行されるイベントですVBEの「MicrosoftExcelObjects」内の各シートに記述します。上記ではシートが選択されたときA1セルに移動しています。Application.GotoRange(_A1_),

ダブルクリックで行高・列幅調整（Worksheet_BeforeDoubleClick）

セルをダブルクリックすることで、そのセル値で行高および列幅を自動調整するマクロVBAになります。これは、以下の操作をマクロVBAでまとめて行うことになります。「行の高さの自動調整」「列の幅の自動調整」この二つの操作を、マクロVBAで一度にやるということです。

英小文字が入力されたら大文字に変換（Worksheet_Change）

Worksheet_Changeは、セルの値が変更された時に起動されます。PrivateSubWorksheet_Change(ByValTargetAsRange) Target 変更されたセルが、Rangeオブジェクトとして渡されます。

セル選択で選択行の色を変更（Worksheet_SelectionChange）

Worksheet_SelectionChangeは、セルの選択範囲を変更した時に起動されます。PrivateSubWorksheet_SelectionChange(ByValTargetAsRange) Target 選択されたセルが、Rangeオブジェクトとして渡されます。

方眼紙Excelが楽に入力できるVBA

もはや、「いじめ」か「いたずら」、方眼紙Excelに、1枠1文字を入れろと言われて、悪戦苦闘… マクロ書けば、こんな「いじめ」も「いたずら」も、サクッと克服できます。以下のような、セル結合の鬼と化したExcelに、罫線で囲んだ枠内に、1枠1文字で入れるという苦行を、マクロならサクッと解決できます。

ブックを開いた時に指定シートを表示（Workbook_Open）

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

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

ExcelマクロVBAサンプル集
ブックを開いた時に指定シートを表示（Workbook_Open）