Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս Excel- ում յուրաքանչյուր տողում տեղադրել նույն տեքստը:

Այս հոդվածում մենք ձեզ ցույց կտանք, թե ինչպես Excel- ում յուրաքանչյուր մյուս շարքում տեղադրել նույն տեքստը: Խնդրում ենք թերթել ավելի մանրամասն:

Տեղադրեք նույն տեքստը յուրաքանչյուր մեկ շարքում `VBA կոդով
Տեղադրեք նույն տեքստը յուրաքանչյուր մյուս շարքում Kutools- ի համար Excel- ի համար


Տեղադրեք նույն տեքստը յուրաքանչյուր մեկ շարքում `VBA կոդով

Ենթադրելով, որ ցանկանում եք «Անուն», «Տվյալներ» և «Միավորներ» տեքստեր տեղադրել որոշակի տիրույթի յուրաքանչյուր տողում, ինչպես ցույց է տրված նկարում: Խնդրում ենք փորձել հետևյալ VBA կոդը:

1. Աշխատաթերթում սեղմեք ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic կիրառման համար պատուհան.

2: սեղմեք Տեղադրել > Մոդուլներ, Տեսեք,

3. Պատճենեք և կպցրեք VBA կոդի տակ ՝ ծածկագրի խմբագրին:

VBA կոդ. Excel- ում յուրաքանչյուր տողում տեղադրեք նույն տեքստը

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

NotesՎերոհիշյալ ծածկագրում.

1. Ձեր տվյալները պետք է սկսվեն աշխատաթերթի առաջին տողից:
2. Խնդրում ենք փոխել «Անուն», «Տվյալներ» և «Միավորներ» տեքստերը ձեզ համար անհրաժեշտ տեքստերի:
3. A և C տառերը նշում են այն բջիջների տիրույթը, որտեղ ցանկանում եք տեղադրել հատուկ տեքստը:
4. Սեղմեք F5 ծածկագիրը գործելու համար: Եվ դուք կարող եք տեսնել, որ նշված տեքստերը ավելացվում են ձեր աշխատանքային թերթի յուրաքանչյուր տողում:

Տեղադրեք նույն տեքստը յուրաքանչյուր մյուս շարքում Kutools- ի համար Excel- ի համար

Վերոնշյալ կոդով դուք կարող եք պարզապես տող տեղադրել յուրաքանչյուր տողում: Ինչ վերաբերում է Excel- ում յուրաքանչյուր n շարքում տեքստ մտցնելուն: Այս բաժնում մենք ձեզ ցույց կտանք Տեղադրեք Վերնագրերի շարքերը օգտակարությունը Excel- ի համար նախատեսված գործիքներ, Այս օգտակարության միջոցով յուրաքանչյուր n շարքում տեքստ տեղադրելը այլևս խնդիր չի լինի:

Նախքան դիմելը Excel- ի համար նախատեսված գործիքներ, խնդրում եմ նախ ներբեռնեք և տեղադրեք այն.

1: սեղմեք Կուտոլս > Տեղադրել > Տեղադրեք վերնագրերի շարքերը միացնել այս օգտակար ծրագիրը:

2. Մեջ Տեղադրեք վերնագրերի շարքերը երկխոսության տուփ, անհրաժեշտ է.

1) Ընտրեք տեքստերի շրջանակը, որը ցանկանում եք տեղադրել յուրաքանչյուր n շարքում Վերնագրի տիրույթ տուփ;
2) Ընտրեք այն տիրույթը, որի համար անհրաժեշտ է տեքստեր տեղադրել այստեղ Տեղադրեք տիրույթը տուփ;
3) Նշեք միջանկյալ տողի համարը Միջանկյալ շարքեր տուփ Եթե ​​ցանկանում եք յուրաքանչյուր տողում տեքստ տեղադրել, ապա վանդակում մուտքագրեք 1-ը, իսկ յուրաքանչյուր n տողի համար `վանդակում մուտքագրեք n;
4) Սեղմիր OK կոճակը:

Այժմ նշված տեքստը տեղադրվում է ընտրված տիրույթի յուրաքանչյուր n շարքում:

  Եթե ​​ցանկանում եք ունենալ այս օգտակար ծառայության անվճար փորձարկում (30-օրյա), խնդրում ենք կտտացնել այն ներբեռնելու համար, և այնուհետև անցեք գործողությունը կիրառելու վերը նշված քայլերին համապատասխան:

Գրասենյակի արտադրողականության լավագույն գործիքները

Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50 + Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

kte էջանիշը 201905


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
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