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

[µo°Ý] ¦p¦ó¦b¦h­Ósheetø»s®æ½u?

[µo°Ý] ¦p¦ó¦b¦h­Ósheetø»s®æ½u?

Sub format1()

  MsgBox "¦b¿ï¨úªºÀx¦s®æ½d³ò¤¤Ã¸»s®æ½u" 'ø»s¿ï¨ú®æ½uªº½d³ò
  Selection.Borders.LineStyle = xlContinuous

End sub

¤p§Ì¤£¤~¦bVBA»â°ì¤¤§ä¨ì¸Ó»yªk, ·Q½Æ»s¦h­Ósheet«áª½±µ¨Ï¥Î¸Ó»yªkø»s¤T­Ósheet®æ½u?
¥Ø«e¥u¯à¦b¨Ï¥Îªºsheet¤¤°õ¦æ¤~¯à¹B¦æ!

        ÀR«ä¦Û¦b : ¨C¤ÑµL©Ò¨Æ¨Æ¡A¬O¤H¥Íªº®ø¶OªÌ¡A¿n·¥¡B¦³¥Î¤~¬O¤H¥Íªº³Ð³yªÌ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD