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

[µo°Ý] ¨D§U: °µ¥¿«h¦b¼Æ¦r»P¤å¦r©Î¤å¦r»P¼Æ¦r¤§¶¡´¡¤JªÅ®æ¡C

¦^´_ 2# ikboy
­ì¥»¤À¨â¦¸°µ´N¦n¤F¡A§ï¦¨2#³o¼Ë¤Ï¦Ó·|¿ù¡C

¦pªG­n¤@¦¸¹F¦¨¡A«Øij§ï¦¨³o¼Ë :
  1. With rx
  2.     .Pattern = "(\d(?=[a-zA-Z])|[a-zA-Z](?=\d))"
  3.     .Global = True
  4.     For i = 1 To UBound(arr)
  5.         arr(i, 1) = .Replace(arr(i, 1), "$1 ")
  6.     Next
  7. End With
½Æ»s¥N½X
ªí¹F¤£²M¡BÃD·N¤£©ú½T¡B¨SªþÀɮ׮榡¡B¨S¦³°Q½×°ÝÃDªººA«×~~~~~~¥H¤W·R²ö¯à§U¡C

TOP

        ÀR«ä¦Û¦b : ­n¥Î¤ß¡A¤£­n¾Þ¤ß¡B·Ð¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD