?? ????? ??????? ??????? ?? ????? ???? ????? ???? ????

?????? ????????? ?????? ?????????
???? ???????: 157035 - ??? ???????? ???? ????? ????? ??? ???????.
??? ????? ??? ???????. ????? "??? ??" ??? ??? ??????? ??? ????.
????? ???? | ?? ????

???????

??? ????? ????? ?????? ????? ?? ???? ???? ??? ??????? ???? ?? ?????? ?????? ??????? ?? ????? ??????? ?????? ????? ??? ????? ??????.

?????

????? ?????? ????? ??? ???? ????? ? ??? ???? ?????? ??? ????? "???? ????? 1904" ?? ????? ??????? ?????? ?? ???? ?????? "??????" ?? ????? ???? ??????? ???????:

  • ?????? ??????? ??????? Value2 ????? ???? ?????? ???????. - ?? -

  • ??????? ?????? ???? ?? ????? ??????? Microsoft Excel ????? ???? ?????? ???????.

???? ??????

???? ??????? ?????? ?? ??? ??? ???? ??????? 1904 ????? ????? ????? ??? ???? ????? 1900 ? ????? ??????? ???????.

???? Microsoft ??????? ???????? ??? ??? ?? ???? ??????? ?? ?? ?????. ??? ????? ???? ?? ????? ??? ???????? ??????? ?????? ???????? ?? ???????? ???? ????. ????? ??? ??????? ???? ?????? ?? ??? ??????? ???? ??? ????? ?? ??????? ???? ??? ????????? ?????? ?????? ?????????. ???? ??????? ????? ??? Microsoft ??? ????? ????? ???? ???? ?? ?????? ?????? ??? ??????? ?????? ????? ?????? ?? ????? ??????? ?????? ??????? ?????. ???????? ??????? ???? ??????? ???????:

  1. ?????? "???? ????" ? ???? ??? "????" ?? ??????? ??? ???? ??? ?????? ?? ???? ??? ?????.
  2. ?? ??????? ?????? ???? ??? ?????? ? ???? ??? ????? ??????? ?????? ?? ???? ??? "???? ????? 1904." ?? ???? ??? ?????.
  3. ???? ???????? ??????? ?? ??????1:
    A1: 5 7 96
    A2: 11 5 96
    A3: 28 4 96
  4. ?? ??????? ?????? ??? ??? ????? ?? ???? ??? ???? Visual Basic. ?? ???? Visual Basic? ???? ??? ???? ????? ?? ????? "?????".
  5. ???? ???????? ???????? ??????? ??? ???? ???? ?????:
          Sub DateTest()
             'dimension date variable
             Dim dDate As Date
             'store minimum date in range into variable
             dDate = Application.Min(Worksheets(1).Range("A1:A3"))
             'display stored date
             MsgBox "Stored date" & Chr(13) & dDate
             'check for 1904 date system
             If Application.ThisWorkbook.Date1904 Then
              'convert 1904 base date to 1900 base date
              dDate = DateSerial(Year(dDate) + 4, Month(dDate), Day(dDate) + 1)
              'display converted date
                MsgBox "Converted date" & Chr(13) & dDate
             Else
                MsgBox "1904 date system is not enabled"
             End If
          End Sub
    						
  6. ?????? ??????? ??? ??? ????? ??? ??????? ????? ?? ???? ??? ?????. ??? DateTest ?? ???? ??? ?????.
???? ???? ??????? ????? ?? ????? 4/27/92 ? ??? ????? ??????? ??? ???? ? ???? ?? ???? ????? ?? ?????? ?? ??????? ?? A1 ??? A3. ??????? ???? ???? ??????? ??????? ?????? "?????" 28 4 96.

?????

???? Microsoft ??? ???? ????? ?? ?????? Microsoft ??????? ?? ????? ??? ???????.

??????? ????

Visual Basic for Applications ???????? ?????? ?? ???? ????? 1904 ?????? ??????? ??? ???????. ??? ?????? ????? ???? ????? 1904 ?? Microsoft Excel ?????? ????? ???? ????? ?? ????? ???? ??? "? ?? ???? ????? ???? ????? ? ??? ???? (??? ???? ????? ?????? ??? ?????). ??? ???? ??????? ?? ???? ????? 9/1/96 ?? ???? ????? 1904 ????? 8/31/92.

?? ???? ??????? ???? ??????? ?? Visual Basic ??? ????? ???? ????? 1904 ??????? ??????? ??????? Value2 ????? ???? ?????? ???????.

????? ??????? Value2 ????? ????? ?? Visual Basic ???? ????? ????????? ?? Microsoft Office 97. ???? ??????? Value2 ??????? ???? ??????? ??? ??????? ???? ???? ??? ??? ?? ?????? ????? ???????? ???? ?? ?????.

???????

???? ???????: 157035 - ????? ??? ??????: 01/???? ??????/1435 - ??????: 2.3
????? ???
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
  • Microsoft Excel 95 Standard Edition
????? ??????: 
kbnosurvey kbarchive kbmt kbdtacode kbprb kbprogramming KB157035 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????157035

????? ???????

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com