投稿日 | : 2005/08/24(Wed) 15:08 |
投稿者 | : あい |
URL | : |
タイトル | : VBからのEXCEL出力 |
以下のようなソースでVB6.0からEXCELファイルの作成を行っています。
画面上には、出力中のファイルを表示したくありません。
このまま実行する分には問題ないのですが、
出力処理中に別のEXCELファイルを開くと
出力中のBOOKまで一緒に開いてしまい、
出力処理が終了するまでその別のEXCELファイルを
参照・編集することができません。
以下のような状態です。
EXCELをまったく起動していない状態
→処理実行
→実行中に別のBOOKを開く
→BOOKがふたつ開き、編集できない。
→ここでEXCELを終了させるとエラーになる。
出力処理中に別のBOOKに対して作業を行うことはできるのでしょうか?
ちなみに、処理実行前に別のBOOKを開いておいて、
処理を実行した場合は、別のBOOKを編集することはできます。
また、出力中のBOOKが表示されることもありません。
---------------------------
EXCEL出力を行う部分のソース
---------------------------
Dim objExcel As Object
Dim objWb As Object
Dim objSheet As Object
'Excel操作用オブジェクト初期化
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = False
objExcel.DisplayAlerts = False
objExcel.ScreenUpdating = False
Set objWb = objExcel.Workbooks.Add
Set objSheet = objWb.Sheets(1)
objSheet.Name = "シート名"
''セルへのデータ出力など
'保存
objWb.SaveAs mstrFileName
objWb.Close
objExcel.ScreenUpdating = True
Set objExcel = Nothing
----------------------------------
以上です。
よろしくお願いします。