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

½Ð°Ý¤À³Î¦r¦ê..

¥»©«³Ì«á¥Ñ ­ã´£³¡ªL ©ó 2015-9-8 10:24 ½s¿è

A1¤å¦r¡GTV,¦­À\,dinner,1235Apple
Sub TEST()
TT = Split([A1], ",")
[B1].Resize(, UBound(TT) + 1) = TT
End Sub

©Î¡G
TT = Split([A1] & ",", ",")¡@'¤å¦r¦ê¦h¥[¤@­Ó³r¸¹¡A¥i²¤¹LA1ªÅ¥Õ®Éªº¿ù»~¡]¤£µM´N­n¥Hif¥h±Æ°£¡^
[B1].Resize(, UBound(TT)) = TT

TOP

        ÀR«ä¦Û¦b : ­n¤ñ½Ö§ó¨ü½Ö¡D¤£­n¤ñ½Ö§ó©È½Ö¡C
ªð¦^¦Cªí ¤W¤@¥DÃD