求助！如何把指定列下面的日期格式的字符串转换成特定字符串

[maodian552]

我想把K列下面的所有“YYYY/MM/DD”类型的字符串全部变成“Y”，该如何替换啊？函数我有不太会用……求高手解答~~谢谢

[dsd999]

用VBA吧。

Sub ChangeToY()

Dim nRow As Integer

nRow = ActiveSheet.Range("K65536").End(xlUp).Row
 
For i = 1 To nRow
If Cells(i, 11).NumberFormat = "m/d/yyyy" Then
Cells(i, 11) = "Y"
End If
Next

End Sub

[xiaobineric]

1楼误解了楼主的意思了吧。楼主意思应该是把日期类型中的“年”部分抽取出来，比如2011年11月8日，转化成 2011.

[白告羊羽]

=year(K10)

如果是以文本来储存日期的就是

=left(K10,4)