DataTable から名前を取得して汎用フォルダーを作成しました。
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
strdata = Datatable.Value("Column name", "Sheet")
fso.CreateFolder "C:\Documents and Settings\schoudar\Desktop\" & strdata
これまでは成功しましたが、このフォルダーにファイルを保存したいのですが、保存しないとフォルダー名が変わります。反復の。CaptureBitmap
だから私はファイルで試しました:
Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\ & strdata\filename.bmp"
しかし、うまくいかないので、助けてください。