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

投稿日 投稿者 esadao

CreateObject(“Excel.Application”)でoffice32ﾋﾞｯﾄを起動していたがなぜか64ビットoffice2019ではエラーになる

　Dim oExcel As Object  
　oExcel = CreateObject("Excel.Application")
  oExcel.Visible = True
  oExcel.Workbooks.Open(wk_filename)
  oExcel.UserControl = True
  oExcel = Nothing

google先生に聞いてみると32ﾋﾞｯﾄに戻せとか色々あるが以下の方法で一応解決した

 oExcel = CreateObject("Excel.Application.16")

office2016,2019はバージョン１６なのでこれでいいかも

参考
2019 ,2016 16
2013 15
2010 14
2007 12
2003 11
2002 10