ªð¦^¦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 : Ãø¦æ¯à¦æ¡AÃø±Ë¯à±Ë¡AÃø¬°¯à¬°¡A¤~¯àª@µØ¦Û§Úªº¤H®æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD