求excelvba代碼
求大俠把下面的語句改寫成VBA代碼
H2=IF(E2="",MID(D2,1,2)&"日,周"&RIGHT(D2,1)&"上午沒打卡",IF(E2-$E$1<=0,"",MID(D2,1,2)&"日,,周"&RIGHT(D2,1)&"遲到"&MINUTE(E2-$E$1)&"分鐘"))
非常感謝
If [E2] = "" Then
[H2] = Left([D2], 2) & "日,,周" & Right([D2], 1) & "上午沒打卡"
ElseIf [E2] - [E1] <= 0 Then
[H2] = ""
Else
[H2] = Left([D2], 2) & "日,,周" & Right([D2], 1) & "遲到" & Minute([E2] - [E1]) & "分鐘"
End If
在淘寶上面看看
相關(guān)推薦
便查問答是一款實(shí)用的網(wǎng)絡(luò)熱門知識(shí)問答平臺(tái),,專注于分享你不知道的知識(shí)、經(jīng)驗(yàn)及生活問題,,在這里所有人都能找到答案歡迎網(wǎng)友參與討論,。