Kubi

¦^´_ 15# »a³·
¥i¯à­n¥ý¤F¸Ñ2­Ó°ÝÃD¡G
1.±Æ§Ç¯Á¤ÞÄæ¬O¦b¨º¤@Äæ¡H¨Ò¦p¡G¥»µ{¦¡¬O¥HAÄæ°µ¬°±Æ§Ç±ø¥ó¡C
2.¦UÄæ²Ä1¦C¦³¨S¦³©ïÀY¡H

¥»¥¨¶°¬O³z¹L»²§UÄæ¨Ó±Æ§Çªº¡A©Ò¥H­n¥ýÂç²MÄæ¦ì¦ì¸m¤Î¼Æ¶q¡A¦p¯à¤W¶ÇÀɮקó¦n¡C

»a³·

¦^´_ 14# Kubi


©êºp¡A¬Ý¤F¤@¤U¡A¬O§Ú¶¶§Ç©ñ¿ù¤F¡C
³o­Ó°£¤F±Æ§Ç³o­ÓÀx¦s®æ¥~¡A¬Û¦Prow¥i¥H¤@°_²¾°Ê¶Ü¡H

Kubi

¦^´_ 1# »a³·
¥ÎVBA¸Ñ¦p¤U¡G
Sub test()
    arr = Array("L20", "L10", "L30")
    Application.AddCustomList listArray:=arr
    n = Application.CustomListCount
    For r = 1 To 9
        Cells(r, 2).Value = Split(Cells(r, 1).Value, "[")(0)
        Cells(r, 3).Value = Split(Split(Cells(r, 1).Value, "/")(0), "[")(1)
        Cells(r, 4).Value = Split(Split(Cells(r, 1).Value, "/")(1), "]")(0)
    Next r
    [A1].CurrentRegion.Sort Key1:=[B1], OrderCustom:=n + 1, key2:=[C1], key3:=[D1]
    Application.DeleteCustomList n
    Columns("B:D").Delete
End Sub

¥t¥~©³¤U¶¶§Ç¬O§_¤Ï¤F¡H

L20[7.5/B.5]S
L20[7/C]N

À³¸Ó¬O¡G
L20[7/C]N
L20[7.5/B.5]S

»a³·

¦^´_ 12# hcm19522


    ¸g¹L¹Á¸Õ¡Aµ²ªGÁÙ¬O¸ò¤§«e¤@¼Ë...¥X¨Óªºµ²ªG¥u¦³¤@­Ó
    ¤£·|¥¿±`ªº±Æ§Ç... ...

hcm19522

¦^´_ 11# hcm19522

hcm19522

¦^´_ 10# »a³·

±qµe­±¸Ì ±`¥Î§ï"¤½¦¡" ,¦A¤â°Ê§ï"¦Û°Ê"

»a³·

¦^´_ 9# hcm19522


   

¤U¸ü (15.9 KB)
¹êÅçµ²ªG

2017-12-20 16:12

§Ú¨ú¤U ¡eINDEX(A:A,RIGHT(SMALL(MID(A$2:A$10,2,2)*10^9+MID(A$2:A$10,5,FIND("/",A$2:A$10)-5)*10^6+CODE(MID(A$2:A$10,FIND("/",A$2:A$10)+1,1))/1%+ROW(A$2:A$10),ROW(A1)),2))¡f
¨Ó¨Ï¥Î¡Aµ²ªG±o¨ìªº¬O ¹Ï¤ùªºµ²ªG...

hcm19522

¦^´_ 8# »a³·

­ì½ZE2:E10{=INDEX(A:A,RIGHT(SMALL(MID(A$2:A$10,2,2)*10^9+MID(A$2:A$10,5,FIND("/",A$2:A$10)-5)*10^6+CODE(MID(A$2:A$10,FIND("/",A$2:A$10)+1,1))/1%+ROW(A$2:A$10),ROW(A1)),2))

»a³·

¦^´_ 7# hcm19522


    ¦³³á¡A§Úª¾¹DCtrl+Shift+Enter
    ¤µ¤Ñ¤ÏÂЪº¦A¸Õ¤F´X¦¸¡A³£ÁÙ¬O¤@¼Ëªº±¡ªp

    µ²ªG¥X¨Ó·|¬O E2:10 ³£¬O L20[2/E]S

hcm19522

¦^´_ 6# »a³·

½Æ»s¤½¦¡ ¤£§t "=" ,¶K¤W«á¥[ "="   ;³Ì«e "{" ¥Nªí shift+ctrl+enter ¤TÁä¤@°_«ö©Ò²£¥Í ,«Dµ{¦¡¸Ì­±