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

±Æ§Ç»yªk(¿ý»s¥¨¶°)¬O§_¥i¥H²¤Æ

±Æ§Ç»yªk(¿ý»s¥¨¶°)¬O§_¥i¥H²¤Æ

Hi ¤j®a¦n,

¿ý»s¥¨¶°°Ê§@»¡©ú¦p¤U¡G
1.¥ý©óG4-->ÂI¿ï¿z¿ï
2.©óG4-->±q A ¨ì Z ±Æ§Ç
3.©óC4-->±q A ¨ì Z ±Æ§Ç
4.¨ú®ø¿z¿ï¥\¯à




¥¨¶°»yªk¦p¤U¡G

Sub ±Æ§Ç1()

    Range("G4").Select
    Selection.AutoFilter
    ActiveWorkbook.Worksheets("ª©±ÄÁʤJ®w³æ").AutoFilter.Sort.SortFields.Add2 Key:= _
        Range("G4"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortNormal
    With ActiveWorkbook.Worksheets("ª©±ÄÁʤJ®w³æ").AutoFilter.Sort
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    Range("C4").Select
    ActiveWorkbook.Worksheets("ª©±ÄÁʤJ®w³æ").AutoFilter.Sort.SortFields.Add2 Key:= _
        Range("C4"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortNormal
    With ActiveWorkbook.Worksheets("ª©±ÄÁʤJ®w³æ").AutoFilter.Sort
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    Selection.AutoFilter
   
End Sub
Just do it.

¦^´_ 8# Scott090
Dear Scott090,
¦­¦w¡A«D±`·PÁ±zªºÂ²¤ÆVBA»yªk¡ATEST Excel 2019 & 2016  OK
«D±`ÁÂÁ±z¡I ^_^
Just do it.

TOP

¥»©«³Ì«á¥Ñ Scott090 ©ó 2019-5-25 21:57 ½s¿è

¦^´_ 7# jsc0518

       ¦A²¤Æ¦p¤U¡A¤£ª¾¬O§_¯à¥Î©ó¨ä¥Lª©¥»¡C
       Sheets("ª©±ÄÁʤJ®w³æ").select
      Range([C4], [H46]).Sort key1:=[C4], order1:=xlAscending, _
                                                  key2:=[G4], order2:=xlAscending, _
                                                  Header:=xlYes

TOP

¦^´_ 6# zheng211016

OK§Ú¥Î¬Ý¬Ý¡A¦³°ÝÃD¦A»P±z½Ð±Ð¡CÁÂÁ¡I
Just do it.

TOP

¦^´_ 5# jsc0518
¦n¤F ¦A¥Î¬Ý¬Ý
¦Û°Ê±Æ§Ç¥¨¶°.rar (21.29 KB)

TOP

¦^´_ 4# zheng211016
Hi ·PÁ±zªº¦^ÂÐ
§ÚÂI¿ï"¶×¤J­ì©l¸ê®Æ«ö¶s" OK
¦ýÂI¿ï"±Æ§Ç"«ö¶s®É¥X²{²§±`
µe­±¦p¤U¹Ï


   
Noname.jpg
2019-5-24 14:15
Just do it.

TOP

¸Õ¥Î¬Ý¬Ý ¦pªG§A»Ý­nªº¥u¬O±Æ§Ç¥\¯à¤£¥²­n¥Î¿z¿ï~
¥t¥~§Ú°µ¤F¤@­Ó¶×¤J­ì©l¸ê®Æªº«ö¶s ¬O§Ú¦b´ú¸Õªº®É­Ô¤è«K¨Ï¥Îªº
2019-05-23_204154.png
2019-5-23 20:42

¦Û°Ê±Æ§Ç¥¨¶°.rar (19.53 KB)

TOP

¦^´_ 2# zheng211016

Hi ©êºp¥¼ªþ¤WÀÉ®×
§Úªº¼ÐÃD¬O­n¯dµÛªº¡A§Ú¥»¨­¬O¥Î2019¿ý»s¥¨¶°¡A¦ý¦¹ÀÉ®×®³¦Ü2016ª©¥»®É¡A¥¨¶°°õ¦æ®É·|¦³»~ªº
¥i¥H²¤Æ»yªk¶Ü¡H¨Ã¥BÅý»yªk¬O¥i¥H³q¥Î©óexcel¨C­Óª©¥»

·P®¦¡I

¦Û°Ê±Æ§Ç¥¨¶°.rar (22.5 KB)
Just do it.

TOP

µo°Ý°O±oªþ¤WÀÉ®× ¤£µM°µ¿ù§A­nªºµ²ªG °Z¤£¬O¦h¥Õ¶O¥\¤Ò
ÁÙ¦³ §A¿z¿ï ¨S»¡­n¤£­n¯d¼ÐÃD

TOP

        ÀR«ä¦Û¦b : ¤Hªº²´·úªø¦b«e­±¡A¥u¬Ý¨ì§O¤Hªº¯ÊÂI¡Aµ·²@¬Ý¤£¨ì¦Û¤vªº¯ÊÂI¡C
ªð¦^¦Cªí ¤W¤@¥DÃD