回答編集履歴
1
コード修正
answer
CHANGED
|
@@ -5,5 +5,5 @@
|
|
|
5
5
|
```
|
|
6
6
|
とか、
|
|
7
7
|
```vba
|
|
8
|
-
If Cells(i,"C").Value<>"" And DateDiff(Cells(i,"B").value, Cells(1,"D").value)=0 Then
|
|
8
|
+
If Cells(i,"C").Value<>"" And DateDiff("m", Cells(i,"B").value, Cells(1,"D").value)=0 Then
|
|
9
9
|
```
|