1

カスタムビルドの拡張機能を備えたExcel2003でExcelシートを開こうとしています。

ファイルパスを使用してカスタムビルド拡張子を持つExcelの特定のバージョンを開くことはできますが、特定のファイルを開くことができません。

これが私がやりたいことです:

1)カスタムビルドの拡張機能を使用してExcel 2003を開きます2)その中の特定のファイルを開きます3)マクロを実行します4)閉じます

カスタムビルドの拡張子がない通常のExcel2003で開くため、Excelファイルを単純に開くことはできません。したがって、カスタムビルドの拡張子を使用してExcel 2003を開き、開きたいExcelファイルを開く必要があります。

私はあちこちで質問をしていましたが、説明が必要な場合はさらに説明します。

4

1 に答える 1

0

実行中の Excel のインスタンスが既にある場合は、次のようなものを使用できます。

Dim XL
On Error Resume Next
Set XL = GetObject(, "Excel.Application")
On Error Goto 0

If Not TypeName(XL) = "Empty" Then
    XL.Workbooks.Open "path to your file here"
    XL.Run "path to your macro here"
End If

注: 開いている Excel のインスタンスが複数ある場合、返されるインスタンスを簡単に予測することはできません。

于 2012-11-02T18:10:34.827 に答える