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

[µo°Ý] ¸ê®Æ¤À³Î

  1. Sub test()
  2.     Cells(1, 2) = Split(Cells(1, 1), "¡i§@ªÌ²¤¶¡j")(0)
  3.     Cells(1, 3) = "¡i§@ªÌ²¤¶¡j" & Chr(13) & Split(Cells(1, 1), "¡i§@ªÌ²¤¶¡j")(1)
  4. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¤Hªº¤ß¦a¬O¤@²¥¥Ð¡A¤g¦a¨S¦³¼½¤U¦nºØ¤l¡A¤]ªø¤£¥X¦nªºªG¹ê¡C -
ªð¦^¦Cªí ¤W¤@¥DÃD