Excelの操作:Excelを起動し、XLSファイルを開く(Excel.Application)

VB2008からExcelファイルを操作する実行例サンプルです。

Excelの操作へ



■実行画面
「Excel起動」ボタンで、Excelが起動します。
Excel起動フォーム

エクセルのコードを利用するには、参照設定を行う必要があります。
メニューの「プロジェクト」-「参照の追加」をクリックします。
プロジェクトメニュー

参照の追加ダイアログで「Microsoft Excel 10.0 Object Library」を選択し「OK」ボタンをクリックします。
これで利用できるようになります。
COMタブ

■実行コード
2010/05/16 ご指摘により、一部修正しました。
2010/04/25 ご指摘により、一部修正しました。

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim exApp As New Excel.Application
Dim exBook As Excel.Workbook
Dim exSheet As Excel.Worksheet

'Excelブックを起動
exBook = exApp.Workbooks.Open("C:\test.xls")
'Excelを表示
exApp.Visible = True
'シートを指定
exSheet = DirectCast(exBook.Worksheets("Sheet1"), Excel.Worksheet)
exSheet.Activate()
MsgBox("Excelをオープンしました。")
'保存せずに閉じる
exBook.Close(False)

'Excelを閉じる
exApp.Quit()
'終了処理
exSheet = Nothing
exBook = Nothing
exApp = Nothing
End Class


Visual Basic 2008 Express Edition実践入門