??????? XL2000: ????? ????? ?? ????: ?? ?????? ? ?????

?????? ????????? ?????? ?????????
???? ???????: 213622 - ??? ???????? ???? ????? ????? ??? ???????.
??? ????? ??? ???????. ????? "??? ??" ??? ??? ??????? ??? ????.
????? ???? | ?? ????

?? ??? ??????

??????

?? Microsoft Excel? ?? ???? ?? ???? ????? ???? ?? ?????? ?? ?????? ??????? ?? ????. ??? ???? ????? ????? Microsoft Visual Basic for Applications ??????? ???? ???? ?? ?????? ???? ???????.

??????? ????

???? Microsoft ??????? ???????? ??? ??? ?? ???? ??????? ?? ?? ?????. ??? ????? ???? ?? ????? ??? ???????? ??????? ?????? ???????? ?? ???????? ???? ????. ????? ??? ??????? ???? ?????? ?? ??? ??????? ???? ??? ????? ?? ??????? ???? ??? ????????? ?????? ?????? ?????????. ???? ??????? ????? ??? Microsoft ??? ????? ????? ???? ???? ?? ?????? ?????? ??? ??????? ?????? ????? ?????? ?? ????? ??????? ?????? ??????? ?????. ?????? ????? Visual Basic ????? ????? ???? ?? ???? ?? ????? ?????:
  1. ??? ???? ????.
  2. ???? ???????? ??????? ??? ??????1:
          A1: 1  B1: 2   C1: 3   D1: 4
    					
  3. ?? ?????? ?????? B1 ???????? ?????? ???? ?????? ??? ???? "????" ??? ???? ??????? ?????.
  4. ????? ?????? C1 ?? ????? ???? ?????? ????? ??? "?????" ?? ????? "?????" ?????? ??? ????? ??????? ?? ?? ????? ??? "????" ?? ??????? ?????.
  5. ????? ?????? D1 ?? ????? ????? ?????? ??? "?????" ?? ????? "?????" ?????? ??? ????? ??????? ?? ? ?? ????? ??????? ?? ??????? ?????. ?????? ????? ??? ?????? ?? ?????? ?????? ??? ???? "????" ??? ???? ??????? ?????.
  6. ????? ???? ???? ????? ?????:

    ?? ??????? ?????? ??? ??? ????? ? ?? ???? ??? ???? Visual Basic. ?? ???? ??? ?????? ??????? ?? ??????? ?????.
  7. ???? ??????? ?????? ??? ???? ???? ?????:
          Sub Checking_the_Format()
    
             Range("A1:D1").Select
    
             ' Use a loop to check each cell in the selection.
             For Each cel In Selection
    
             ' The next line tests for the bold property of the font.
    
             If cel.Font.Bold = True Then MsgBox "This cell is bold: " _
                & cel.Address
    
             ' The following line will display the font style of the current
             ' it is not bold or italic.
    
             If cel.Font.FontStyle <> "bold" Or _
                cel.Font.FontStyle <> "italic" Then _
                MsgBox cel.Font.FontStyle
    
             ' This example will check the underline of the font in the
             ' current cell to see if it is a single line (xlsingle).
    
             If cel.Font.Underline = xlSingle Then _
                MsgBox "Here is the single underline: " _
                & cel.Address
    
             ' Finish the loop.
             Next cel
    
             ' The next line sets the weight and color of the left border of
             ' the current selection.
    
             With Range("B3").Borders(xlLeft)
                .Weight = xlMedium
                .ColorIndex = 3
             End With
    
             Range("A10").Select
    
          End Sub
    					
  8. ?????? ??? ??????1 ?? ????? ???????. ?????? ????? ??? ??? ????? ??? ??????? ????? ?? ???? ??? ????? ???????. ???? ?????? ??????? ?? ???? ??? ?????.
????? ???? ??????? ????? ????? ???? ????? ?????? ?? ???? ?????.

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

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

??? ??????? ??????? ??????? ?????? ?? ????? ?????? ?? ????? Visual Basic.

??????? ???? ????? ???? ?????? (True ?? False)

   For this property  True means this        False means this
   -------------------------------------------------------------

   Bold               Font is bold           Font is not bold

   Italic             Font is italic         Font is not italic

   OutlineFont        Font is outline Font   Font is not outline Font

   Shadow             Font is shadow Font    Font is not shadow Font

   Strikethrough      Font is formatted      Font is not formatted with
                      with strike through    strike through 

   Subscript          Font is subscript      Font is not subscript

   Superscript        Font is superscript    Font is not superscript

				

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

   For this property      Test for this value
   ------------------------------------------------------------------

   Color                  The font color as an RGB value

   ColorIndex             The color as an index number from
                          the current color palette

   FontStyle              The font style as a string (for
                          example, "Bold")

   Name                   The name for the font (for example, "Arial")

   Size                   The size of the font (for example, 12)

   Underline              The type of underline applied to text in a
                          the cell (for example, "xlSingle")
				

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

   For this property  Test for this value
   -----------------------------------------------------------------

   Color              The border color as an RGB value

   ColorIndex         The color as index of the current color palette
   
   Linestyle          The line style (for example "xlContinuous")

   Weight             The weight of the line (for example "xlHairline")
				

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

??? ??????? ???? ????? ????? ?? ??? ?? ??? ?? ?????? ?????. ????? ?????? ???? ????? ??????? ???????.
   For this property  Test for this value
   ---------------------------------------------------------------

   Color              The primary color

   ColorIndex         The color as index of current color palette

   Pattern            The pattern (for example, "xlChecker")

   PatternColor       The pattern color as a RGB value

   PatternColorIndex  The color as index of current color palette
				

?????

?????? ??? ???? ?? ????????? ??? ???? ?? ?? ???? Visual Basic? ???? ??? "??????? Microsoft Visual Basic" ?? ??????? ??????? ? ???? ???? ?? ?? ????? Office "??" ????? ??????? ?? ???? ??? ??? ???? ???????.

???????

???? ???????: 213622 - ????? ??? ??????: 02/???? ??????/1435 - ??????: 4.2
????? ???
  • Microsoft Excel 2000 Standard Edition
????? ??????: 
kbnosurvey kbarchive kbmt kbdtacode kbhowto kbprogramming kbualink97 KB213622 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????213622

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

 

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