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

°j°é½Ð¯q¡A¨Ï¥ÎFor Next³¯­z¦¡¡G­Yb¦³­È«ha«Ø¥ßx

  1. Sub YY()
  2. For Each C In [B:B].SpecialCells(2)
  3. C(1, 0) = "X"
  4. Next
  5. End Sub
½Æ»s¥N½X
³o¼Ë¥iÁקK´`Àô¨ìªÅ¥ÕÀx¦s®æ

TOP

·íµM¬O¡C
§A¥i¥H¥ÎMsgBox TypeName(c)
±oª¾ÅܼÆÃþ«¬

TOP

        ÀR«ä¦Û¦b : ¤f»¡¤@¥y¦n¸Ü¡A¦p¤f¥X½¬ªá¡F¤f»¡¤@¥yÃa¸Ü¦p¤f¦R¬r³D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD