投稿日 | : 2007/04/25(Wed) 13:55 |
投稿者 | : エニックス |
Eメール | : |
URL | : |
タイトル | : 印刷から3分経過後にフォルダ内に書き込んだデータを消去 |
'xlBook2を別のフォルダに保存
ChDir "\\Fs_kan_13\vol1\PrivateFolder\Nomura開発\Dataフォルダ"
ActiveWorkbook.SaveAs FileName:= _
"\\Fs_kan_13\vol1\PrivateFolder\Nomura開発\Dataフォルダ\xlBook2", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
'xlSheet2を印刷
xlSheet2.PrintOut
xlBook2.Close
Set xlSheet2 = Nothing
Set xlBook2 = Nothing
'印刷から3分経過後にxlBook2のデータをフォルダ内から消去
<ここに処理をかきこむ>
お世話になります。印刷から3分経過後にxlBook2のデータをフォルダ内から消去したいのです。
簡潔に述べますとDataフォルダに残ったxlBook2のデータを印刷から3分経過後に消去する処理を
後につなげたいわけです。<ここに処理をかきこむ>に入る具体的なコードがわかりません。
教えてください。