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