VB.NET Excelのシートを削除する

Excelのブックから、シートを削除する方法を記載します。

シートを削除する

Dim xlApp As Excel.Application = New Excel.Application()

xlApp.Workbooks.Open("C:\work\myBook1.xls")

Dim xlSheet As Excel.Worksheet = DirectCast(xlApp.Worksheets(1), Excel.Worksheet)   ' 1シート目を選択
xlSheet.Activate()

xlApp.Visible = True

System.Threading.Thread.Sleep(3000)

xlApp.Application.DisplayAlerts = False
xlApp.ActiveSheet.Delete
xlApp.Application.DisplayAlerts = True

System.Threading.Thread.Sleep(3000)

xlApp.Quit()

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlSheet)
System.Runtime.InteropServices.Marshal.ReleaseComObject(xlApp)

・削除する際、確認メッセージが表示されます。

・確認メッセージを全て出さなくするために、ApplicationオブジェクトのDisplayAlertsプロパティをFalseに設定します。