掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Excelのシートを削除するには? (ID:4294)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 Excelのシートの削除についてなのですが、 procedure TForm1.Button1Click(Sender: TObject); 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; Aftertmp := WorkBook.WorkSheets[Workbook.sheets.count]; WorkBook.WorkSheets[1].Copy( ,Aftertmp); WorkSheet := WorkBook.WorkSheets[4]; WorkSheet.name := 'hoge'; Workbook.sheets[2].delete; //※ Excel.Visible := True; end; このコードより作成されたシートは Sheet1 、 Sheet3 、 hoge でした。 ※の部分で、「シートの削除確認」ダイアログが出てきたのですが これを出さないようにする方法はあるのでしょうか? (シートは削除されてOKです) また、そのExcelにて、キーボードの矢印でセルを移動しようとすると ページごとに動いてしまいます。 この解消法はありますか? ご存知の方がいましたら、どうぞお願い致します。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.