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

¦X¨ÖÀx¦s®æ

¦X¨ÖÀx¦s®æ

·s¤â¸Õ¼g¦X¨ÖÀx¦s®æ

¤@¶}©l¥ý¥Î¿ý»s¦p¤U
  1. Sub combine()
  2.     Range("A1:L1").Select
  3.     With Selection
  4.         .HorizontalAlignment = xlCenter
  5.         .VerticalAlignment = xlCenter
  6.         .WrapText = False
  7.         .Orientation = 0
  8.         .AddIndent = False
  9.         .IndentLevel = 0
  10.         .ShrinkToFit = False
  11.         .ReadingOrder = xlContext
  12.         .MergeCells = False
  13.     End With
  14.     Selection.Merge
  15. End Sub
½Æ»s¥N½X
«á¨Ó¤Wºôª¦¤åµo²{¥i²¤Æ¬°
  1. Sub ¦X¨ÖÀx¦s®æ()
  2.     Range("A1:L1").Select
  3.     With Selection.MergeCells = True
  4.     End With
  5.   End Sub
½Æ»s¥N½X
¤@¼Ëªº®ÄªG¡A¬°¤°»ò¿ý»s¦h¤F³o»ò¦h¡A¦h¥Xªº²Ó¶µ·N«ä¬O¤°»ò©O?

¿ý»s¬O¹q¸£°ò©ó¤H¤â¾Þ§@°O¿ý¤U, ¦p Select, ¦ý¼g¬O«ö¤Hªº«äºû°µªº, «e¨â¬q§A³£¤w¸g¬Ý¨ì¬O¦³¤À§O, ¨º¥H«Ü©úÅã¥Ø«e¤H¼g¥N½X¥i¥H¶¹L«Ü¦hµL¿×ªº»y¥y, ¬Ý¤U­±ÁÙ¥i¥H§óµu¡C
  1. Sub ¤£¦P¦X¨Ö¤èªk()
  2.     Range("A1:L1").MergeCells = True
  3. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¬°¤H³B¥@­n¤p¤ß²Ó¤ß¡A¦ý¤£­n¡u¤p¤ß²´¡v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD