Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
エクセルファイルの開き方について
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=30548#CommentId84205
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
蟻
 (社会人)
投稿日時
2020/9/28 16:50:57
失礼いたします。
どうしてもわからなかったので質問させてください
VBからエクセルを開きたく下記のようにコードをかきました。
ですがファイルは存在しているのに、★マークのところでエラーが出てしまいます。
内容はファイルが見つかりません、移動された可能性がありますというものです。
前文でファイルの存在確認しているのになぜでしょうか?
常にエクセルを開いているというわけではありません。
宜しくお願いします。
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'ファイルが存在しているか確認
Dim myPath As String = System.IO.Path.GetFileName("出力.xlsx")
Dim fileName As String = myPath
If System.IO.File.Exists(fileName) Then
MessageBox.Show("'" + fileName + "'は存在します。")
Else
MessageBox.Show("'" + fileName + "'は存在しません。")
End If
Dim ExcApp As Object
ExcApp = CreateObject("Excel.Application")
ExcApp.workbooks.open(myPath)★
ExcApp.visible = True
End Sub