ray88’s diary

お仕事で困ったとき用の自分用の覚書

VBA FileSystemObject(ファイルシステムオブジェクト)事前バインディングと実行時バインディング

■実行時バインディングによる参照

Dim オブジェクト変数 As Object
Set オブジェクト変数 = CreateObject("Scripting.FileSystemObject")

■事前バインディングによる参照
「参照設定」ダイアログボックスで「Microsoft Scripting Runtime」への参照を有効に設定する

Dim オブジェクト変数 As FileSystemObject
Set オブジェクト変数 = New FileSystemObject

または

Dim オブジェクト変数 As New FileSystemObject