ファイルサイズを書き込めません。

過去ログを検索したのですが載っていなかったので質問させて頂きます。
指定したフォルダ毎の容量を管理したいと考え,ネットで拾った以下のソースをEXCELで動かしましたが「書き込みできません」というエラーと共に書き込めませんでした。
Sub FolderSize_Count()

Dim FSO As Variant
Set FSO = CreateObject("Scripting.FileSystemObject")
Dim Path As String

With Sheets("Sheet2")
Path = Application.Worksheets("sheet1").Range("A1").Value
Sheet2.Cells(1, 1) = FSO.GetFolder(Path).Size
End With

End Sub

書き込めませんというキーワードで検索をGOOGLEでもかけたのですが見つからずに困っています。
もしよろしければご回答お願い致します。

No.1 ベストアンサー 回答者： pkh4989 回答日時： 2008/10/15 13:57

こんにちは。

Path 設定の問題かも・・・
C ドライブの場合 → C:\ (×)　　 C: , C:\TEST (○)

この回答へのお礼

仰るとおりでした。
アドレスを直打ちするときも\を入れて打つことが多かったのでそうしていました。
\が入るだけで駄目なんですね・・・勉強になりました。
ありがとうございました！

お礼日時：2008/10/16 09:30