§Ú¦³´XÓ°½ÃiªºÂI¤l
¥Î0,1¨Ó¥N´Àfalse, true ¨Ò¦p Application.ScreenUpdating = False, °½Ãi¼g¦¨ Application.ScreenUpdating = 0
¥Î1,2,3,4¨Ó¥N´À xlleft, xlright, xlup, xldown ¨Ò¦p [a65536].end(xlup).row, °½Ãi¼g¦¨ [a65536].end(xlup).row
¥Î1,2¨Ó¥N´À¹ê½uxlContinuous©Mµê½uxlDot ¨Ò¦p Selection.Borders.LineStyle = xlContinuous, °½Ãi¼g¦¨ Selection.Borders.LineStyle =1 |