Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
ClosedXMLのSub Mainエラー
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=31001#CommentId86349
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
tanaka
 (その他)
投稿日時
2025/1/6 11:28:19
vb2022使用。
エクセル操作でClosedXMLのサンプルを貼り付けて実行したのですが、「Sub Main' が 'WinFormsApp1' で複数回宣言されています: WinFormsApp1.My.MyApplication.Main(Args As String()), WinFormsApp1.Module1.Main()」とのエラーが出ます。
探したのですが、重複して、Sub Mainの宣言は見当たらなかったのですが、どこが原因でしょうか?
よろしくお願いします。
コードを記載します。
Imports ClosedXML.Excel
Module Module1
Sub Main()
' Excel ファイルの保存先
Dim filePath As String = "SampleExcelFile.xlsx"
' 新しいワークブックを作成
Using workbook As New XLWorkbook()
' 新しいワークシートを作成
Dim worksheet = workbook.Worksheets.Add("Sample Sheet")
' セルにデータを書き込む
worksheet.Cell("A1").Value = "ID"
worksheet.Cell("B1").Value = "名前"
worksheet.Cell("C1").Value = "年齢"
' サンプルデータを追加
worksheet.Cell("A2").Value = 1
worksheet.Cell("B2").Value = "田中太郎"
worksheet.Cell("C2").Value = 30
worksheet.Cell("A3").Value = 2
worksheet.Cell("B3").Value = "鈴木花子"
worksheet.Cell("C3").Value = 25
' 列幅を自動調整
worksheet.Columns().AdjustToContents()
' ファイルを保存
workbook.SaveAs(filePath)
Console.WriteLine($"Excel ファイルが作成されました: {filePath}")
End Using
End Sub
End Module