openpyxlでの全セル一括クリアの方法

Question

表題の件なのですが、セルに書き込まれた文字を一括して削除したいと考えています。
現在は、for文を使ってセルを一個づつ指定して""を代入する方法とワークシート削除、新規追加して対応しています。
上記内容ですと大変なため、下記2点の方法はあるのでしょうか？

①全セルを一括でクリアするコマンドはあるのでしょうか？
②範囲を指定して一括で""を代入する方法

お忙しいところ恐縮ですが、よろしくお願いいたします。

Answer 1

[コメントに対する追記]
失礼しました、よく調べたところClearはVBA専用のメソッドでした。申し訳ありません。openpyxl単体で範囲を削除する方法はないみたいです。

幸い、PythonからVBAを実行するコードはありますので、一度Excelのマクロを作成し、下記コードを使えば、Clearするマクロを実行することは出来ます。

import win32com.client  # ライブラリをインポート
excel = win32com.client.Dispatch("Excel.Application")  # インスタンス生成
excel.Visible = 1  # エクセルを表示する設定（0にすれば非表示で実行される）
excel.Workbooks.Open(Filename="C:\macro_book.xlsm", ReadOnly=1)  # ブックを読み取り専用で開く
excel.Application.Run('msg("aaa")')  # マクロ名を指定して実行（引数なしの場合マクロ名のみで実行可能）
excel.Workbooks(1).Close(SaveChanges=1)  # ブックを保存して閉じる（SaveChangesを0にすると保存せず閉じる）
excel.Application.Quit()  # 終了

参考記事：PythonからExcelのVBA（マクロ）を実行する方法

～追記終わり～

1、Worksheets("Sheet1").Range("A1:G37").Clearのように範囲指定で削除する方法はあります。

2、以下のような形であれば、まとめて代入することが出来ます。

alist=['A','B','C']
for a in alist:
    for i in range(1,9):
        Worksheets("Sheet1")[a+str(i)].value=''

Comments

[tumuki]

ご連絡が遅れてしまって申し訳ございません
1、Worksheets("Sheet1").Range("A1:G37").Clearのように範囲指定で削除する方法はあります。のほうを試してみたのですが、AttributeErrorが出てしまいうまくいきません、
参考までに実行したPGを載せておきます。
お忙しいところ恐縮ですがご教授お願い致します。

import openpyxl

#エクセル名の取得
wb=openpyxl.load_workbook('example.xlsx')

#シート名の取得
sheet_name=wb.sheetnames

sheet = wb[sheet_name[0]]
#print(sheet)

sheet.Range("A1:G37").Clear

wb.save('example.xlsx')