Excelの操作:Excelを起動し、XLSファイルを開く(Excel.Application)VB2008からExcelファイルを操作する実行例サンプルです。Excelの操作へ■実行画面 「Excel起動」ボタンで、Excelが起動します。 エクセルのコードを利用するには、参照設定を行う必要があります。 メニューの「プロジェクト」-「参照の追加」をクリックします。 参照の追加ダイアログで「Microsoft Excel 10.0 Object Library」を選択し「OK」ボタンをクリックします。 これで利用できるようになります。 ■実行コード 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実践入門 |