, sorteren in de cellen van de werkzaamheden in de tabel, kun je de volgende formule van de generaal, doe dat alsjeblieft:,, 1.In Je gegevens, gelieve de volgende formule, in dit geval, zal ik het in de cel C1, een screenshot:,,, = de tekst (en (kleine (- op middellange termijn (A1, (indirecte ("1:" & len (A1))), 1 (indirect), ("1:" & len (A1)))) * 10 ^ (len (A1) (indirecte ("1:" & len (A1))), verslagen ("0", de len (A1))),,,,,,,, 2.En dan de CTRL + shift + enter, sleutel, en die in de werkingssfeer van het vullen met voor de toepassing van deze formule, en je krijgt het nummer al van groot tot klein sorteren.Kijk 's:,,,,,,,,,, noot: 1.Als dit cijfer in de cel van meer dan 15, deze formule zal niet de juiste resultaten te verkrijgen.Als je wilt in dalende volgorde van de numerieke volgorde, kun je deze formule:, = de tekst (en (grote (- op middellange termijn (A1, (indirecte ("1:" & len (A1))), 1), de (indirecte ("1:" & len (A1) (10)) * ^ len (A1) (indirecte ("1:" & len (A1))), verslagen ("0", de len (A1),,, 3).In de bovenstaande formule blijkt dat een aantal A1 bevat de cel, je kan je veranderen.,,,,, de cijfers in de cel en de definitie van de functies, met bepaalde beperkingen van de formule, kun je de volgende definitie van de functies, de gebruikers in de cel van meer dan 15 cijfers sorteren.,,, 1.Op het Alt+F11, sleutels, het openstellen van Microsoft de visuele van toepassing.,,,,, 2.- steek, >, modules en gebruik de volgende codes, module.,,,,, de code van de VBA: het aantal categorieën in de cel, sortnumsincell (pnum, functie, als een string, facultatieve poeder voor de vernieuwing van het touw als booleaanse) 20140717 donkere xoutput voor i = 0 tot en met 9 j = 1 UBound. De VBA. Delen van (pnum, ik xoutput = '(poeder)), ik & xoutput, xoutput & ik) sortnumsincell = xoutput einde functies,, 3, en het redden en het sluiten van deze code, terug naar je werk, en de inbreng van Deze formule, = sortnumsincell (A1), in de blanco de cel naast de gegevens naar een screenshot:,,,,,,,, 4.En dan sleep aan te vullen met deze formule cellen moeten in de cel, en alle cijfers zijn door een screenshot als volgt:,,,,,,, noot: als u wilt dat de volgorde van de numerieke volgorde, gelieve deze formule = sortnumsincell (a1,1),,,,,, sorteren. Het door de komma 's in de cel en de code van de VBA,,, als je nummer door bepaalde mensen is als een komma, een puntkomma' s, zoals de screenshot, hoe hou je ze in de cel?Nu, dit is een code die je aan de indeling van de VBA.,,,,,,, 1.Op het Alt+F11, open de sleutel, Microsoft visuele van toepassing.,,,,, 2.- steek, >, modules en gebruik de volgende codes, module.,,,,, de rang van de VBA code: door een komma in de cel, zoon, sortnumsinrange (), vernieuwing van de schemering 20140717 de workrng rng toepassingsgebied Fuzzy arr variant fouten te herstellen xtitleid = "kutoolsforexcel" workrng = toepassing. De keuze die de toepassing van workrng =. Inputbox ("Werkingssfeer", xtitleid, workrng. Adres: = 8) tot vaststelling van objarraylist = createobject ("systeem. Van elke willekeurige workrng. Arraylist") voor de splitsing van de VBA arr. (rng.value, "," Ik = 0) met het oog Op de UBound (ARR) xmin = - = I + 1 UBound (ARR) als arr (xmin) > arr (J) en J. Xmin = als als xmIn < > dan ben ik tijdelijk = arr (i), (i) = (xmin arr (ARR) xmin) = de temperatuur als ik rng. = de VBA. Toetreding (ARR, ",") van een,,, 3.En de pers F5, exploitatie van de code, en dan kies je cellen, met inbegrip van de dozen in de POP - up, kijk 's digitale: 4,,,,,,,,.En daarna, oké, in de cel voor alle nummers zijn gesorteerd in de oorspronkelijke werkingssfeer.,,, dat je kan veranderen van komma 's "," andere kenmerken, zoals je de code nodig.Deze code kan alleen maar gegevens naar soort stijgen.,,,,