質問編集履歴
2
修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -8,7 +8,7 @@
|
|
|
8
8
|
|
|
9
9
|
```ここに言語を入力
|
|
10
10
|
|
|
11
|
-
Range("$A$5:$G$2310").AutoFilter Field:=7, Criteria1:=
|
|
11
|
+
Range("$A$5:$G$2310").AutoFilter Field:=7, Criteria1:=target, _
|
|
12
12
|
|
|
13
13
|
Operator:=xlFilterValues
|
|
14
14
|
|
|
@@ -18,4 +18,6 @@
|
|
|
18
18
|
|
|
19
19
|
|
|
20
20
|
|
|
21
|
-
ファイル形式はxlsです
|
|
21
|
+
ファイル形式はxlsです。
|
|
22
|
+
|
|
23
|
+
なお、targetは文字列型配列です。
|
1
修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -10,6 +10,12 @@
|
|
|
10
10
|
|
|
11
11
|
Range("$A$5:$G$2310").AutoFilter Field:=7, Criteria1:="<>", _
|
|
12
12
|
|
|
13
|
-
Operator:=xl
|
|
13
|
+
Operator:=xlFilterValues
|
|
14
14
|
|
|
15
15
|
```
|
|
16
|
+
|
|
17
|
+
このコードを実行すると、空白行が表示されないみたいですが…表示されてしまいます。
|
|
18
|
+
|
|
19
|
+
|
|
20
|
+
|
|
21
|
+
ファイル形式はxlsです
|