修改為前月的最后一周的周三,又是周三
时间: 2024-03-09 08:48:15 浏览: 22
要将第一个判断条件修改为前月的最后一周的周三,并且是周三,可以使用以下代码:
```
If Weekday(DateSerial(Year(Date), Month(Date), 0) - 2, vbMonday) = 3 Then
' 过滤条件为 ...
Else
' 过滤条件为 ...
End If
```
这里使用了 `DateSerial` 函数来获取当前月的第0天,实际上就是上一个月的月末。然后减去2天,就是上一个月月末的最后一周的周三的日期。最后使用 `Weekday` 函数来获取这个日期对应的星期几,如果是3,就表示是周三。
相关问题
又是當月最後一周的周3
要将第一个判断条件修改为当月的最后一周的周三,并且是周三,可以使用以下代码:
```
If Weekday(DateSerial(Year(Date), Month(Date) + 1, 0) - 2, vbMonday) = 3 Then
' 过滤条件为 ...
Else
' 过滤条件为 ...
End If
```
这里使用了 `DateSerial` 函数来获取当前月的最后一天,然后减去2天,就是当前月的最后一周的周三的日期。最后使用 `Weekday` 函数来获取这个日期对应的星期几,如果是3,就表示是周三。
將第一個判斷條件修改為當月月最後一周周三
要将第一个判断条件修改为当月月末的最后一周的周三,可以使用以下代码:
```
If Weekday(DateSerial(Year(Date), Month(Date) + 1, 0) - 2, vbMonday) = 3 Then
' 过滤条件为 ...
Else
' 过滤条件为 ...
End If
```
这里使用了 `DateSerial` 函数来获取下一个月的第0天,实际上就是当前月的月末。然后减去2天,就是当前月月末的最后一周的周三的日期。最后使用 `Weekday` 函数来获取这个日期对应的星期几,如果是3,就表示是周三。
相关推荐
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)