前提・実現したいこと
DelphiでExcelApplicationコンポーネントを用いて、Microsoft365のExcelにDBのレコードを出力したい。
今まで、問題なく動作していたのですが、Excel出力の動作実行時に以下のエラーダイアログが出るようになりました。
発生している問題・エラーメッセージ
'interfaceはサポートされていません.'
###状況詳細
Microsoft365のデータをインストールした際に、以前まで使っていたExcel2013が強制的にアンインストールされました
通常の作業で365Excelを開く時は問題ないのですが、今回、コンパイルした実行ファイルからExcel出力動作を行うとエラーが出るようになってしまいました。
該当のソースコード
Delphi
1 // テンプレートの設定 2 strFile := ExtractFileDir(Application.ExeName) + '\hoge.xltx'; 3 ExcelApplication1.Connect; //<<<<<デバッグ時この行でエラーが出ます>>>>> 4 5 // エクセル表示 6 ExcelApplication1.Visible[0] := True; 7 8 // ブックの追加 9 ExcelWorkbook1.ConnectTo(ExcelApplication1.Workbooks.Open(strFile,null,Null,Null,null, 10 null, null,null,null,null,null,null,null,0,0,0)); 11 12 // シートをExcelWorksheetに接続 13 ExcelWorksheet1.ConnectTo( 14 ExcelWorkbook1.Worksheets['Sheet1'] as _Worksheet); 15
試したこと
・実行ファイルによって、365Excelに出力できるか違うようで。どうやら、現在、症状の起きている私のメインPCでコンパイルするとエラーが出る。他のPCでコンパイルされた実行ファイルでは、私のPCで動作させても問題なく365Excelを出力するようです。
また別のPCで、今回のプロジェクトをコンパイルし実行すると、これも問題なく365Excelに出力されるようです。
[訂正]
私のPC環境でのみエラーが起き、他の環境では問題がありませんでした。
・'delphi エクセル インターフェイスはサポートされていません'で検索して下記リンクの方法等は試してみましたが特に変わらずです。
http://a23.sblo.jp/article/181504731.html
・また、Office365の再インストールも行いましたが変わらずです。Delphiの再インストールに関しては、会社で提供されたアカウント関係の都合で、避けたいところです。
補足情報
<Delphi> Embarcadero® Delphi 10.1 Berlin
<Ecxel> Microsoft® Excel® for Microsoft 365 MSO (16.0.13001.20254) 64ビット
回答2件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2020/07/28 07:42