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

Sortingµ{¦¡½X¤£¯à°õ¦æ

¦^´_ 6# stevenliu555
¦^´_ 10# owen06
ªº½T¦b 2003 »P 2007¡B2010 ¤Wªí¹F¬O¦³¨Ç·Lªº®t²§©Ê¡A
¦hÁ owen06 ¤j¤jªº¥Î¤ß¡I
  1. Sub Ex()
  2.     With Sheets("·|­û¦W¥U").Sort
  3.         .SortFields.Clear
  4.         .SetRange Range("A1:J31")
  5.         .SortFields.Add Key:=Range("D2"), Order:=xlAscending        '¥ý¥HD2»¼¼W±Æ§Ç
  6.         .SortFields.Add Key:=Range("F2"), Order:=xlAscending        '¥ý¥HF2»¼¼W±Æ§Ç
  7.         .Header = xlYes
  8.         .Apply
  9.     End With
  10. End Sub
½Æ»s¥N½X

TOP

·PÁÂ10#, 11#ªº±Ð¾É¡A¯uªº¥i¥H­C¡C
¦ý¬O¡A§ÚÁÙ¬O¦³ÂI½èºÃ¡A¬°¤°»òEXCEL 2007¡B2010µ{¦¡½X·|Åܱo½ÆÂø¡A¤Ï¦ÓÃø¥Î¡A¤£¸Ñ¡C
Engr<i>[12]<strong>

TOP

¦^´_ 12# stevenliu555


   ¥i¯à¬O¹ï©ó¤@¯ë¨Ï¥ÎªÌ¨Ó»¡¡A¦b·Æ¹«¾Þ§@ªº¤¶­±¥\¯àÅܪº¶W±j¤j¡A¶W²«K¡A
   ¦ý¬O¬Û¹ïªº¡Aµ{¦¡»y¨¥¤]´NÅܪº§ó½ÆÂø¤F¡C²qªº°Õ¡K

TOP

        ÀR«ä¦Û¦b : ¡i¬O§_µo´§¤F¨}¯à¡H¡j¤H¶¡¹Ø©R¦]¬°µu¼È¡A¤~§óÅã±o¬Ã¶Q¡CÃø±o¨Ó¤@½ë¤H¶¡¡AÀ³°Ý¬O§_¬°¤H¶¡µo´§¤F¦Û¤vªº¨}¯à¡A¦Ó¤£­n¤@¨ý¨Dªø¹Ø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD