質問編集履歴
1
エラーの詳細を更新
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -6,7 +6,7 @@
|
|
|
6
6
|
「abcde あいうえお」、「abcde かきくけこ」・・・「fghij さしすせそ」
|
|
7
7
|
を表示させる。
|
|
8
8
|
|
|
9
|
-
](ff556b12c9086c77f58796a73c70f090.png)
|
|
10
10
|
|
|
11
11
|
|
|
12
12
|
|
|
@@ -14,7 +14,33 @@
|
|
|
14
14
|
|
|
15
15
|
```
|
|
16
16
|
・3語掛け合わせの場合は正しく作動するのに、2語掛け合わせの場合はエラーになる
|
|
17
|
+
実行時エラー'1004':
|
|
18
|
+
アプリケーション定義、もしくはオブジェクト定義のエラーです。
|
|
19
|
+
該当行:
|
|
20
|
+
keyword3 = Worksheets("カテゴリ").Cells(4, no3).End(xlDown).Row
|
|
21
|
+
|
|
17
|
-
・キーワード群の語数が1つの場合、
|
|
22
|
+
・キーワード群の語数が1つの場合、結果が正しく表示されない
|
|
23
|
+
例:掛け合わせ作業用シートに1、3、4を入力したとき
|
|
24
|
+
以下のように結果が無限に表示されます。
|
|
25
|
+
abcde たちつてと まみむめも
|
|
26
|
+
abcde たちつてと やゆよ
|
|
27
|
+
abcde たちつてと らりるれろ
|
|
28
|
+
abcde なにぬねの まみむめも
|
|
29
|
+
abcde なにぬねの やゆよ
|
|
30
|
+
abcde なにぬねの らりるれろ
|
|
31
|
+
abcde はひふへほ まみむめも
|
|
32
|
+
abcde はひふへほ やゆよ
|
|
33
|
+
abcde はひふへほ らりるれろ
|
|
34
|
+
たちつてと まみむめも
|
|
35
|
+
たちつてと やゆよ
|
|
36
|
+
たちつてと らりるれろ
|
|
37
|
+
なにぬねの まみむめも
|
|
38
|
+
なにぬねの やゆよ
|
|
39
|
+
なにぬねの らりるれろ
|
|
40
|
+
はひふへほ まみむめも
|
|
41
|
+
・・・
|
|
42
|
+
|
|
43
|
+
|
|
18
44
|
```
|
|
19
45
|
|
|
20
46
|
### 該当のソースコード
|