CreateObject(“Excel.Application”)が64ビットoffice環境ではエラーになる　他の方法

投稿日 投稿者 esadao

CreateObject(“Excel.Application”)が64ビットoffice環境ではエラーになる件だが他の方法で試してみた
直接Excel.exeを起動する方法である

前準備としてアプリと同じフォルダにexcelpath.txtを作成し

"C:\Program FilesXXXXXXOffice16\EXCEL.EXE"

を記載するこの時改行等はいれずに…exe”で終わって置くこと
vb.net内にプロセスを記載

  Dim sr As New System.IO.StreamReader(Application.StartupPath & "\excelpath.txt", System.Text.Encoding.GetEncoding("shift_jis"))
        '内容をすべて読み込む
 Dim execlpath As String = sr.ReadToEnd()
        '閉じる
 sr.Close()
 Dim psi As New System.Diagnostics.ProcessStartInfo()
        '起動するファイルのパスを指定する
 psi.FileName = execlpath
        'コマンドライン引数を指定する
 psi.Arguments = """" & wk_filename & """"
        'アプリケーションを起動する
 System.Diagnostics.Process.Start(psi)

google先生方によればコンパイルanyPCで駄目とか云々が多いが
基本問題なし