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

Hoe kan ik dezelfde tekst in elke andere rij in Excel invoegen?

In dit artikel laten we u zien hoe u dezelfde tekst in elke andere rij in Excel kunt invoegen. Blader voor meer details.

Voeg dezelfde tekst in elke rij in met VBA-code
Voeg dezelfde tekst in elke andere rij in met Kutools voor Excel


Voeg dezelfde tekst in elke rij in met VBA-code

Stel dat u de teksten "Naam", "Gegevens" en "Score" wilt invoegen in elke rij in het bepaalde bereik, zoals onderstaand screenshot. Probeer de volgende VBA-code.

1. Druk in het werkblad op anders + F11 toetsen tegelijkertijd om het Microsoft Visual Basic voor toepassing venster.

2. klikken Invoegen > Module. Zie screenshot:

3. Kopieer en plak onderstaande VBA-code in de code-editor.

VBA-code: voeg dezelfde tekst in elke rij in Excel in

Sub inserttexteveryonerow()
	Dim Last As Integer
	Dim emptyRow As Integer
	Last = Range("A" & Rows.Count).End(xlUp).Row
	For emptyRow = Last To 2 Step - 1
		If Not Cells(emptyRow, 1).Value = "" Then
			Rows(emptyRow).Resize(1).Insert
			Range(Cells(emptyRow, "A"), Cells(emptyRow, "C")).Value = Array("Name", "Date", "Sore")
		End If
	Next emptyRow
End Sub

Opmerkingen: In de bovenstaande code:

1. Uw gegevens moeten vanaf de eerste rij in het werkblad worden gestart.
2. Wijzig de teksten van "Naam", "Gegevens" en "Partituur" naar de teksten die u nodig heeft.
3. De letter A en C geven het celbereik aan waar u de specifieke tekst wilt invoegen.
4. druk de F5 sleutel om de code uit te voeren. En u kunt zien dat de opgegeven teksten in elke rij in uw werkblad worden toegevoegd.

Voeg dezelfde tekst in elke andere rij in met Kutools voor Excel

Met de bovenstaande code kunt u gewoon tekst in elke rij invoegen. Hoe zit het met het invoegen van tekst in elke n rij in Excel? In deze sectie laten we u de Titels invoegen nut van Kutools for Excel. Met dit hulpprogramma is het invoegen van tekst in elke n rij geen probleem meer.

Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.

1. klikken Kutools > Invoegen > Titelsrijen invoegen om dit hulpprogramma in te schakelen.

2. In de Titelsrijen invoegen dialoogvenster, moet u:

1). Selecteer het bereik van de teksten die u in elke n rij in het Titelbereik doos;
2). Selecteer het bereik waarin u teksten wilt invoegen in het Bereik invoegen doos;
3). Geef het intervalrijnummer op in het Interval rijen doos. Als u in elke rij tekst wilt invoegen, voert u 1 in het vak in en voor elke n rij voert u n in het vak in;
4). Klik op de OK knop.

Nu wordt de opgegeven tekst ingevoegd in elke n rij in het geselecteerde bereik.

  Als u een gratis proefperiode (30 dagen) van dit hulpprogramma wilt, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.


De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.
kte tabblad 201905

Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert elke dag honderden muisklikken!
officetab onderkant
Comments (4)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
Bedankt, de code was precies wat ik nodig had. Eén vraag, ik heb gegevens die ik om de andere rij wil herhalen, maar alleen voor specifieke rijen, waarna een nieuwe reeks tekst begint die ik wil herhalen. Hoe verander ik de code om de herhaling bij een specifieke rij te stoppen?
Deze opmerking is gemaakt door de moderator op de site
VOLG MIJN INSTRUCTIE OP GOOGLE.COM
Deze opmerking is gemaakt door de moderator op de site
Heel erg bedankt voor deze VBA-code en andere. Ze hebben veel van mijn problemen opgelost, werkend met een enorme dataset!!
Deze opmerking is gemaakt door de moderator op de site
heel erg bedankt.
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties