Excel VBA 配列の利用方法｜プログラミング学習おすすめ書籍情報発信パソコン初心者エンジニア希望者新人エンジニア IT業界への就職・転職希望者サポートサイト Programming learning Recommended schools Recommended books Information dissemination Computer beginners Prospective engineers New engineers Prospective job seekers in the IT industry Support site

お知らせ
目標
配列の概要と利用方法
ブックマークのすすめ

お知らせ

こちらの記事は、電子書籍「難しく考えないExcel VBA基礎学習編」として出版されました。記事は途中までが試し読みの対象となります。

howahowablogのVBA記事が電子書籍にて販売となりました。

リンク

目標

サンプルプロシージャを利用して配列を利用してみる

配列の概要と利用方法

配列とは

配列とは複数の値を順番に保管することのできるデータ構造です。保管されるひとつひとつのデータの型は共通となります。配列には静的配列と動的配列の二つがあります。静的配列と動的配列については以下を参考にしてください。

Excel VBA の配列（静的配列）Excel VBA の配列（静的な配列）について解説しています。３部構成としている配列の記事の最初の記事となります。...

Excel VBA の配列（動的配列）Excel VBA の配列（動的配列）について解説しています。３部構成としている配列の記事のふたつめの記事となります。...

配列の利用に重要なステートメント、キーワード、関数

Dimステートメント
ReDimステートメント
Preserveキーワード
Array関数
Variant型
LBound関数
UBound関数
Eraseステートメント

サンプルプロシージャ

ワークシートの準備

サンプルプロシージャを利用するために任意のブックに次のようなシートを準備します。

Sheet1

Sheet2

Sheet3

Sheet4

以上のシートをを利用して複数のシートや複数のセルを配列を使って操作してみようと思います。

サンプルプロシージャ１

このプロシージャでは複数のシートを配列で取得して印刷プレビューを確認しています。

'まずオブジェクト型でシートオブジェクトを利用できる変数を準備します。
'これはFor Each文の中で利用します。
Dim st As Object
'Sheetsプロパティを利用して配列に入った複数のシートを取得します。
Sheets(Array("sheet1", "sheet2", "sheet3")).Select

Sub DynamicArray()
    Dim st As Object
    Sheets(Array("sheet1", "sheet2", "sheet3")).Select
    
    For Each st In ActiveWindow.SelectedSheets
        With st.PageSetup
            .PrintArea = "C3:H6"
            .Orientation = xlLandscape
            .Zoom = False
            .FitToPagesWide = 1
            .FitToPagesTall = 1
            .CenterHorizontally = True
        End With
    Next st
    
    Sheets("sheet1").Activate
    ActiveWindow.SelectedSheets.PrintOut Preview:=True
End Sub