回答編集履歴
2
補足を追加
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
補足を追加
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):
|