excel vba从单元格里提取生日,显示错误13类型不匹配
Dim birthday As Date
Dim sendIndex
endRowNo = ThisWorkbook.Sheets("Sheet1").[a65535].End(xlUp).Row
ThisWorkbook.Sheets("sheet1").Select
For rowCount = 2 To endRowNo
nbirthday = ThisWorkbook.Sheets("sheet1").Range("d" & rowCount).Value
birthday = CDate(nbirthday)
单元格如下