Excel - Split data i flere rader

Utgave

Jeg vil dele en rekke data i flere rader med samme data i MS Excel. For eksempel har jeg et element med standardpakningsstørrelse på 100 stk per boks. Min kunde legger en bestilling på 1000 stk. Jeg vil gjerne ha dette bestillingselementet gjentatt 10 ganger i regnearket, med hver rad som har 100 stk som boksemengde.

Løsning

Først velg hele raden du vil gjenta.

Kjør følgende kode:

 Sub RepeatRow () Dim iRow som helhet Dim x Som helhet Dim y som integer iRow = ActiveCell.Row x = InputBox ("Antall ganger du vil vise den valgte raden:") y = 1 Gjør rader (iRow). .Insert Shift: = xlDown y = y + 1 Loop til y = x Application.CutCopyMode = False End Sub 

• Kjører koden vil la deg legge inn antall ganger du vil se radene gjentatte.
• I ditt tilfelle velg raden med 100 stk i den, kjør koden, skriv inn 10 og du vil se at den ene raden er omgjort til 10 rader.

Takk til Trowa for dette tipset.