Note: The other languages of the website are Google-translated. Back to English
Մուտք  \/ 
x
or
x
Գրանցում  \/ 
x

or

Ինչպե՞ս ավելացնել տեքստի տողեր Excel- ի բազմաթիվ բջիջներին:

Եթե ​​մենք պետք է մի քանի բջիջներում ավելացնենք տեքստի որոշակի տեքստ կամ տողեր, դա տևական և ժամանակատար կլինի այս տեքստը պատճենելու և յուրաքանչյուր բջիջը մեկ առ մեկ տեղադրելու միջոցով: Հետևյալ մեթոդները կարող են օգնել մեզ հարմար և արագորեն որոշակի տեքստ ավելացնել բազմաթիվ բջիջներում:

Office Tab- ը միացրեք Tabbed խմբագրումը և զննարկումը Office- ում, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք ...
Excel- ի համար նախատեսված Kutools- ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80% -ով
  • Վերաօգտագործել ցանկացած բան. Ավելացրեք առավել օգտագործված կամ բարդ բանաձևերը, գծապատկերները և ցանկացած այլ բան ձեր նախընտրածներին և հետագայում արագորեն օգտագործեք դրանք:
  • Ավելի քան 20 տեքստի առանձնահատկություններ. Հանեք համարը տեքստային տողից; Հանել կամ հեռացնել տեքստերի մի մասը; Թվերն ու արժույթները վերածեք անգլերեն բառերի:
  • Միաձուլել գործիքներըԲազմաթիվ աշխատանքային գրքեր և թերթեր մեկում; Միավորել բազմաթիվ բջիջներ / տողեր / սյուններ ՝ առանց տվյալների կորստի: Միաձուլեք կրկնօրինակ տողերն ու գումարը:
  • Պառակտման գործիքներՏվյալները պառակտել բազմակի թերթերի ՝ հիմնված արժեքի վրա. Մեկ աշխատանքային գրքույկ ՝ բազմակի Excel, PDF կամ CSV ֆայլեր; Մեկ սյունակ մի քանի սյունակներից:
  • Paste Skipping Թաքնված / Filտված շարքեր; Հաշվելը և գումարը ըստ Ֆոնի գույնի; Personalանգվածային տարբերակով ստացողներին ուղարկեք անհատականացված էլ.
  • Սուպեր ֆիլտր Ստեղծեք զտման առաջադեմ սխեմաներ և կիրառեք ցանկացած թերթի վրա; Տեսակ ըստ շաբաթվա, օրվա, հաճախականության և ավելին; ֆիլտր համարձակ, բանաձևերով, մեկնաբանությամբ ...
  • 300-ից ավելի հզոր հատկություններ; Աշխատում է գրասենյակի հետ 2007-2019 և 365; Աջակցում է բոլոր լեզուներին. Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում:

նետ կապույտ աջ պղպջակ VBA- ի միջոցով Excel- ի բազմաթիվ բջիջներին ավելացրեք հատուկ տեքստ


VBA- ի օգտագործումը կարող է հեշտացնել մեր աշխատանքը և ավելացնել հատուկ տեքստ բազմաթիվ բջիջներում ՝ առանց պատճենելու և տեղադրելու:

Քայլ 1: Ընտրեք այն բջիջները, որոնցում կավելացնեք հատուկ տեքստը:

Քայլ 2: Անջատեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic կիրառական ծրագրերի պատուհանը:

Քայլ 3: Սեղմեք Տեղադրել >> Մոդուլներ, և տեղադրեք հետևյալ մակրոը Մոդուլի պատուհանում:

Sub Add2Formula ()
'Ավելացրեք տեքստ

Ընտրության յուրաքանչյուր գ-ի համար
գ. Ակտիվացնել
ActiveCell.FormulaR1C1 = "թեստ -" & ActiveCell.Formula
Հաջորդ գ

Վերջ Sub

Քայլ 4. Սեղմեք կոճակը F5 այս մակրո գործարկման բանալին:

ՆշումԱյս մակրոը կարող է ավելացնել միայն տեքստ - յուրաքանչյուր բջիջի տեքստի առջևում: Եթե ​​ցանկանում եք ավելացնել այլ տեքստ կամ տողեր, խնդրում ենք փոխարինել տեքստ - այն հատուկ տեքստի հետ, որը ցանկանում եք ավելացնել:


նետ կապույտ աջ պղպջակ Excel- ի Kutools- ի միջոցով Excel- ի բազմաթիվ բջիջներին ավելացրեք հատուկ տեքստ

Microsoft Excel- ի սովորական օգտագործողների համար մենք կարող է ծանոթ չլինենք VBA- ին: Այլընտրանքորեն Excel- ի համար նախատեսված գործիքներAdd Text գործիքը կարող է օգնել մեզ արագ և հեշտությամբ ավելացնել որոշակի տեքստ կամ տողեր բազմաթիվ բջիջներում:

Excel- ի համար նախատեսված գործիքներ. Excel- ի ավելի քան 300 հարմարավետ հավելումներով, 30 օրվա ընթացքում անվճար փորձեք առանց սահմանափակումների: Get it Now

Քայլ 1. Ընտրեք այն բջիջները, որոնցում կավելացնեք հատուկ տեքստը:

Քայլ 2: Սեղմեք Կուտոլս > Տեքստային գործիքներ > Ավելացնել տեքստ, Տեսեք,

Քայլ 3. Դեպի Ավելացրեք տեքստ երկխոսության տուփ, մուտքագրեք հատուկ տեքստը և նիշերը Տեքստ բաժնում:

Քայլ 4. Ստուգեք այն դիրքը, որտեղ դուք կավելացնեք հատուկ տեքստը այստեղ Դիրք Բաժին. (Նշում. Եթե ցանկանում եք տեքստը տեղադրել որոշակի դիրքում, խնդրում ենք ստուգել Մատնանշել և նշեք դիրքը:) Տեսեք,

Քայլ 5: Սեղմեք OK or Դիմել.

The Ավելացրեք տեքստ Excel- ի համար Kutools- ի գործիքը աջակցում է մեզ ավելացնել ցանկացած հատուկ տեքստ և նիշ նախնական կամ բջջային տեքստից հետո: Ավելին, մենք կարող ենք բնօրինակ բջջային տեքստերի միջև ավելացնել հատուկ տեքստ: Անկախ այն բանից, թե որ պարամետրերն եք դնում, կարող եք նախադիտել բջիջների փոփոխությունները «Նախադիտում» բաժնում:


Առնչվող Հոդված


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

Excel- ի համար նախատեսված Kutools- ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80% -ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր առանձնահատկություններ, Աջակցում է Office / Excel 2007-2019 և 365. Աջակցում է բոլոր լեզուները: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հատկություններ ՝ 30-օրյա անվճար փորձաշրջան: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

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

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50% -ով և նվազեցնում է ձեզ համար ամեն օր մկնիկի հարյուրավոր կտտոցներ:
officetab ներքևում
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Anish · 1 years ago
    how to add multiple cells and compare with one cell ,such that the one cell compared to value is dynamically changing. For example sum of column and you are adding values in the column then sum is dynamically changing.

    Thank you in Advance.
  • To post as a guest, your comment is unpublished.
    Peter · 3 years ago
    If i need to add values to text like: "text" value E12 "text" value E12 "text" valueE12 is it possible? need make SEO
  • To post as a guest, your comment is unpublished.
    cpk.adm@gmail.com · 3 years ago
    i want to add one character in before and after . please help .. mail me cpk.adm@gmail.com
  • To post as a guest, your comment is unpublished.
    cpk.adm@gmail.com · 3 years ago
    Private Sub CommandButton1_Click()
    On Error GoTo errorhandler:
    Dim objRange1 As Range
    Dim wk As Workbook

    'Set up the ranges


    Set objRange1 = Range("A22:A51")


    objRange1.TextToColumns , Destination:=Sheet1.Range("Z1"), _
    DataType:=xlDelimited, _
    Tab:=False, _
    Semicolon:=False, _
    Comma:=False, _
    Space:=False, _
    Other:=True, _
    OtherChar:="|"
    Dim rn As String
    Dim rn1 As String
    Dim rn2 As String
    Dim rep As String
    Dim res As String
    rep = "Do you want to copy Values?"
    res = MsgBox(rep, vbQuestion + vbYesNo, "???")
    If res = vbYes Then

    rn = InputBox(" Enter Range to Copy Circuit Id")
    Sheets("Sheet1").Range("AH1:AH10").Cut Destination:=Sheets("Sheet2").Range(rn)
    MsgBox (" Circuit Id has Successfully Pasted")
    rn1 = InputBox(" Enter Range to copy Order Reference")
    Sheets("Sheet1").Range("AK1:AK10").Cut Destination:=Sheets("Sheet2").Range(rn1)
    MsgBox (" Order Reference has Successfully Pasted")
    rn2 = InputBox(" Enter Range to copy Inventory Name")
    Sheets("Sheet1").Range("AG1:AG10").Cut Destination:=Sheets("Sheet2").Range(rn2)
    MsgBox (" Inventory has Successfully Pasted")
    Sheets("sheet1").Range("Z1:AM10").ClearContents
    Sheets("sheet2").Activate
    Else
    MsgBox (" Thank You")
    End If
    errorhandler:
    MsgBox ("you have clicked cancelled bitton")
    Sheet1.Activate
    End Sub


    Private Sub CommandButton2_Click()
    Sheet1.Range("A10:A32").ClearContents
    End Sub







    it is working , but i have to add text in one cell . please help me