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

[µo°Ý] ¦p¦ó«ü©wÀx¦s®æ¦ì¸m¨Ì·Ó»Ý¨D²¾°Ê

¦^´_ 1# yueh0720
  1. ActiveSheet.Range("c3").Activate
  2. Do
  3. ActiveCell.Offset(0, 1).Range("A1").Select
  4. Loop Until IsEmpty(ActiveCell.Value) = True
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ºw¤ô¦¨ªe¡C²É¦Ì¦¨ÅÚ¡A¤Å»´¤vÆF¡A¤Å¥Hµ½¤p¦Ó¤£¬°¡C
ªð¦^¦Cªí ¤W¤@¥DÃD