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

?????? ????????? ?????? ?????????
???? ???????: 111281 - ??? ???????? ???? ????? ????? ??? ???????.
??? ????? ??? ???????. ????? "??? ??" ??? ??? ??????? ??? ????.
????? ???? | ?? ????

?? ??? ??????

???????

?? Microsoft Excel ??????? 5.0 ?? ???? ????? ??? ???? ?? ??? ????? ?? ??? ??????? ?????? Microsoft Visual Basic ????????? ????? ????. ??? ????? ?????? ???? ??? ????? ????? ????? ???????:
??? ??? ??????? '1004':
????? ????? ??? ??????? ???

?????

??? ????? ?????? ?? Microsoft Excel 5.0. ?? ????? ??? ??????? ?? Microsoft Excel ?? Windows 95 ??????? 7.0 ?????????? ??????.

??????? ????

??? ????? ????? ???? Visual Basic Microsoft Excel ?????? ????? ????? ??????? ?????? ?? ???????. ????? ??? ???? ??? ????? ?????? ??? ?? ?????? ?????? ??? ???? ?? ??? ??? ???????. ?????, ??? ????? ?? ???? ????? ????? ??? ?????.

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

???? ??? Visual Basic

???? Microsoft ??????? ???????? ??? ??? ?? ???? ??????? ?? ?? ?????. ??? ????? ???? ?? ????? ??? ???????? ??????? ?????? ???????? ?? ???????? ???? ????. ????? ??? ??????? ???? ?????? ?? ??? ??????? ???? ??? ????? ?? ??????? ???? ??? ????????? ?????? ?????? ?????????. ???? ??????? ????? ??? Microsoft ??? ????? ????? ???? ???? ?? ?????? ?????? ??? ??????? ?????? ????? ?????? ?? ????? ??????? ?????? ??????? ?????. ???? subroutines ??????? ??????? ???????? ?? ??????? ???? ?? ????? ?? ???? ??? ????? ??? ????. ????? subroutines ??????? ?? ???? ???? ????? ????? ?? ???? ????.

?????? ?? subroutines ???? ?????? ??? ?? Sub ??????? ?????? ???? ???? ?????? ??? ????? ???? F5 ?? ???? "????" ?? ????? ?????.
   'The Test1 subroutine will fail if the name "Test1" does not already
   'exist in the workbook.

   Sub Test1()
     
       ActiveWorkbook.Names.Add Name:="Test1", _
           RefersToR1C1:="=Sheet1!R1C1:R10C10"

   End Sub

   'The Test2 subroutine runs the MakeName subroutine, which attempts to
   'define the name "Test2". As with the above subroutine, it will fail if
   'the name "Test2" does not already exist in the workbook.

   Sub Test2()
       MakeName                              'runs the Test2 subroutine
   End Sub

   Sub MakeName()
     
       ActiveWorkbook.Names.Add Name:="Test2", _
           RefersToR1C1:="=Sheet1!R1C1:R10C10"

   End Sub
				

???????

???? ???????: 111281 - ????? ??? ??????: 28/???? ?????/1435 - ??????: 2.2
????? ???
  • Microsoft Excel 5.0c
  • Microsoft Excel 5.0a ?? Macintosh
????? ??????: 
kbnosurvey kbarchive kbmt kbbug kbcode kbfix kbprogramming KB111281 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????111281

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

 

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