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

[µo°Ý] ½Ð°ÝUsedRange.Rows.Count»PEnd(xlUp).Row¦b³B²z¤Wµ²ªG·|¦³©Ò¤£¦P¶Ü¡H

[µo°Ý] ½Ð°ÝUsedRange.Rows.Count»PEnd(xlUp).Row¦b³B²z¤Wµ²ªG·|¦³©Ò¤£¦P¶Ü¡H

½Ð±Ð¤j¤j¡G
ActiveSheet.UsedRange.Rows.Count  »P  Range("B" & Rows.Count).End(xlUp).Row
¨âºØ¤è¦¡¦b¹ê°È³B²z¤W¡A¨ä³Ì«á°õ¦æµ²ªG·|¦³©Ò¤£¦P¶Ü¡H °õ¦æ³t«×¦óªÌ¬°Àu¡H

¸g¹L¹ê»Ú¸ê®Æ³B²z«á¡A§Ú§âÆ[¹î¨âºØ¤£¦P¤è¦¡°õ¦æ¤§µ²ªG±Ô­z¦p¤U¡A¥H´ÁÀ°§U¨ä¥L©|¶·ÁA¸Ñªº¦P¾Ç­Ì¨Ó¦@¦P¤À¨É¡G

' ¥Ø«e¹ê»Ú§¹¾ã¶×¤J¸ê®Æ½d³ò¬°¡G A1:Z1712  ¡F  ¦ý¬O±q X1:Z2000 Äæ¦ìÀx¦sªº¬O­pºâ¤½¦¡(¦ô­p³Ì¦h¸ê®Æ¶µ¬° 2000 ¦C¡A©Ò¥H±q X1713:Z2000 ¨äÄæ¦ì­È§¡¬° 0)
' ¶Ç¦^ 2000 ¦C¡AÂà­zregister313¦^©«¡G©Ò¦³¨Ï¥ÎÀx¦s®æ©Ò²Õ¦¨¥|¤è§Î°Ï°ì¤§³Ì«á¤@¦C¤§¦C¸¹
' ¶Ç¦^ 1712 ¦C¡AÂà­zregister313¦^©«¡GB Äæ©Ò¨Ï¥ÎÀx¦s®æ¤§³Ì«á¤@®æ¤§¦C¸¹
  1. Sub Test()
  2.     Dim total_row As Single
  3.    
  4.        Cells(2, 22).Value = ActiveSheet.UsedRange.Rows.Count         
  5.        Cells(2, 23).Value = Range("B" & Rows.Count).End(xlUp).Row   
  6. End Sub
½Æ»s¥N½X
  1.     ' °õ¦æµ²ªG¡G
  2.     '
  3.     '            V (22)     W (23)
  4.     '     1    --------------------            
  5.     '     2      2000            1712                ' 1712 ¬°¹ê»Ú¶×¤J¸ê®Æ¤§¦æ¼Æ
  6.     '     3            
½Æ»s¥N½X
©Ò¥H¦b¦¹®É¹ê°È³B²z¤W¡A ¦p±Ä¥H ActiveSheet.UsedRange.Rows.Count  ¤è¦¡¡A©|¶·¦A¦¸¹LÂo³¡¤ÀªÅ¥Õ»P«D¯u¹ê¶×¤J¸ê®Æªº°ÝÃD¦C¡C
¦A¦¸·PÁ¤j¤jªº¸Ñ»¡¡I

TOP

¸ê®Æ¦C²Ö¿n¦h¤F¡A°õ¦æ³t«×Ãø¹D¤£·|¨ü¼vÅT¶Ü¡H ªp¥Bµ{¦¡½X¥»¨­¤£¥u¬O¥u¦³°õ¦æ¦¹¶µ¦Ó¤w¡A
Ä´¦p¥¦ÁÙ¦P®É¬q­n°õ¦æ DDE ªº¸ê®Æ¶×¤J¡A°õ¦æ³t«×¬Û®tµL´X¬O³£¥i¥H±µ¨üªº¡C
¦p¤j¤j©Ò¨¥¡AÀ³¸Ó¬O Range("B" & Rows.Count).End(xlUp).Row ¤è¦¡µy§Ö¨Ç¡A
Block »P Lines ¤§³B²z©Î³\«áªÌ¬°§Ö§a¡I ¦hÁ±zªº«ü¾É¡I

TOP

¦^´_ 1# c_c_lai


ActiveSheet.UsedRange.Rows.Count  »P  Range("B" & Rows.Count).End(xlUp).Row
1.¨âºØ¤è¦¡¦b¹ê°È³B²z¤W¡A¨ä³Ì«á°õ¦æµ²ªG·|¦³©Ò¤£¦P¶Ü¡H
  (1) ActiveSheet.UsedRange.Rows.Count    ©Ò¦³¨Ï¥ÎÀx¦s®æ©Ò²Õ¦¨¥|¤è§Î°Ï°ì¤§³Ì«á¤@¦C¤§¦C¸¹
  (2) Range("B" & Rows.Count).End(xlUp).Row   BÄæ©Ò¨Ï¥ÎÀx¦s®æ¤§³Ì«á¤@®æ¤§¦C¸¹
  ¨âªÌ¶Ç¦^¤§¦C¸¹¦³®É¬Û¦P,¦³®É¤£¦P,¨Ì¹ê»ÚÀx¦s®æ¨Ï¥Î±¡§Î¦Ó©w
  À³Á|½d¨Ò¤~¯à½T©w

2. °õ¦æ³t«×¦óªÌ¬°Àu¡H  
   ³oÀ³¸Ó¨S¨º»ò­«­n§a
  ¥u­n¾ã­Óµ{¦¡ªº»yªk,ÅÞ¿è¨S°ÝÃD,¤j³¡¥÷°õ¦æ³t«×³£¥i¥H±µ¨üªº

TOP

        ÀR«ä¦Û¦b : ¦¨¥\¬OÀuÂIªºµo´§¡A¥¢±Ñ¬O¯ÊÂIªº²Ö¿n¡C
ªð¦^¦Cªí ¤W¤@¥DÃD