VBScript

環境
Windows 10 Home
Excel 2013

構文
Right(文字列,文字数)
ight関数は文字列の右から指定した文字数分の文字を切り出します。

使用例 ...

環境
Windows 10 Home
Excel 2013

構文
Mid(文字列,開始の位置)
文字列の途中から最後までを取得します。

使用例

Sub testark() ...

環境
Windows 10 Home
Excel 2013

構文
ディクショナリ名.Count
countでdictionaryの要素の件数を取得しています。

使用例

Su ...

環境
Windows 10 Home
Excel 2013
構文
ディクショナリ名.Exists(キー)
Existsを使って、Dictionaryに指定のキーが存在するか確認しています。 ...

構文
ディクショナリ名(キー) = 値
ディクショナリ名.item(キー) = 値
キーを指定して値を変更します。

使用例

Sub testark() Dim city As Object S ...

構文
Set ディクショナリ名 = CreateObject(“Scripting.Dictionary”)
ディクショナリ名.Remove(キー)
Removeを使ってキーを指定して要 ...

書式
CInt(値)
使用例

Sub funcA() Dim x As String x = "100" resA = CInt(x) Debug.Print (resA) Debug.Print (VarTyp ...

書式
CStr(値)
使用例

Sub funcAa() Dim x As Integer x = 100 resB = CStr(x) Debug.Print (resB) Debug.Print (VarTyp ...

書式
public Enum 列挙型名
サンプルコード

'列挙型Enumの定義Public Enum User ADDR AGE UUID NOEnd EnumSub sample() '定数名を呼ぶ Debug ...

説明
UBound(配列名)
引数の配列の最大のインデックス値を返します。
Lbound(配列名)
引数の配列の最小のインデックス値を返します。
使用例

Dim cftcft = Arra ...

説明
winmgmts:WMI(Windows Management Instrumentation)
\\.\ 現在のコンピュータ
root\cimv2　オブジェクトの名前空間
該当する全てのオブジェ ...

説明
Year関数　Year(varDate)
Month関数　Month(varDate)
Day関数　Day(varDate)
使用例

Dim cftADim strYearDim strMo ...

説明
StrComp(string1, string2)
strString1 は strString2 未満 -1
strString1 と strString2 は等しい 0
strString1 ...

書式
Class クラス名{
Dim メンバー変数1
Dim メンバー変数2
Public Property Let 関数名
}
サンプルコード

Option ExplicitDi ...

サンプルコード
Dim fso

Set fso = WScript.CreateObject(“Scripting.FileSystemObject”)
fso.DeleteFile ...

サンプルコード
Dim fso
Dim cft

Set fso = WScript.CreateObject(“Scripting.FileSystemObject”)
cf ...

サンプルコード
Dim fso

Set fso = WScript.CreateObject(“Scripting.FileSystemObject”)
fso.DeleteFile ...

サンプルコード
Dim sfo

Set sfo = WScript.CreateObject(“Scripting.FileSystemObject”)
sfo.MoveFolder ...