オブジェクト廃棄のメモ

変数の宣言も廃棄も要らぬ書き方メモ。Withで囲まれている間だけ変数が有効。

Dim buf As String
With CreateObject("Scripting.FileSystemObject")
    With .GetFile("テキストファイルパス").OpenAsTextStream
        buf = .ReadAll
        .Close
    End With
End With

Debug.Print buf