掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Excelのシートをコピーするには？ (ID：4289)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
はじめまして。 Officeを操作するのは興味がありますので、機会がある度、実験（？）しています。 試行錯誤の結果、以下でいけるようです。参考までに。 Copyメソッドの第１パラメータを空にして第２パラメータに持っていきたい先の（ここでは最後のシート）シートを指定すれば後ろに追加されるようです。 var Excel: Variant; WorkBook: Variant; WorkSheet: Variant; Aftertmp: Variant; begin {ここから Excel := CreateOleObject('Excel.Application'); WorkBook := Excel.Workbooks.Add; while Workbook.sheets.count < 3 do begin Workbook.sheets.add; end; Excel.Visible := True; WorkSheet := WorkBook.WorkSheets[1]; ここまでは目的に合わせて} Aftertmp := WorkBook.WorkSheets[Workbook.sheets.count]; WorkBook.WorkSheets[1].Copy( ,Aftertmp);
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.