回答編集履歴
2
追記
test
CHANGED
|
@@ -93,3 +93,9 @@
|
|
|
93
93
|
|
|
94
94
|
|
|
95
95
|
行頭復帰 はなんとなくわかりますが、警告音を鳴らすコードが埋め込まれているのか、Wordの開発者に聞かないとわからないですね。
|
|
96
|
+
|
|
97
|
+
|
|
98
|
+
|
|
99
|
+
**追記**
|
|
100
|
+
|
|
101
|
+
Chr(13) & Chr(7) の制御コードを削除するコードを追加しました。
|
1
コード修正
test
CHANGED
|
@@ -50,7 +50,9 @@
|
|
|
50
50
|
|
|
51
51
|
Debug.Print Asc(Mid(s, Len(s) - 1, 1)); Asc(Mid(s, Len(s), 1))
|
|
52
52
|
|
|
53
|
+
If s Like "*" & Chr(13) & Chr(7) Then s = Left(s, Len(s)-2) '制御コード(黒丸)削除
|
|
54
|
+
|
|
53
|
-
Cells(r, c).Value =
|
|
55
|
+
Cells(r, c).Value = s
|
|
54
56
|
|
|
55
57
|
Next
|
|
56
58
|
|