单元格中是2023/6/11,显示的是6月11日
时间: 2024-01-07 13:05:51 浏览: 94
如果单元格中存储的是日期值,而不是文本值,那么可以将代码中的日期格式修改为 "yyyy/m/d",即:
```
'获取当前日期,并将其转换为日期格式
todayDate = Format(Date, "yyyy/m/d")
'查找今天日期所在的列号,如果不存在则给出提示并退出
If searchRange.EntireColumn.Find(What:=todayDate, LookIn:=xlValues, LookAt:=xlWhole) Is Nothing Then
MsgBox "今天的日期没有找到!"
Exit Sub
Else
lastCol = searchRange.EntireColumn.Find(What:=todayDate, LookIn:=xlValues, LookAt:=xlWhole).Column
End If
```
请注意,这里将日期格式转换为了 "yyyy/m/d" 的格式,如果您的单元格日期格式不同,请将其调整为相应的格式。另外,由于单元格中存储的是日期值,而不是文本值,因此 `LookAt` 参数应该设置为 `xlWhole`,表示查找整个单元格中的值。
相关问题
单元格显示的日期是6月11日,格式也是日期格式 为什么就是提示日期找不到呗
如果单元格中显示的日期格式正确,那么可能是因为代码中查找范围不正确导致的。请确保 `searchRange` 变量所指定的范围是包含了单元格 G7 至最后一列的所有单元格。
此外,如果您使用的是中文版 Excel,那么可能需要将代码中的 `What` 参数改为中文格式的日期。比如,如果单元格中显示的日期是 `6月11日`,那么代码中的 `What` 参数应该为 `"6月11日"`。具体代码如下:
```
'获取当前日期,并将其转换为中文日期格式
todayDate = Format(Date, "m月d日")
'查找今天日期所在的列号,如果不存在则给出提示并退出
If searchRange.Find(What:=todayDate, LookIn:=xlValues, LookAt:=xlWhole) Is Nothing Then
MsgBox "今天的日期没有找到!"
Exit Sub
Else
lastCol = searchRange.Find(What:=todayDate, LookIn:=xlValues, LookAt:=xlWhole).Column
End If
```
如果您的 Excel 是英文版,则无需将 `What` 参数改为中文格式。
在Excel公式中,切换单元格的相对引用/绝对引用的快捷键是
在 Excel 公式中,切换单元格的相对引用绝对引用的快键是 F4。你在编辑公式时,选择一个单元格引用,并按下 F4 键,Excel 会在相对引用和绝对引用之间进行切换。每次按下 F4 键,引用的类型会循环变化,包括相对引用、绝对引用($A$1)、行绝对引用($A1)和列绝对引用(A$1)。这样可以方便地调整公式中的引用类型,以满足不同的计算需求。
相关推荐
![doc](https://img-home.csdnimg.cn/images/20210720083327.png)
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![doc](https://img-home.csdnimg.cn/images/20210720083327.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)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)