Как да повторя стойността на клетката x пъти в Excel?

---

Повторете стойностите на клетките X пъти с формула и помощна колона

За да повторите стойностите на клетката X пъти, можете да вмъкнете няколко помощни колони и след това да приложите някаква проста формула, моля, направете следните стъпки:

1. Вмъкнете колона отляво на колона A и въведете 1 в клетка A2, вижте екранната снимка:

2. След това поставете тази формула =A2 + C2 в A3 и плъзнете манипулатора за запълване към клетка A6, вижте екранната снимка:

3. И след това въведете 1 в клетка D2 и попълнете числото, като плъзнете автоматичното попълване до 12, което е общият брой пъти в колона C, вижте екранната снимка:

4. След това въведете тази формула =VLOOKUP(D2,$A$1:$B$6,2) в клетка E2 и копирайте надолу, ще получите следния резултат:

---

---

Повторете стойностите на клетките X пъти с VBA код

Ако смятате, че първият метод е труден за разбиране, тук мога да ви представя и VBA код, за да го разрешите.

1. Задръжте натиснат ALT + F11 ключове и отваря Прозорец на Microsoft Visual Basic за приложения.

2. Щракнете Поставете > Модулии поставете следния код в Прозорец на модула.

VBA код: Повторете стойностите на клетките X пъти

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. След това натиснете F5 за да стартирате този код и ще се появи поле за подкана, за да ви напомни да изберете диапазона, който съдържа стойностите и повторените времена, вижте екранната снимка:

4, И натиснете OK, ще изскочи друго поле за подкана, което ви позволява да изберете клетка, за да поставите резултата, вижте екранната снимка:

5, След това кликнете OKи ще получите резултата, че избраните от вас стойности са били повторени определени пъти, колкото ви е необходимо.

---

Копирайте и вмъкнете стойности на клетки X пъти със страхотна функция

Понякога може да се наложи да копирате и вмъкнете стойностите на клетките x пъти въз основа на конкретното число, Kutools за Excel's Дублиране на редове / колони въз основа на стойността на клетката може да ви помогне бързо да копирате и вмъкнете редовете въз основа на посочения от вас номер.

След инсталиране Kutools за Excel, моля, направете следното:

1. Щракнете Kutools > Поставете > Дублиране на редове / колони въз основа на стойността на клетката, вижте екранна снимка:

2. В Копирайте и вмъкнете редове и колони изберете диалоговия прозорец Копирайте и вмъкнете редове опция в Тип раздел, след това изберете диапазона от данни, който искате да дублирате, и след това задайте времето за повторение за копиране и вмъкване на редовете, вижте екранната снимка:

4, След това кликнете върху Ok or Добавете Обява бутон, ще получите следния резултат, както ви е необходим:

Щракнете, за да изтеглите Kutools за Excel и безплатна пробна версия сега!