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

½Ð°Ý¦p¦ó±N¦h­ÓÀx¦s®æ¤ºªº¼Æ¦r§Ö³t¤@°_¤U¼Ð?

´M§ä¼Æ¦r¥i¥Î If Mid(c, i, 1) Like "[0-9]" Then
´À´« If Asc(Mid(c, i, 1)) < 64 Then

TOP

¥»©«³Ì«á¥Ñ GBKEE ©ó 2011-9-7 19:54 ½s¿è

¦^´_ 6# ´Ñ»y³¾»ï
For Each c In Range(k.Address, y.Address)
  1. Set k = [a1]
  2. Set y = [b1]
  3. MsgBox [k:y].Address   
  4. MsgBox Range(k.Address, y.Address).Address   
½Æ»s¥N½X

TOP

¦^´_ 8# ´Ñ»y³¾»ï
©Ò¥H¸Ü­n»¡²M·¡,´N¤£®ö¶O®É¶¡
For Each c In Range(k.Value, y.Value)

TOP

        ÀR«ä¦Û¦b : ±o²z­nÄǤH¡A²zª½­n®ð©M¡C
ªð¦^¦Cªí ¤W¤@¥DÃD