Jak opakovat hodnotu buňky xkrát v aplikaci Excel?

---

Hodnoty buněk opakujte Xkrát se vzorcem a pomocným sloupcem

Chcete-li hodnoty buněk opakovat Xkrát, můžete vložit několik pomocných sloupců a poté použít nějaký jednoduchý vzorec, proveďte následující kroky:

1. Vložte sloupec nalevo od sloupce A a zadejte 1 do buňky A2, viz screenshot:

2. Pak dejte tento vzorec = A2 + C2 do A3 a přetáhněte úchyt výplně do buňky A6, viz screenshot:

3. A pak zadejte 1 do buňky D2 a vyplňte číslo přetažením automatického vyplňování na 12, což je celkový počet časů ve sloupci C, viz screenshot:

4. Poté zadejte tento vzorec = VLOOKUP (D2, $ A $ 1: $ B $ 6,2) do buňky E2 a zkopírujte dolů, získáte následující výsledek:

---

---

Opakujte hodnoty buněk Xkrát s kódem VBA

Pokud považujete první metodu za obtížně srozumitelnou, můžu vám zde také představit kód VBA, jak ji vyřešit.

1. Podržte ALT + F11 klíče a otevře se Okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula vložte následující kód do Okno modulu.

Kód VBA: Opakujte hodnoty buněk Xkrát

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. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a zobrazí se výzva k připomenutí, abyste vybrali rozsah, který obsahuje hodnoty a opakované časy, viz screenshot:

4, A klikněte na tlačítko OK, vyskočí další okno s výzvou, které vám umožní vybrat buňku pro vložení výsledku, viz screenshot:

5. Pak klikněte na tlačítko OK, a získáte výsledek, že vybrané hodnoty byly opakovány v zadaných časech, jak potřebujete.

---

Kopírujte a vkládejte hodnoty buněk Xkrát s úžasnou funkcí

Někdy možná budete muset zkopírovat a vložit hodnoty buňky xkrát na základě konkrétního počtu, Kutools pro Excel's Duplikujte řádky / sloupce na základě hodnoty buňky vám pomůže rychle zkopírovat a vložit řádky na základě zadaného počtu.

Po instalaci Kutools pro Excel, udělejte prosím toto:

1, klikněte Kutools > Vložit > Duplikujte řádky / sloupce na základě hodnoty buňky, viz screenshot:

2. V Zkopírujte a vložte řádky a sloupce dialogové okno vyberte Zkopírujte a vložte řádky možnost v Styl sekce, poté vyberte rozsah dat, který chcete duplikovat, a poté určete čas opakování pro kopírování a vložení řádků, viz screenshot:

4. Potom klepněte na tlačítko Ok or Podat žádost tlačítko, získáte podle potřeby následující výsledek:

Klikněte a stáhněte si Kutools pro Excel a bezplatnou zkušební verzi hned teď!