投稿者 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