タイトル : Re: 既存のExcelファイルにシートを追加 投稿日 : 2008/05/02(Fri) 07:29 投稿者 : YK
> VBからExcelを起動し、データベースから取得した値を設定しています。 > ここで、追加するファイルが既に存在する場合、 > また、追加するシートが必ず一番左側に作られてしまいます。 > 存在しているシートの一番後(一番右側)に作りたいのです。 Set xlSheet = xlBook.Worksheets.Add Set xlSheet = xlBook.Worksheets(xlBook.Worksheets.Count) 上記2行を下記のようにすれば一番右側にセットできます。 エクセルのヘルプも読みましょう。 Set xlSheet = xlBook.Worksheets.Add(after:=Worksheets(Worksheets.Count)) |