Ինչպե՞ս 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Վերոհիշյալ ծածկագրում.
Տեղադրեք նույն տեքստը յուրաքանչյուր մյուս շարքում Kutools- ի համար Excel- ի համար
Վերոնշյալ կոդով դուք կարող եք պարզապես տող տեղադրել յուրաքանչյուր տողում: Ինչ վերաբերում է Excel- ում յուրաքանչյուր n շարքում տեքստ մտցնելուն: Այս բաժնում մենք ձեզ ցույց կտանք Տեղադրեք Վերնագրերի շարքերը օգտակարությունը Excel- ի համար նախատեսված գործիքներ, Այս օգտակարության միջոցով յուրաքանչյուր n շարքում տեքստ տեղադրելը այլևս խնդիր չի լինի:
Նախքան դիմելը Excel- ի համար նախատեսված գործիքներ, խնդրում եմ նախ ներբեռնեք և տեղադրեք այն.
1: սեղմեք Կուտոլս > Տեղադրել > Տեղադրեք վերնագրերի շարքերը միացնել այս օգտակար ծրագիրը:
2. Մեջ Տեղադրեք վերնագրերի շարքերը երկխոսության տուփ, անհրաժեշտ է.
Այժմ նշված տեքստը տեղադրվում է ընտրված տիրույթի յուրաքանչյուր n շարքում:
Եթե ցանկանում եք ունենալ այս օգտակար ծառայության անվճար փորձարկում (30-օրյա), խնդրում ենք կտտացնել այն ներբեռնելու համար, և այնուհետև անցեք գործողությունը կիրառելու վերը նշված քայլերին համապատասխան:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: