OpenOfficeをVB6.0で使用するには (ID:141970)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 下記の記入を行い、実行をしました *********************************************************** Dim oSM As Object Dim oDesk As Object Dim oDoc As Object Dim oSheet As Object Dim arg() Set oSM = CreateObject("com.sun.star.ServiceManager") Set oDesk = oSM.CreateInstance("com.sun.star.frame.Desktop") Set oDoc = oDesk.loadComponentFromURL("file:///C|/test.ods", "_blank", 0, arg()) Set oSheet = oDoc.getSheets().getByIndex(0) *********************************************************** エラーメッセージ： com.sun.star.lang.IllegalArgumentException: URL seems to be an unsupported one. 『Set oDoc = oDesk.loadComponentFromURL("file:///C|/test.ods", "_blank", 0, arg())』 の部分でエラーが発生している状況です。 実際、エクスプローラを開いて、 アドレスに『c:\test.ods』を実行してもファイルが無いと エラーメッセージが返ってきます。 拡張子がtxtの場合はファイルを開くことが可能でした。 どうしてなんでしょうか・・・。