御無沙汰ですぅ〜.(^-^) Uzさまっではないですが、amiです.
う〜ん、Uzさまっは、拡張子ガラミかレジストリがらみで お応えすると予想して(^^;;;、私は手抜きな手法をばっ.... OTKさまっの御質問は、Excelを非連動で動かしたいものと 邪推しておりますが如何でしょうか? #仕様によってはCreateObjectで十分だとは思いますが..(^^;
'-------- '*** ExcelのLibを参照設定しているコトが前提ですよんっ. Function OpenXls(ByVal argFileName As String) As Variant
Dim myExcelPath As String myExcelPath = Excel.Application.Path OpenXls = Shell(myExcelPath & "\excel.exe " & argFileName)
End Function '--------
おっと、もう直ぐ18日ですねっ(笑).
|