ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

¿ï¨ú©Ò¦³®Ø½u

¿ï¨ú©Ò¦³®Ø½u

¦U¦ì¤j¤j¦n:
¦³­Ó°ÝÃD·Q½Ð±Ð
Ãö©ó¤w¸g¿ï¨úÀx¦s®æ°Ï°ì­n¿ï¾Ü©Ò¦³½u®Ø¼Ð½u®Ø
½Ð°ÝVBA»yªk­n¦p¦ó¼g
michael

¥»©«³Ì«á¥Ñ yen956 ©ó 2016-3-19 15:12 ½s¿è

Borders(i) ±`¼Æªí
7   ¿ï¨ú°Ïªº¥ªÃä xlEdgeLeft = 7
8   ¿ï¨ú°Ïªº¤W­± xlEdgeTop = 8
9   ¿ï¨ú°Ïªº¤U­± xlEdgeBottom = 9
10 ¿ï¨ú°Ïªº¥kÃä xlEdgeRight = 10
11 ¿ï¨ú°Ï¤º³¡ªº««ª½½u xlInsideVertical = 11
12 ¿ï¨ú°Ï¤º³¡ªº¤ô¥­½u xlInsideHorizontal = 12

¡¯¦pªG·Q­n¦b¿ï¨ú°Ïµe¤j±×½u,
   «h¥ý±N¿ï¨ú°Ï¦X¨Ö¬°¤@®æ, ¦A¥ÎBorders(5) ©Î Borders(6)

½Ð¥Î¹E¨B°õ¦æ, ¹E¨BÆ[¹î§Y¥i

Sub µe®æ½u´ú¸Õ()
Range("B2:G7").Select
With Selection
    For i = 7 To 12
        .Borders(i).LineStyle = xlContinuous
        .Borders(i).Weight = xlMedium
    Next
End With
End Sub

TOP

¦^´_ 2# yen956

ÁÂÁ¤j¤jªº«ü¾É
michael

TOP

        ÀR«ä¦Û¦b : µÊ®ð¼L¤Ú¤£¦n¡A¤ß¦a¦A¦n¤]¤£¯àºâ¬O¦n¤H¡C
ªð¦^¦Cªí ¤W¤@¥DÃD