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

¸óªí³sµ²Àx¦s®æ¨ÃªÅ¤@¦æ

¸óªí³sµ²Àx¦s®æ¨ÃªÅ¤@¦æ

¤u§@ªí2ªºA1Àx¦s®æ¤º®e¬O³s±µ¦Ü¤u§@ªí1ªºA1Àx¦s®æ(=¤u§@ªí1!A1)¡A¥i¬O¥X¨Óªº¤º®e²Ä¤@¦æ¤Î²Ä¤G¦æ¤¤¶¡­nªÅ¤@¦æ¡A½Ð°Ý­n¦p¦ó³]©w¡H¡H

¸ó¤u§@ªí³sµ²¤Î¤À¦æ°ÝÃD.zip (6.99 KB)

joyce

¸Õ¸Õ
Sub Macro1()
  i = Len(Sheet1.Range("A1"))
  A = Mid(Sheet1.Range("A1"), 1, 12)
  B = Mid(Sheet1.Range("A1"), 14, i - 13)
  Sheet2.Range("A1") = A & Chr(10) & "" & Chr(10) & B
End Sub
ù

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD