excel 中公式处理日期

转载请注明出处：。。。。。。。

0.excel自定义函数

Function kka(di, gao)

kka = di * gao / 2

End Function

要启用宏，扩展名改为：xlsm

1.使用宏自定义公式处理

If IsNumeric(Range("A1")) Then

　　　MsgBox "是数字"

　　Else

　　　MsgBox "不是数字", 64, "提示"

　　End If

　　End Sub

2.使用excel自带的公式处理

自定义日期格式：mmm.d,yyyy

=C5+IF(ISNUMBER(B7),B7,0)

text(a1,"mmm"),mmm表示用英文简写月份

3.工作日计算

WORKDAY(C3,IF(ISNUMBER(B5),B5,0),$L$1:$L$999)

加“$"固定引用，拖动时不递增

递增可使用row()和column()函数

　②判断是否为文本

　　If Application.IsNonText(Range("A1")) Then

　　　MsgBox "是文本"

　　Else

　　　MsgBox "不是文本", 64, "提示"

　　End If

　　End Sub

　　二、比较复杂的方法

　　{=IF(OR(ABS(CODE(MID(ASC(A2),ROW(INDIRECT("1:"&LEN(A2))),1))-52.5)<5),"数字","")&IF(OR(ABS(CODE(MID(ASC(A2),ROW(INDIRECT("1:"&LEN(A2))),1))-{77.5,109.5})<13),"英文","")&IF(OR(CODE(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1))>45216),"中文","")}

　　这是一个带有各种函数的数组公式；