DimintX%, intY%, intZasInteger 型の省略形は次のとおりです。% -integer; & -long; @ -currency; # -double; ! -single; $ -string Public ステートメント Publicステートメントを使用して、モジュール レベルのパブリック変数を宣言します。
変数の型 % Integer整数型) & Long長整数型) ! Single単精度浮動小数点型) # Double倍精度浮動小数点型) @ Currency通貨型) ^ Long(64ビット符号付き数値)※64ビットExcelのみ有効 $ String文字列型) Dim % Const j& = 123456 これデータ型を指定できます。 リテル値(定数値)を...
変数のデータ型。は、 Byte、 Boolean、 Integer、 Long、 Currency、 Single、 Double、 Decimal (現在サポートされていません)、 Date、 String (可変長文字列の場合)、 Stringlength (固定長文字列の場合)、 Object、 Variant、 ユーザー定義型、または オブジェクト型のいずれかです。 宣言する変数...
Sub FunDataByPk(WSheet As Worksheet, Row_Start As Long, Row_End As Long, Row_Cnt As Long) '変数定義 Dim PK_Array As Variant 'PK列存储数组 Dim PK_Count As Integer ' Dim PK_Array_Value As Variant 'PK数 For i = 1 To COLUMN_NUM If Trim(WSheet.Cells(3, i)) = "" ...
Sub Instr関数01_2() Dim String1 As String Dim String2 As String Dim FindNo As Integer String1 = "ABCDEFG" String2 = "C" FindNo = InStr(String1, String2) MsgBox String1 & "の" & FindNo & "文字目に" & String2 & "がある。" End Sub 検索文字がない場合にはメッセージを表示...
Integer (整数型) 2 バイト -32,768 から 32,767 Single (単精度浮動小数点数型) 4バイト -3.402823E38 から -1.401298E-45 (負の値) 1.401298E-45 から 3.402823E38 (正の値) Long (長整数型) 4バイト -2,147,483,648 から 2,147,483,648 Double (倍精度浮動小数点型) 8 バイト -1.7976...
For To Nextループの動作は異なります。; 配列の上限と下限を利用します。 さらに、Integer型の変数を使用してループを繰り返します。これは、配列のすべての要素にアクセスするためにも使用できます。 コード スニペットを次に示します。
Sub ForEach_CountTo10_Even() Dim n As Integer For n = 2 To 10 Step 2 MsgBox n Next n End Sub「Step 2」を追加していることに注目してください。これは、Forループのカウンター変数を2ずつ「ステップ」するように指示しています。 また、負のステップ値を使用することで、逆にステ...
FunctionStone_Reverse_Right(ByValTargetAsRange)DimiAsInteger'反対の色の石探索用のカウンタi=1Dima_row,a_colAsInteger'座標変換用変数a_row=Target.Row-3'選択セルの行を配列上の座標に変換して代入a_col=Target.Column-3'選択セルの列を配列上の座標に変換して代入DimrAsInteger'ひっくり返す用カウ...
varname必須。 引数を表す変数の名前です。標準の変数の名前付け規則に従ってください。 type省略可能。 プロシージャに渡す引数のデータ型です。Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal(現在サポートされていません)、Date、String(可変長のみ)、Object、Variant、または特定の...