ªð¦^¦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 : ¡i®É¤é²öªÅ¹L¡j¤@­Ó¤H¦b¥@¶¡°µ¤F¦h¤Ö¨Æ¡A´Nµ¥©ó¹Ø©R¦³¦hªø¡C¦]¦¹¥²¶·»P®É¶¡Ävª§¡A¤Á²ö¨Ï®É¤éªÅ¹L¡C
ªð¦^¦Cªí ¤W¤@¥DÃD