LONG型でのオーバーフロー しているのではありません。個々に計算して見れば解る筈ですが。 Dim a As Long ' a = &H100 * &H100 + 200 a = &H100& * &H100& + 200&計算している変数が Integer 型で計算の過程でInteger の範囲を超えたからです。