質問編集履歴
4
表を修正
test
CHANGED
File without changes
|
test
CHANGED
@@ -14,7 +14,7 @@
|
|
14
14
|
|
15
15
|
C列:周期の詳細(実行日を記載(営業日と毎月1日などの指定日)) ex第1営業日、毎月1日など
|
16
16
|
|
17
|
-
||
|
17
|
+
||スケジュール名|周期|詳細|判定|
|
18
18
|
|
19
19
|
|:--:|:--:|:--:|:--:|:--:|
|
20
20
|
|
3
シートのサンプル更新
test
CHANGED
File without changes
|
test
CHANGED
@@ -10,7 +10,7 @@
|
|
10
10
|
|
11
11
|
A列:スケジュール名
|
12
12
|
|
13
|
-
B列:周期(
|
13
|
+
B列:周期(日次、月次と記載)
|
14
14
|
|
15
15
|
C列:周期の詳細(実行日を記載(営業日と毎月1日などの指定日)) ex第1営業日、毎月1日など
|
16
16
|
|
@@ -23,6 +23,10 @@
|
|
23
23
|
|2|Schedule2|月次|毎月1日||
|
24
24
|
|
25
25
|
|3|Schedule3|日次|1:00||
|
26
|
+
|
27
|
+
|2|Schedule4|月次|毎月5日||
|
28
|
+
|
29
|
+
|1|Schedule5|月次|第3営業日||
|
26
30
|
|
27
31
|
|
28
32
|
|
2
質問内容を修正しました。
test
CHANGED
File without changes
|
test
CHANGED
@@ -50,7 +50,7 @@
|
|
50
50
|
|
51
51
|
例えば8月3日~8月4日という期間で検索を行います。
|
52
52
|
|
53
|
-
該当する場合、D列の行にOKと返したいです。
|
53
|
+
その期間に該当するスケジュールがあった場合、D列の行にOKと返したいです。
|
54
54
|
|
55
55
|
毎時や日次は必然的に該当するため「OK」と返し、月次の場合は日付の意味合いによって
|
56
56
|
|
1
シートのサンプルを追記しました。
test
CHANGED
@@ -1 +1 @@
|
|
1
|
-
VBAで一覧を複数条件
|
1
|
+
VBAで一覧を複数条件をループし、条件に合った行末にOKと出力したい
|
test
CHANGED
@@ -2,27 +2,49 @@
|
|
2
2
|
|
3
3
|
|
4
4
|
|
5
|
-
VBAを勉強中なのですが、
|
5
|
+
VBAを勉強中なのですが、数日たっても思ったものが作れず質問させてください。
|
6
6
|
|
7
7
|
下記のようなファイルがあります。
|
8
8
|
|
9
|
-
シート1(ジ
|
9
|
+
シート1(スケジュール一覧)
|
10
10
|
|
11
|
-
A列:ジ
|
11
|
+
A列:スケジュール名
|
12
12
|
|
13
13
|
B列:周期(毎時、日次、月次と記載)
|
14
14
|
|
15
15
|
C列:周期の詳細(実行日を記載(営業日と毎月1日などの指定日)) ex第1営業日、毎月1日など
|
16
16
|
|
17
|
+
||A|B|C|D|
|
18
|
+
|
19
|
+
|:--:|:--:|:--:|:--:|:--:|
|
20
|
+
|
21
|
+
|1|Schedule1|月次|第1営業日||
|
22
|
+
|
23
|
+
|2|Schedule2|月次|毎月1日||
|
24
|
+
|
25
|
+
|3|Schedule3|日次|1:00||
|
17
26
|
|
18
27
|
|
28
|
+
|
19
|
-
シート2(カレンダー)
|
29
|
+
シート2(営業日カレンダー)
|
20
30
|
|
21
31
|
A列:1年分の日付(mm/dd)
|
22
32
|
|
23
33
|
B列:営業日 exdai1営業日など
|
24
34
|
|
25
35
|
C列:日付 ex毎月1日など
|
36
|
+
|
37
|
+
|日付|営業日|日|
|
38
|
+
|
39
|
+
|:--:|:--:|:--:|
|
40
|
+
|
41
|
+
|2020/8/1|休み|毎月1日|
|
42
|
+
|
43
|
+
|2020/8/2|休み|毎月2日|
|
44
|
+
|
45
|
+
|2020/8/3|第1営業日|毎月3日|
|
46
|
+
|
47
|
+
|2020/8/4|第2営業日|毎月4日|
|
26
48
|
|
27
49
|
|
28
50
|
|