- ©«¤l
- 19
- ¥DÃD
- 6
- ºëµØ
- 0
- ¿n¤À
- 26
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7
- ³nÅ骩¥»
- office2013
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2015-8-13
- ³Ì«áµn¿ý
- 2017-4-11
|
¦^´_ 10# EddieLiang
'¿ï¨ú¥HA1¬°°ò·Ç¡A¦V¤U©M¦V¥k©Ò¦³³sÄò¸ê®ÆªºÀx¦s®æ
ActiveSheet.Range("A4").End(xlDown).End(xlToRight).Select
'¸ê½è·M¬N§ï¬°³o¼Ë«oµLªk¹B¦æ
ActiveSheet.Range("A4").End(xlDown).End(xlToRight).Selection.Borders.LineStyle = xlContinuous 'µLªk°õ¦æ |
|