Preskoči na glavno vsebino

Kako vstaviti isto besedilo v vsako drugo vrstico v Excelu?

V tem članku vam bomo pokazali, kako vstavite isto besedilo v vsako drugo vrstico v Excelu. Prosimo, poiščite več podrobnosti.

V vsako vrstico vstavite isto besedilo s kodo VBA
Vstavite isto besedilo v vsako drugo vrstico s programom Kutools za Excel


V vsako vrstico vstavite isto besedilo s kodo VBA

Recimo, da želite v vsako vrstico v določenem obsegu vstaviti besedila "Ime", "Podatki" in "Ocena", kot je prikazano spodaj. Preizkusite naslednjo kodo VBA.

1. Na delovnem listu pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za uporabo okno.

2. klik Vstavi > Moduli. Oglejte si posnetek zaslona:

3. Kopirajte in prilepite spodnjo kodo VBA v urejevalnik kod.

Koda VBA: vstavite isto besedilo v vsako vrstico v Excelu

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

Opombe: V zgornji kodi:

1. Vaše podatke je treba začeti iz prve vrstice na delovnem listu.
2. Spremenite besedila »Ime«, »Podatki« in »Ocena« na besedila, ki jih potrebujete.
3. Črki A in C označujeta obseg celic, kamor želite vstaviti določeno besedilo.
4. Pritisnite F5 tipko za zagon kode. In vidite, da so določena besedila dodana v vsaki vrstici na vašem delovnem listu.

Vstavite isto besedilo v vsako drugo vrstico s programom Kutools za Excel

Z zgornjo kodo lahko preprosto vstavite besedilo v vsako vrstico. Kaj pa vstaviti besedilo v vsako n vrstico v Excelu? V tem poglavju vam bomo pokazali Vstavi vrstice Naslovi uporabnost Kutools za Excel. S tem pripomočkom vstavljanje besedila v vsako n vrstic ne bo več problem.

Pred vložitvijo vloge Kutools za ExcelProsim najprej ga prenesite in namestite.

1. klik Kutools > Vstavi > Vstavi vrstice naslovov da omogočite to pripomoček.

2. V Ljubljani Vstavi vrstice naslovov pogovorno okno, morate:

1). Izberite obseg besedil, ki jih želite vstaviti v vsako n vrstico v Obseg naslova škatla;
2). Izberite obseg, v katerega želite vstaviti besedila v Vstavi obseg škatla;
3). Določite številko intervalske vrstice v Intervalne vrstice škatla. Če želite v vsako vrstico vstaviti besedilo, v polje vnesite 1, za vsako n vrstic pa v polje n;
4). Kliknite OK gumb.

Zdaj je določeno besedilo vstavljeno v vsakih n vrstic v izbranem obsegu.

  Če želite imeti brezplačno (30-dnevno) preskusno različico tega pripomočka, kliknite, če ga želite prenestiin nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.

Najboljša pisarniška orodja za produktivnost

🤖 Kutools AI Aide: Revolucionirajte analizo podatkov na podlagi: Inteligentna izvedba   |  Ustvari kodo  |  Ustvarite formule po meri  |  Analizirajte podatke in ustvarite grafikone  |  Prikličite funkcije Kutools...
Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

Opis


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
thanks you so much.
This comment was minimized by the moderator on the site
Thank you so much for this VBA code and other. They have solved many of my problems, working with a huge data set!!
This comment was minimized by the moderator on the site
Thank you, the code was exactly what I needed. One question, I have data that I want repeated every other row but only to specific rows then a new string of text starts that I want repeated. How to I change the code to reflect stopping the repeat at a specific row?
This comment was minimized by the moderator on the site
FOLLOW MY INSTRUCTION ON GOOGLE.COM
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations