Excelで、新しいブックを追加する方法および、既存のファイルを開く方法を記載します。
新しいブックを追加してExcelを開きます
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Dim xlApp As New Excel.Application() Dim xlBooks As Excel.Workbooks 'WorkBooksを取得する xlBooks = xlApp.Workbooks '新しいブックを追加する xlBooks.Add() xlApp.Visible = True '3秒待機する System.Threading.Thread.Sleep(3000) xlApp.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(xlBooks) System.Runtime.InteropServices.Marshal.ReleaseComObject(xlApp) |
既存のブックをExeclで開きます
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Dim xlApp As New Excel.Application() Dim xlBooks As Excel.Workbooks 'WorkBooksを取得する xlBooks = xlApp.Workbooks '既存のブックを開く xlBooks.Open("C:\work\myBook.xls") xlApp.Visible = True '3秒待機する System.Threading.Thread.Sleep(3000) xlApp.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(xlBooks) System.Runtime.InteropServices.Marshal.ReleaseComObject(xlApp) |