at skabe nye plader for hver linje i excel?

, med følgende koder, du kan skabe ny balance baseret på kolonne værdier eller skabe nye plader for hver linje i excel -.,, 1.presse, alat, + f11, nøgler samtidig åbne, microsoft visual basic for ansøgninger, vindue., 2.i microsoft visual basic for ansøgninger, vindue, klik, indsæt >, modul.og så pasta følgende kode i modul, vindue.,,, vba kode: skabe nye plader for hver linje baseret på kolonne, under parse_data() dim xrcount så længe dim xsht som kladde dim xnsht som kladde dim jeg så længe dim xtrrow som hele dim xcol som nye kollektion dim xtitle som snor dim xsupdate som boolean, der xsht = activesheet xrcount = xsht. celler (xsht.rows.count, 1). (xlup). ro xtitle = "a1: c1" xtrrow = xsht. rækkevidde (xtitle). celler (1). ro for i = 2 - xrcount om fejl genoptage næste opkald xcol. der tilsættes (xsht. celler (jeg, 1), xsht. celler (1, 1) næste på fejl genoptage næste xsupdate = application.screenupdating application.screenupdating = falske for i = 1 til xcol. tæl til xsht rækkevidde (xtit.le). autofilter, stk. 1, cstr (xcol. punkt i)), der er fastsat xnsht = intet at gøre xnsht = arbejdssedler (cstr (xcol. punkt i)), hvis xnsht er ikke så xnsht = opgaver. der tilsættes (plader (plader. tæl)) xnsht.name = cstr (xcol. punkt i) andre xnsht.move, ark (plader. tæl), hvis xsht. udvalg ("a" & xtrrow & ": en" & xrcount). entirerow.copy xnsht. udvalg ("a1") xnsht.columns.autofit næste xsht.autofiltermode = falske xsht.activate application.screenupdating = xsupdate ende afrika, konstaterer: a1: c1 er titlen vifte af bordet.du kan ændre det, baseret på deres behov. 3.presse, f5, nøglen til at løbe den kode, så der skabes nye opgaver, efter at alle papirer i den nuværende arbejdsbog som under skærmbillede:,,,,,, hvis du vil direkte skabe nye plader for hver linje uden hensyntagen til kolonnen værdi, kan du bruge følgende kode.,,, vba kode: direkte skaber nye plader for hver linje,,, - rowtosheet() dim xrow så længe dim jeg så længe med activesheet xrow =. udvalg ("a" & rækker. tæl). (xlup). ro for i = 1 til xrow papirer. der tilsættes (plader (plader. tæl). navn = "linje" &. jeg. rækker (i). kopi ark ("linje" & i). rækkevidde (a1) næste jeg ende med afrika, efter at den kode, hver linje i aktive arbejdsplan vil blive placeret i en ny arbejdsplan.,,, note: overskriften række vil også blive lagt i en ny sslog med denne vba kode.,,,,, skabe nye plader for hver linje med opdelte data om nytten af kutools for excel,,, faktisk, at ovennævnte metode er kompliceret og vanskelig at forstå.i dette afsnit, indfører vi dig, opdelte data, nytten af kutools for excel,.,, kutools for excel, med mere end 120 handy excel - tilføje ins, gratis prøve uden begrænsning i 60 dage. gå til at downloade gratis 60 dayspurchase, brug /mycommerce, 1.vælg det bord, du skal bruge for at skabe nye plader, så klik, enterprise >, spyt data.se skærmbillede:,,,,, 2.i deler data i flere papirer, dialog kasse, gør som følger.,,, a. for at skabe nye lagner baseret på kolonnen værdi:,,, 1).vælg den særlige kolonne mulighed, og fastsætte en kolonne, at du ønsker at dele data baseret på i ud liste;,, 2).hvis du vil have et navn papirer med kolonne værdier, vælg, værdierne i kolonne i, regler, ud over;,, 3).klik, okay, button.se skærmbillede:,,,,,, b) til direkte at skabe nye plader for hver linje:,,, 1).vælg, faste linjer, valg, ind i nummer 1, i rubrik;,, 2).vælg, række tal fra, regler, ud over;,, 3).klik, okay, button.se,,,,, skærmbillede: en ny dagbog er skabt med alle nye lagner ind.se screenshots nedenfor.,, skabe nye plader for hver linje baseret på kolonnen værdi:,,,,, skaber nye plader for hver linje uden hensyntagen til kolonne værdi:,,,,,, kutools for excel, med mere end 120 handy excel - tilføje ins, gratis prøve uden begrænsning i 60 dage. gå til at downloade gratis 60 dayspurchase, brug /mycommerce,,,


arrow blue right bubble







Previous:
Next Page: