質問するログイン新規登録

回答編集履歴

2

補足を追加

2021/02/07 03:34

投稿

Daregada
Daregada

スコア11992

answer CHANGED
@@ -18,4 +18,22 @@
18
18
  worksheet2.cell(row=row, column=column, value=cell.value)
19
19
  if cell.comment:
20
20
  worksheet2.cell(row=row, column=column).comment = cell.comment
21
+ ```
22
+
23
+ ### 補足
24
+ 最近のExcelで利用できる「スレッド化されたコメント」(名前付きで表示され、返信などが可能)の場合、コピー先のシートにコメント情報はコピーされるものの、スレッド化されたコメントに対応したExcelで開いても、コメントとして表示されない。さらに、Excelで保存操作を行なうと、コメント情報が削除された状態で保存されてしまう。
25
+
26
+ 対策として、古い形式のコメント(スレッド化されたコメントに対応したExcelでは、「メモ」と呼ばれる)を適当なauthor名で作成し、コピー先のシートに書き込むコードを示す。
27
+ コメントのテキストに追加される余分な注意書きの行([スレッド化されたコメント」から「コメント:」まで)を正規表現で置換(削除)しているので、コードの先頭付近に`import re`を追加すること。
28
+
29
+ ```Python
30
+ for row in range(8, 60):
31
+ for column in range(42, 153):
32
+ cell = worksheet1.cell(row=row, column=column)
33
+ if cell.value:
34
+ worksheet2.cell(row=row, column=column, value=cell.value)
35
+ if cell.comment and cell.comment.text:
36
+ comment_text = cell.comment.text
37
+ comment_text = re.sub(r"^[スレッド化されたコメント]$(?:.|\s)+^コメント:$\n {4}", "", comment_text, flags=re.MULTILINE)
38
+ worksheet2.cell(row=row, column=column).comment = Comment(comment_text, "anonymous")
21
39
  ```

1

補足を追加

2021/02/07 03:34

投稿

Daregada
Daregada

スコア11992

answer CHANGED
@@ -8,7 +8,7 @@
8
8
  - 末尾の`workbook2.save(export_file_path)`は、一番外側のforループが終了した後に書けばいい。
9
9
  - シート名が「Sheet1」だとエラーになる。コードに`sheet1`と書いてあり、大文字小文字を区別するため。
10
10
 
11
- 内側のforループを以下のように書き換えてください。
11
+ 内側のforループを以下のように書き換えてください。セルに値だけ書いてある場合、コメントだけ書いてある場合、両方書いてある場合すべてに対応します。
12
12
 
13
13
  ```Python
14
14
  for row in range(8, 60):