VBでエクセルのシートをコピーするには？ (ID:85923)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 別プロセスだからです。 ひとつのプロセスでコピーすれば平気なハズです。 Dim objMoto As Excel.Application ' エクセルを起動 Set objMoto = New Excel.Application ' エクセルファイルを開く With objMoto .Workbooks.Open "C:\Text1.xls" .Workbooks.Open "C:\Text2.xls" .Visible = True .Workbooks(1).Sheets(1).Copy After:=.Workbooks(2).Sheets(.Workbooks(2).Sheets.Count) .Workbooks(2).Close True .Workbooks(1).Close .Quit End With Set objMoto = Nothing