VBA CInt関数

, Author

VBA CInt関数の目的:

VBA CInt関数はデータ型変換関数として分類されます。 Excel VBAの組み込み関数です。 このVBA CInt関数は式をIntegerデータ型に変換します。
この関数はExcelのVBAエディタウィンドウでプロシージャまたは関数のいずれかで使用することができます。 このVBA CInt関数は、プロシージャや関数の中で何度でも使用することができます。 次のセクションでは、多くのトピックを学びます。 CInt関数の構文とパラメータは何か、このVBA CInt関数とそのリアルタイムの例を使用できる場所などです。

VBA CInt関数の構文:

VBAのCInt関数の構文は

CInt(Expression)

CInt関数は整数データ型の値を返します。

パラメータまたは引数:

CInt関数はExcel VBAの
式:それは必須の引数を1つ持ちます。 式引数は、数値または文字列値を表します。 このCInt関数は、MS Office 365、MS Excel 2016、MS Excel 2013、2011、Excel 2010、Excel 2007、Excel 2003、Mac版 Excel 2016、Mac版 Excel 2011、Excel Online、iPhone版 Excel、iPad版 Excel、Androidタブレット版 Excel、Androidモバイル版 Excelで使用することができます。

例1:文字列(100)を整数データ型に変換する

ここでは、VBAのCInt関数の簡単な例を紹介します。 この例では、指定した式(100)を整数型に変換して出力します。
VBA CInt Function

Example 2: Convert a Value(12345.678) to Integer Data Type

VBA CInt functionの簡単な例です。 この例では、指定した式(12345.678)を整数型に変換しています。

'Convert a Value(12345.678) to Integer Data TypeSub VBA_CInt_Function_Ex2() 'Variable declaration Dim sValue As Double Dim dResult As Double sValue = 12345.678 dResult = CInt(sValue) MsgBox "Value(12345.678) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function" End Sub

出力されます。
VBA CInt Function

例3:値(40000)を整数型に変換する(オーバーフローエラーを返す)

VBA CInt関数の簡単な例を紹介します。 この例では、式(40000)を指定して整数型の値に変換しています。 オーバーフローエラーが返されます。 値40,000は32,767より大きいです。 整数値は-32,768から32,767の間である必要があります。

'Convert a Value(40000) to Integer Data Type (Returns an Overflow Error)Sub VBA_CInt_Function_Ex3() 'Variable declaration Dim sValue As Currency Dim dResult As Double sValue = 40000 dResult = CInt(sValue) MsgBox "Value(40000) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function"End Sub

出力されました。
VBA Runtime Overflow Error

例4:文字列(Test)を整数データ型に変換(型の不一致エラーを返す)

VBA CInt関数の簡単な例を紹介します。 この例では、指定した式(Test)を整数型の値に変換しています。

'Convert a string(Test) to Integer Data Type (Returns Type mismatch Error)Sub VBA_CInt_Function_Ex4() 'Variable declaration Dim sValue As String Dim dResult As Double sValue = "Test" dResult = CInt(sValue) MsgBox "String(Test) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function" End Sub

出力されます。 以下は、4番目の例の出力のスクリーンショットです。
VBA Runtime Overflow Error

マクロコードの使用手順

Excel VBAでCInt関数を使用する手順を以下に説明します。

  • Alt+F11キーを押して、VBA Editorウィンドウを開きます。
  • [挿入]メニューを開き、利用可能なオプションから[モジュール]をクリックします。
  • 上記で指定したマクロをVBAエディタにコピーします。
  • 上記のコードから任意のプロシージャを選択し、「実行」コマンドをクリックするか、キーボードショートカットの「F5」を使用します。
  • VBA 関数一覧:

    VBA 関数のすべての一覧を表示するには、下のリンクをクリックしてください。

    VBA データ型変換関数 VBA 関数の一覧

    コメントを残す

    メールアドレスが公開されることはありません。