タイトル : Excel操作の際のエラー回避について質問します 投稿日 : 2005/09/30(Fri) 00:39 投稿者 : K
[OSのVer]:Windows [VBのVer]:VB.NET こんばんは。初めて投稿します。 Excelによりファイルを開き、ユーザーによりブックが閉じられるまで待つようにしたいのですが、ず っと解決できなくて困っています。 Dim oXl As Object Dim tmp As Boolean oXl = CreateObject("Excel.Application") oXl.Workbooks.Opentext(filename:="C:\ABC.csv", Comma:=True) '' この間、シートの加工処理が入る Do While tmp = False If oXl.workbooks.count = 0 Then tmp = True End If Loop プログラムの内容を抜粋すると上記になるのですが、このブックのセルに記入しようとした時点で 「oXl.workbooks.count」の部分でエラー発生します。 事前に「IsError(oxl)」での返り値でIF分岐して回避しようかとも考えましたが・・・ なにかいい手は無いでしょうか? 皆様宜しくお願いいたします。 |