VBAのInteger型を使って整数を効率的に扱う方法をわかりやすく解説

Integerの概要

Integer型の基本的な使い方

以下の例では、Integer 型の変数に数値を代入し、メッセージボックスで表示します。

Sub TestInteger()
    Dim num As Integer
    num = 100
    MsgBox "num の値は " & num
End Sub

解説：

• Dim num As Integer: Integer 型の変数を宣言。
• num = 100: 100 を代入。
• MsgBox で値を表示。

Integer型のループ処理での活用

以下の例では、Integer 型をループカウンタとして使用しています。

Sub LoopWithInteger()
    Dim i As Integer
    For i = 1 To 10
        Debug.Print "現在の値: " & i
    Next i
End Sub

解説：

• Integer 型の変数 i をループカウンタとして使用。
• 1 から 10 まで繰り返し、イミディエイトウィンドウに出力。

Integerの範囲を超える場合

Integer 型の範囲（-32,768 ～ 32,767）を超える数値を代入するとエラーが発生します。

Sub OverflowError()
    Dim num As Integer
    num = 40000 ' 範囲外のためエラー発生
End Sub

解決策：

• 32,767 を超える場合は Long 型を使用する。

Excel VBAでのIntegerの活用

以下の例では、Integer 型を使ってExcelのセルに番号を振ります。

Sub FillCellsWithNumbers()
    Dim i As Integer
    For i = 1 To 10
        Cells(i, 1).Value = i
    Next i
End Sub

解説：

• A列の1行目から10行目までに 1 から 10 までの整数を入力。

Integerの注意事項

• 範囲を超えるとエラー: 32,767 を超える値は Long 型を使用。
• 小数を代入すると切り捨て: 3.9 を代入すると 3 になる。
• Excelの行数処理には不適: Excelは最大 1,048,576 行あるため、Long を使うべき。

よくある質問

Q: Integer 型に小数を代入するとどうなりますか？

A: 小数点以下が切り捨てられます（例: 3.9 → 3）。

Q: Integer と Long の違いは？

A: Integer は -32,768 ～ 32,767、Long は -2,147,483,648 ～ 2,147,483,647 の範囲を扱えます。

Q: Excelの行番号処理に Integer を使えますか？

A: いいえ。Excelは 1,048,576 行あるため、Long 型を使う必要があります。

まとめ

• Integer 型は -32,768 から 32,767 の整数を格納できる。
• メモリ使用量は 2 バイトで、ループ処理などに適している。
• 範囲を超える場合は Long 型を使用する。
• Excelの行処理には適していないため、Long を使うのが望ましい。