如: =WEEKNUM(A1)=WEEKNUM(TODAY()或者:日期在a1=INT(A1-DATE(YEAR(A1),1,0)+WEEKDAY(DATE(YEAR(A1),1,0),1)+7-WEEKDAY(A1,1)/7)也可以用VBA:under the iso standard, a week always begins on a monday, and ends on a sunday.the first week of a year is that week which contains the...
url As String Dim dmt, IE2, IE3 As Object On Error Resume Next Set IE2 = CreateObject("InternetExplorer.Application") url = "http://89.16.22.79:7082/dzdz/mxck/viewZzsfp.action?fpdm=" & fpdm & "&fphm=" & fphm & "&kpyf=&sbjgqrsj=&/dzdz/dzdzckmx/zzsyfp_fh.jsp" ...