- ©«¤l
- 2035
- ¥DÃD
- 24
- ºëµØ
- 0
- ¿n¤À
- 2031
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- Office2010
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-3-22
- ³Ì«áµn¿ý
- 2024-2-1
|
¥»©«³Ì«á¥Ñ c_c_lai ©ó 2013-7-19 07:06 ½s¿è
¦^´_ 3# GBKEE
±zªº¼Ò²Õ¤ñ¸û¾A©y¡A¥B¤S²¼ä¡AÁÂÁ¡I- Sub Ex2()
- With Range("A1:C4").Borders ' Borders(®Ø½u)ª«¥ó
- .LineStyle = 3 ' ®Ø½uªº¦¡¼Ë
- .ColorIndex = 15 ' ®Ø½uªºÃC¦â 1:¶Â 2:µL 3:¬õ 4:²Hºñ 5:ÂÅ 6:¶À 7:¾ï 8:¤ÑÂÅ 9:µµ 15:¦Ç
- .Weight = 1 ' ®Ø½uªº²Ê²Ó xlHairline = 1 (²@½u(³Ì²Óªº®Ø½u))¡BxlThin = 2 (²Ó½u)¡B
- ' xlMedium = -4138 (¾A¤¤)¡BxlThick = 4 (²Ê½u (³Ì¼eªº®Ø½u) )
- .Parent.BorderAround 1, xlMedium, 1 ' BorderAround(¥~®Ø) LineStyle, Weight, ColorIndex
- End With
- End Sub
½Æ»s¥N½X |
|