回答編集履歴

2

こちらかがいいかも

2020/05/04 22:41

投稿

退会済みユーザー
test CHANGED
@@ -13,29 +13,3 @@
13
13
  , 255), Operator:=xlFilterCellColor
14
14
 
15
15
  ```
16
-
17
-
18
-
19
- 色の指定の順番を逆にするとうまくいくようです・・・。
20
-
21
-
22
-
23
- ```VBA
24
-
25
- Sub Macro1()
26
-
27
- ActiveSheet.Range("$A$1:$A$5").AutoFilter Field:=1, _
28
-
29
- Criteria1:=RGB(204, 255, 255), _
30
-
31
- Operator:=xlFilterCellColor, _
32
-
33
- Operator:=xlAnd, _
34
-
35
- Criteria2:=RGB(150, 150, 150), _
36
-
37
- Operator:=xlFilterCellColor
38
-
39
- End Sub
40
-
41
- ```

1

こちらかがいいかも

2020/05/04 22:41

投稿

退会済みユーザー
test CHANGED
@@ -13,3 +13,29 @@
13
13
  , 255), Operator:=xlFilterCellColor
14
14
 
15
15
  ```
16
+
17
+
18
+
19
+ 色の指定の順番を逆にするとうまくいくようです・・・。
20
+
21
+
22
+
23
+ ```VBA
24
+
25
+ Sub Macro1()
26
+
27
+ ActiveSheet.Range("$A$1:$A$5").AutoFilter Field:=1, _
28
+
29
+ Criteria1:=RGB(204, 255, 255), _
30
+
31
+ Operator:=xlFilterCellColor, _
32
+
33
+ Operator:=xlAnd, _
34
+
35
+ Criteria2:=RGB(150, 150, 150), _
36
+
37
+ Operator:=xlFilterCellColor
38
+
39
+ End Sub
40
+
41
+ ```