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

[µo°Ý] ~ µo²{¤@­Ó·sªº°ÝÃD Ãö©óIF§PÂ_¦¡

ÁÂÁª©¥D¡A¦A½Ð°Ý¤@¤U
§Ú¤µ¤Ñ¦³­ÓÀɮקڶ}¤F50­Ósheet,¨C­Ósheet§Ú³£³]¤F¤@­Ó«ö¶s¥Î¬°¾É¤J¸ê®Æ¦Üsheet1 ,
¦ý¤µ¤Ñ§Ú­n¾ã²zsheet1ªº¸ê®Æ§Ú·Q¦A¼g­Ó«ö¶s¨Ï¥Îª©¥Dµ¹§Úªº¥¨¶°¾ã¦X¸ê®Æ¡A
¥i¬O¥X²{""¤½¦¡¤Ó½ÆÂø­n¤À°tµ¹¹ï¶H""
³o¼Ë§Ú¸Ó«ç»ò§R°£«ö¶s ¦sÀÉ ­«·s¶}±ÒÀɮשO??

TOP

¦^´_ 11# willy1205
§Ú¨Ï¥Îªº2003ª©¨S³o°ÝÃD
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

ÁÂÁ±zªº¸Ñµª!·P®¦°Õ!

TOP

¦^´_ 12# GBKEE


ª©¥D¦b½Ð°Ý¤@¤U ¦pªG¤µ¤Ñ§Ú¸ê®Æ¥u¨ìA43, ¤£¬O¥ÑAÄæ³Ì«á¤@¦C©¹¤Wºâ¡A³o¼Ërange³oÃä¸Ó¦p¦ó­×§ï??   

R = Range("A" & Rows.Count).End(xlUp).Row    'AÄæ¥Ñ³Ì«á¤@¦C©¹¤W¨ì¦³¸ê®Æªº¦C¸¹

TOP

¦^´_ 14# willy1205
¦pªG¤µ¤Ñ§Ú¸ê®Æ¥u¨ìA43,¬O¦ó±¡ªp¨S»¡²M·¡,­nªþÀɬݬÝ.
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 15# GBKEE


    ex.zip (9.54 KB)


¦pªþÀÉ¡A¸Ì­±¤@­Óªí®æ¡A³Ì¤U­±Ã±¦W¥Î¡A©Ò¥H¸ê®Æ¥u·|¨ìA37 ¡A¦³¿ìªk¦b¤£¼vÅTªí®æ¤j¤p¤§¤U§R°£¤¤¶¡¸ê®Æ»P¸ê®Æ¤¤¶¡¨S¦³ªºªÅ®æ¦C¶Ü??

TOP

¦^´_ 16# willy1205
  1. Option Explicit
  2. Sub Ex_±Æ§Ç()  '¤£¥²§R°£
  3.     With Range("A3:G37")
  4.         .Sort .Cells(1), xlAscending
  5.     End With
  6. End Sub
½Æ»s¥N½X
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 17# GBKEE


  ÁÂÁª©¥D
¯u¬O¨ü¯q¨}¦h

TOP

¦^´_ 19# willy1205


    ex.zip (19.09 KB)

¦pªþÀÉ¡A¦Asheet1¿é¤J¸ê®Æ¡A«ö¤U«ö¶s¾É¤J¸ê®Æ¦Ü¥Ò§g¤Î¤A§gªºªí¸Ì­±¡A
¦ý¬O¥Ø«e°£¤F¥Ò§g¤A§g¥H¥~¡AÁ`¦@¦³35­Ó¤H¡A¤@­Ó¤H¦³2­Ó¥i¯à¥D¿ì©Î¨ó¿ì¡A
©Ò¥H¥ú¤@­Ó¾É¤J¸ê®Æªº«ö¶s´N¦³70­Óif§PÂ_¦¡.....
¤£ª¾¹D¤@­Ó¥¨¶°¬O§_À½±o¤U70­Óifªº§PÂ_¦¡¶Ü??
ÁÙ¬O¦³¨ä¥L¥i¥H²¤Æªº¼gªk©O??

ÁÂÁª©¥D

TOP

¦^´_ 20# willy1205
©Ò¥H¥ú¤@­Ó¾É¤J¸ê®Æªº«ö¶s´N¦³70­Óif§PÂ_¦¡?
­n§PÂ_¤°»ò,¨S¦bÀɮפ¤»¡©ú.
·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

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