Gå til hovedindhold

Hvordan gentager man rækker et bestemt antal gange baseret på en anden kolonne i Excel?

Har du nogensinde prøvet at gentage en række baseret på en anden kolonneværdi som vist nedenstående skærmbillede? I denne artikel vil jeg introducere metoden til løsning af dette job i Excel.
doc gentage rækker baseret på kolonne 1

Gentag rækker baseret på en anden kolonneværdi med VBA

Gentag rækker baseret på en anden kolonneværdi af Kutools til Excel

Gentag rækker med en fast tid af Kutools til Excel


Gentag rækker baseret på en anden kolonneværdi med VBA

Her har jeg en kode, som hurtigt kan gentage rækkerne baseret på de sidste kolonneværdier.

1. Trykke Alt + F11 taster for at aktivere Microsoft Visual Basic til applikationer vindue.

2. klik indsatte > Moduler, kopier derefter nedenstående kode og indsæt den i den nye Moduler scripts.

VBA: Gentag rækker baseret på en anden kolonneværdi

Sub CopyRow()
'UpdatebyExtendoffice20181011
Dim xRg As Range
Dim xCRg As Range
Dim xFNum As Integer
Dim xRN As Integer
On Error Resume Next
SelectRange:
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select the number value", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub

If xRg.Columns.Count > 1 Then
    MsgBox "Please select single column!"
    GoTo SelectRange
End If
Application.ScreenUpdating = False
For xFNum = xRg.Count To 1 Step -1
Set xCRg = xRg.Item(xFNum)
    xRN = CInt(xCRg.Value)
    With Rows(xCRg.Row)
    .Copy
    .Resize(xRN).Insert
    End With
Next
Application.ScreenUpdating = True
End Sub

doc gentage rækker baseret på kolonne 2

3. Trykke F5 tast, en dialog vises, vælg den nummerliste, som rækkerne gentages ud fra.
doc gentage rækker baseret på kolonne 3

4. Klik på OK, rækkerne er gentaget baseret på den valgte kolonneværdi.
doc gentage rækker baseret på kolonne 1


Gentag rækker baseret på en anden kolonneværdi af Kutools til Excel

Hvis du ikke er god til at bruge VBA, kan du prøve Kutools til Excel's Dublerede rækker/kolonner baseret på celleværdi funktion, som kun skal bruge to trin.

Kutools til Excel, med mere end 300 praktiske funktioner, der gør dine job lettere. 

1. klik Kutools > indsatte > Dublerede rækker/kolonner baseret på celleværdi.
doc gentage rækker fast tid 1

2. I pop op-dialogboksen skal du vælge Kopier og indsæt rækker valgmulighed i Type sektion, og vælg derefter det område, du vil gentage til Indsæt Range tekstboksen, og vælg den kolonne, der bestemmer gentagelsestiderne til Gentag gange tekstboks. Klik på Ok.
doc gentage rækker fast tid 1

Derefter vil rækkerne blive gentaget af den valgte kolonne.
doc gentage rækker fast tid 1


Gentag rækker med en fast tid af Kutools til Excel

Hvis du vil gentage rækker med en fast tid uden at indsætte rækker en efter en, kan du prøve at bruge Indsæt tomme rækker og kolonner , Fyld tomme celler forsyninger af Kutools til Excel for hurtigt at håndtere dette job.
doc gentage rækker fast tid 1

Efter installation Kutools til Excel, gør venligst som nedenfor:(Gratis download Kutools til Excel nu!)

1. Vælg det dataområde, du vil gentage rækker, klik på Kutools > indsatte > Indsæt tomme rækker og kolonner. Derefter i Indsæt tomme rækker og kolonner dialog, tjek Tomme rækker indstilling, skriv derefter 1 ind Interval of tekstboks, og skriv det nummer, du vil gentage rækker i Rækker tekstboks.
doc gentage rækker fast tid 2

2. klik Ok, de tomme rækker er indsat under hver række.
doc gentage rækker fast tid 3

3. Hold det valgte interval, klik Kutools > indsatte > Fyld tomme celler. I Fyld tomme celler dialog, tjek Baseret på værdier , ned valgmuligheder.
doc gentage rækker fast tid 4

4. klik Ok. Nu er de tomme celler fyldt med ovenstående værdi.
doc gentage rækker fast tid 5

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Update on my previous comment. It looks like it's not happening everytime but I can't see why some rows are working as expected and others aren't.
This comment was minimized by the moderator on the site
Hi, Megan Brennan, could you show me what rows the feature won't work at?
This comment was minimized by the moderator on the site
Hi there,

I've just tried the Repeat rows based on another column value by Kutools for Excel functionality and it seems to be squaring the (repeat value + 1).

For example if I have a repeat value for a row as 2, then it repeats that row another 8 times to make a total of 9 rows of the same data.
If I have a repeat value of 4, then it repeats that row for another 24 times to make a total of 25 rows of the same data.

So repeat value of 1 -> Total 4 rows -> Should be total of 2
2 -> Total 9 rows -> Should be total of 3
3 -> Total 16 rows -> Should be total of 4
4 -> Total 25 rows -> Should be total of 5
7 -> Total 64 rows -> Should be total of 8
This comment was minimized by the moderator on the site
Hi, how to move the repeated output to the side of the original data?
This comment was minimized by the moderator on the site
Hi,yiyun zhu, you can make a copy of the original data, then use above method to handle the copy one, and keep the original data .
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations