openpyxlでExcelシートの削除方法（警告メッセージを出さないようにする方法）

Question

Pythonでopenpyxlを使用し、Excelのブックの数シートを削除（removeメソッド）し、
保存後、再度開くと、

○○○.xlsxの一部の内容に問題が見つかりました。可能な限り内容を回復しますか？ブックの発行元が信頼できる場合は「はい」をクリックしてください。

との表示あり、

はい、を選択すると、

読み取れなかった内容を修復または削除することにより、ファイルを開くことができました。[削除されたレコード: /xl/workbook.xml パーツ内の名前付き範囲 (ブック)]

との表示が出ています。

Excelのブックは削除したシートはちゃんと削除されて確認もできたのですが、
上記のような警告メッセージが表示されないようにしたいのですが解決方法が
わからず質問させていただきました。

---

参考：

異なる言語で同じような現象の記事を拝見しましたが、
Pythonでの解決方法を知りたく思います。
https://social.msdn.microsoft.com/Forums/ja-JP/9ddd9862-7dcb-47b2-985e-6a11b4a10a74/openxml12391sheet21066385002446012289125011244912452125231243438283?forum=vbgeneralja

---

---

特定のシート以外を削除し、保存するコード

counter = 1

# Excelを読み込む
wb = openpyxl.load_workbook(excel_path) #追記：excel_path(storage/xxx/old.xlsx)

# 3番目のシート以外削除
for ws in wb.worksheets:
　if not counter == 3:
  　wb.remove(wb[ws.title])
    counter +=1
  else:
    counter +=1
# タイトルを変更する
ws.title = "新しいシート"
# 保存する
wb.save(storage/xxx/new.xlsx)           #追記：storage/xxx/new.xlsx で保存

Answer 1

読み込んだExcelの拡張子と保存の時した拡張子は何でしょうか。

Comments

[nmty]

どちらも".xlsx"です。

[3939TJ55]

確認して頂きたいのですが、読み込むxlsxのファイルに入力規則など設定していないでしょうか。

[nmty]

読み込むxlsxのファイルは全シートに入力規則の項目があります。（削除したシートにも、残したシートにもあります。）入力規則があるシートがあるExcellブックは削除すると警告が出るのでしょうか？
やりたいことは、10シートほどあるExcelのブック(入力規則あり)の特定の1シートだけ別名で保存することです。1シートだけ別名のExcel保存する方法がわからず、現在は特定のシート以外を削除しています。

[3939TJ55]

コードが無いので何とも言えませんが・・・
シートを別名にしたいだけでしたら下記のような方法でも可能です。

# シートを取得
sheet = book['Sheet']
# シート名を変更 Sheet → シート1
sheet.title = 'シート1'

[nmty]

すみません、ご丁寧にありがとうございます。コードを添付いたしました。
シート名の変更というよりは、1シートだけ残して、Execlファイルを保存したく思います。
例：
変更前：old_EXCEL.xlsx(Sheet1,Sheet2,Sheet3)
変更後：new_EXCEL.xlsx(Sheet2_new)
のようなイメージです。

[3939TJ55]

でしたらその方法で問題ないかと思います。
wb = openpyxl.load_workbook(excel_path,keep_vba=True)
の部分を変更してみてはいかがでしょうか。

[nmty]

ありがとうございます。keep_vba=Trueを記載して上記のエラーは解消しましたが、
新しく、「～.xlsxを開くことができません。ファイル形式またはファイル拡張子が正しくありません。ファイルが破損しておらず、ファイル拡張子とファイル形式が一致していることを確認してください。」と表示されました。

さきほど添付したソースコードに少し記載漏れがあったのですが、保存する時に、Excelのファイル名も変更してsaveしているのですが、こちらが原因でしょうか？

[3939TJ55]

フルパスで指定はいかがでしょうか。
例.wb.save("C:\Users\ユーザー名\Desktop\test.xlsx")などで試してみてはいかがでしょう

[nmty]

フルパスでも同様のエラーが発生しました。
keep_vba=True、の記載で当初のエラーは解決されましたが、
新しく発生したエラーの調査をもう少し進めます。

[nmty]

ちなみに、名前付き範囲、というものをopenpyxlなど削除する方法等はあるのでしょうか？
初めに出力されたエラーにそのような表示があり、また参考のリンクでは、Sheetの削除と”WorksheetPart”（名前付き範囲？）の削除の記述があり、この辺りが本件のエラーに関連している可能性もありそうです。

Answer 2

名前付き範囲を以下のように削除（clear）するとエラー解消されました。

wb.defined_names.definedName.clear()