Hvordan gentages celleværdien x gange i Excel?

---

Gentag celleværdier X gange med formel og hjælpekolonne

For at gentage celleværdierne X gange kan du indsætte nogle hjælpekolonner og derefter anvende en simpel formel. Gør med følgende trin:

1. Indsæt en kolonne til venstre for kolonne A, og skriv 1 i celle A2, se skærmbillede:

2. Sæt derefter denne formel = A2 + C2 ind i A3, og træk påfyldningshåndtaget til cellen A6, se skærmbillede:

3. Og indtast derefter 1 i celle D2, og udfyld nummeret ved at trække den automatiske udfyldning til 12, som er det samlede antal gange antallet i kolonne C, se skærmbillede:

4. Indtast derefter denne formel = VLOOKUP (D2, $ A $ 1: $ B $ 6,2) ind i celle E2 og kopiere ned, får du følgende resultat:

---

---

Gentag celleværdier X gange med VBA-kode

Hvis du mener, at den første metode er vanskelig at forstå, her kan jeg også introducere dig VBA-kode for at løse den.

1. Hold nede ALT + F11 tasterne, og det åbner Vinduet Microsoft Visual Basic til applikationer.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: Gentag celleværdier X gange

Sub CopyData()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
For Each Rng In InputRng.Rows
    xValue = Rng.Range("A1").Value
    xNum = Rng.Range("B1").Value
    OutRng.Resize(xNum, 1).Value = xValue
    Set OutRng = OutRng.Offset(xNum, 0)
Next
End Sub

3. Tryk derefter på F5 nøgle til at køre denne kode, og der vises et promptfelt for at minde dig om at vælge det interval, der indeholder værdierne og gentagne gange, se skærmbillede:

4. og klik OK, en anden promptboks vises, så du kan vælge en celle til at placere resultatet, se skærmbillede:

5. Klik derefter på OK, og du får det resultat, at dine valgte værdier er gentaget angivet gange efter behov.

---

Kopier og indsæt celleværdier X gange med en fantastisk funktion

Nogle gange kan det være nødvendigt at kopiere og indsætte celleværdier x gange baseret på det specifikke nummer, Kutools for Excel's Kopier rækker / kolonner baseret på celleværdi kan hjælpe dig med hurtigt at kopiere og indsætte rækkerne baseret på det nummer, du har angivet.

Efter installation Kutools for Excelskal du gøre som dette:

1. Klik Kutools > indsatte > Kopier rækker / kolonner baseret på celleværdi, se skærmbillede:

2. I Kopier og indsæt rækker og kolonner dialogboksen, vælg Kopier og indsæt rækker valgmulighed i Type sektion, vælg derefter det dataområde, du vil duplikere, og angiv derefter gentagelsestiden for at kopiere og indsætte rækkerne, se skærmbillede:

4. Klik derefter på Ok or Indløs knappen, får du følgende resultat, som du har brug for:

Klik for at downloade Kutools for Excel og gratis prøveversion nu!