Note: The other languages of the website are Google-translated. Back to English

Hogyan lehet megismételni a cellák értékét x alkalommal az Excelben?

Például van egy értéklistája az A oszlopban, és meg szeretné ismételni az értékeket meghatározott számú alkalommal a B oszlopban szereplő számok alapján, a bal oldali képernyőképen látható módon, hogyan érhetné el ezt az Excelben?

 

Ismételje meg a sejtértékeket X-szer a képlettel és a segítő oszloppal

A cellaértékek X-szeres megismételéséhez beszúrhat néhány segédoszlopot, majd alkalmazhat néhány egyszerű képletet, kérjük, tegye a következőket:

1. Helyezzen be egy oszlopot az A oszlop bal oldalán, és írja be az 1 cellát az A2 cellába, lásd a képernyőképet:

2. Akkor tegye ezt a képletet = A2 + C2 az A3-ba, és húzza a kitöltő fogantyút az A6 cellába, lásd a képernyőképet:

3. Ezután írjon be 1-et a D2 cellába, és töltse ki a számot úgy, hogy az automatikus kitöltést 12-re húzza, amely a C oszlopban szereplő számok száma, lásd a képernyőképet:

4. Ezután írja be ezt a képletet = VLOOKUP (D2, $ A $ 1: $ B $ 6,2) az E2 cellába és másolja le, a következő eredményt kapja:

  • Megjegyzések:
  • 1. Ebben a képletben D2 jelzi az első cellát, amelyet kitöltött a számsorozattal, és A1: B6 az első segítő oszlop tartományát és az eredeti cellaértékeket jelenti, amelyeket meg kell ismételni.
  • 2. Az ismételt értékek megszerzése után átmásolhatja és beillesztheti őket értékekként bármely más helyre.

X-szer másolja és helyezze be a sorokat adott szám alapján

Általában nincs jó módszer a sorok többszörös másolására és beszúrására, kivéve a manuális másolást és beszúrást. De, azzal Kutools az Excel számára's Sorok / oszlopok duplikálása a cellaérték alapján funkcióval könnyedén megoldhatja ezt a problémát. Kattintson a Kutools for Excel letöltéséhez!

Kutools az Excel számára: több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 60 nap alatt kipróbálható. Töltse le és ingyenes próbaverziót most!


Ismételje meg a cellaértékeket X-szer VBA kóddal

Ha úgy gondolja, hogy az első módszer nehezen érthető, itt bemutathatom Önnek a VBA-kódot is annak megoldására.

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA kód: Ismételje meg a cellaértékeket X-szer

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. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, és megjelenik egy felszólító mező, amely emlékezteti Önt arra, hogy válassza ki az értékeket és az ismételt időket tartalmazó tartományt, lásd a képernyőképet:

4. és kattintson OK, megjelenik egy újabb prompt doboz, amely lehetővé teszi, hogy kiválasszon egy cellát az eredmény feladásához, lásd a képernyőképet:

5. Ezután kattintson OK, és megkapja azt az eredményt, hogy a kiválasztott értékeket szükség szerint megismételtük meghatározott időkben.


Másolja és helyezze be a cellák értékét X-szer egy fantasztikus funkcióval

Előfordulhat, hogy x-szer kell másolnia és beillesztenie a cellaértékeket a megadott szám alapján, Kutools az Excel számára's Sorok / oszlopok duplikálása a cellaérték alapján segíthet a sorok gyors másolásában és beszúrásában a megadott szám alapján.

Tipp:Ennek alkalmazásához Sorok / oszlopok duplikálása a cellaérték alapján funkció, először is le kell töltenie a Kutools az Excel számára, majd gyorsan és egyszerűen alkalmazza a funkciót.

Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:

1. Kattints Kutools > betétlap > Sorok / oszlopok duplikálása a cellaérték alapján, lásd a képernyőképet:

2. Az Sorok és oszlopok másolása és beszúrása párbeszédpanelen válassza ki Sorok másolása és beszúrása lehetőség a típus szakaszban, majd válassza ki a másolni kívánt adattartományt, majd adja meg az ismétlési időt a sorok másolásához és beszúrásához, lásd a képernyőképet:

4. Ezután kattints a gombra Ok or alkalmaz gombra kattintva a következő eredményt kapja:

Kattintson a Kutools for Excel és az ingyenes próbaverzió letöltéséhez!


A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
officetab alja
A megjegyzések rendezése szerint
Hozzászólások (45)
Az 5-t az 5-ből kiértékelte · 1 értékelés
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszönöm ezt, nagyon könnyen kivitelezhető és érthető. Régebben ezt kézzel csináltam 2600 cellával.
A weboldal moderátora ezt a megjegyzést minimalizálta
Van mód arra, hogy a makró megjegyezze a bemeneti és kimeneti célt, így a makró legközelebbi futtatásakor ne kelljen újra kijelölnie?
A weboldal moderátora ezt a megjegyzést minimalizálta
A VBA-kód megszakad, ha 0 érték van a "sokszor" oszlopban. Állítsa be a For Each ciklust az alábbiak szerint: Minden Rng InputRng.Rows esetén xÉrték = Rng.Range("A1").Érték xNum = Rng.Range("B1").Érték, ha xNum > 0, akkor OutRng.Resize(xNum, 1).Érték = xÉrték beállítása OutRng = OutRng.Offset(xNum, 0) End If Next
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszi haver!! Sok időt megtakarított. :-)
A weboldal moderátora ezt a megjegyzést minimalizálta
Az első módszert alkalmaztam, hibátlanul működött, köszönöm.
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszi haver ..!! Ez működik, és rengeteg időt spóroltam meg.
A weboldal moderátora ezt a megjegyzést minimalizálta
Kösz!! Rengeteg időt spóroltam meg. A vlookup okos használata!
A weboldal moderátora ezt a megjegyzést minimalizálta
Mint #John Said, van-e mód arra, hogy beállítsa a tartományt, hogy ne kelljen kiválasztania. Megpróbálok minden egyes értéket a saját oszlopába beilleszteni. Módosítottam a Set OutRng=OutRng.offset(xNum,0) sort Set OutRng=OutRng.offset(xNum,1) értékre, hogy megpróbáljam oszlopokká alakítani. Úgy tűnik, hibát kapok az OutRng.Resize(xNum) sorban ,1).value=xValue akkor is, ha kimásolom és beillesztem a kódot erről az oldalról. Bármilyen segítséget nagyra értékelnénk.
A weboldal moderátora ezt a megjegyzést minimalizálta
köszi szépen!!!! A VB Macro nekem bevált, és megspórolta az 1 hetes időmet... Köszönöm még egyszer.
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia! Működni fog a cikkben javasolt VBA kód, ha a hányszoros cellák nincsenek az értéket tartalmazó cellák mellett? Ha nem, van mód a VBA módosítására, hogy működjön?
A weboldal moderátora ezt a megjegyzést minimalizálta
Nagyon szépen köszönöm. :)
A weboldal moderátora ezt a megjegyzést minimalizálta
Üdvözlöm, egy kérdésem lenne: Alapadatok: Ügyfél országa Teljes kimenet: Ügyfél1 Ügyfél2 Ügyfél3 (ha van) Ország1 Ország2 és így tovább...(ha van) Összességében 1 Összességében2 és így tovább...(ha van) Kérem, bárki tud oldja meg ezt a képlet használata közben az Excelben minél hamarabb
A weboldal moderátora ezt a megjegyzést minimalizálta
Fantasztikus! Nagyon köszönöm!!!!!!!!
A weboldal moderátora ezt a megjegyzést minimalizálta
Még mindig ment a projektek 2017-ben! Nagyon köszönöm ezt! :-)
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszönöm szépen haver, remek munkát végeztél.
A weboldal moderátora ezt a megjegyzést minimalizálta
Van mód a kód megváltoztatására úgy, hogy 2 oszlop legyen az adatokkal és 1 oszlop az ismétlések mennyiségével? azaz A1 = x B2 = y C3 = 2 a makró ezután kétszer megismétli az A1-et és kétszer a b2-t a jobb oldali cellákban. Bármilyen segítségre van szükség. Kösz.
A weboldal moderátora ezt a megjegyzést minimalizálta
Ez nagyon hasznos volt, jól jött a munkafüzet készítéséhez
A weboldal moderátora ezt a megjegyzést minimalizálta
मैं बहुत दिनों से यह ऑप्शन ढूढ रहा धऍऍुाा
A weboldal moderátora ezt a megjegyzést minimalizálta
A VBA vagy a képlet. Nekem egyik sem működik. "Alkalmazás definiált vagy objektum definiált hibát" 1004-es hibát ad. Tud valaki segíteni?
A weboldal moderátora ezt a megjegyzést minimalizálta
A VBA kód nem működik, ha nincs Kutools. "A változó nincs megadva" hibát ad
Még senki sem írt megjegyzést
Több ingatlan
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi