VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2007/04/24(Tue) 15:40
投稿者カズ
Eメール
URL
タイトルxlSheet2を消去

'保存したxlSheet2を印刷
'    xlSheet2.PrintOut
印刷から3分経過後にxlSheet2をフォルダ内から消去
'     Dim vTIME_NOW As Variant
'     vTIME_NOW = Time
'     Do While  DateDiff("s", vTIME_NOW, Time) < 180
'     DoEvents
'     Loop

'    xlSheet2.Close
'    xlBook2.Close
'    Set xlSheet2 = Nothing
'    Set xlBook2 = Nothing

上記の処理は印刷から3分経過後にxlSheet2をフォルダ内から消去する処理です。
私が作成したのですがどこかおかしいコード等がありましたら教えてください。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -