Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
Dim xlApp As New Excel.Applicationでエラー
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=30959#CommentId86175
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
ひでと
 (社会人)
投稿日時
2024/4/4 14:17:04
お世話になります。
Visual Studio 2019 のvbでエクセル2019 のブックを使用したいと思い、
Dim xlApp As New Excel.Application
としたのですが、サーバーの実行に失敗しましたとエラーがでます。
処理の初めの方のエラーなのですが、原因はなんでしょうか。
保存してあるマクロ付きのブックをコピーしてシートにデータを記載する処理をしようとしています。
冒頭部分は以下のとおりです。
Private Sub Excelへ出力ToolStripMenuItem_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Excelへ出力ToolStripMenuItem.Click
Dim i, j As Integer
Dim xlApp As New Excel.Application
Dim xlBooks As Excel.Workbooks = xlApp.Workbooks
Dim xlFilePath = My.Computer.FileSystem.CurrentDirectory & "\重量計算1.xlsm"
Dim xlBook As Excel.Workbook = xlBooks.Open(xlFilePath)
Dim xlSheets As Excel.Sheets = xlBook.Worksheets
Dim xlSheet As Excel.Worksheet
参照設定は
Microsoft Office 16.0 Object Library
Microsoft Excel 16.0 Object Library
として Microsoft .Office.Core の名前をインポートしています。