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

§ì¨ú¾ã­Ócol¤§®æ¤l¼Æ¶q®É¡A­Y col ¥u¦³¤@­Ócell¬°¼Æ­È¡A¬°¤°»ò·|·¸¦ì

§ì¨ú¾ã­Ócol¤§®æ¤l¼Æ¶q®É¡A­Y col ¥u¦³¤@­Ócell¬°¼Æ­È¡A¬°¤°»ò·|·¸¦ì

  1. Sub test()
  2. Dim a As Integer

  3. a = Sheets("order_pool").Range("A1", Sheets("order_pool").Range("A1").End(xlDown)).Rows.Count
  4. End Sub
½Æ»s¥N½X
½Ð°Ý¤@¤U order_pool¥u¦³A1¦³¼Æ­È¡A·Ó²z¨Ó»¡·|¬O1     a¿ùªº®É­Ô¬° = 1048576 ¶W¥Xdata type½d³ò
§Ú¤£À´¬°¤°»òa·|·¸¦ì?  ½Ð¤j¤jÄÀºÃ~~
­n«ç»ò­×¥¿°Ç@...@?

¥»©«³Ì«á¥Ñ m09903020 ©ó 2012-7-15 21:32 ½s¿è

§Ú¬Ý¨ì 1048576!   ­ì¨Ó§Ú¼gªº¿ù¦b³o~~~><"
¬Ý¨Ó»yªk¥Î¿ù¨ì¥þ¿ïA¥h¤F...

ÁÂÁÂoobird

TOP

Range("A1").End(xlDown)
·N«ä¬O¿ï¤¤a1Àx¦s®æ¡A«öctrl+¦V¤UÁä¡A§A¬Ý·|¨ì¤°»ò¦a¤è¡H

TOP

¥Î.Range("A1048576").End(xlup))

TOP

        ÀR«ä¦Û¦b : ¥@¤W¦³¨â¥ó¨Æ¤£¯àµ¥¡G¤@¡B§µ¶¶ ¤G¡B¦æµ½¡C
ªð¦^¦Cªí ¤W¤@¥DÃD