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

Ինչպե՞ս Excel- ում երկու սյունակ միավորել մեկի մեջ ՝ փոփոխական արժեքներով:

Ահա աշխատանքային թերթի երկու սյունակ, որն է գործը `այս երկու սյունակները միաձուլել մեկ սյունակում արժեքների այլընտրանքով, ինչպես ցույց է տրված նկարում Ինչպե՞ս կարող եք արագ կարգավորել աշխատանքը, առանց դրանք հերթով վերադասավորելու:
փաստաթուղթը միաձուլում է երկու սյունակ մեկի ՝ 1 փոփոխական արժեքով

Միացրեք երկու սյունակ մեկի մեջ `VBA կոդով փոփոխական արժեքներով

Excel- ի համար Kutools- ի կողմից միաձուլեք երկու սյունակներ մեկի մեջլավ գաղափար 3


Միացրեք երկու սյունակ մեկի մեջ `VBA կոդով փոփոխական արժեքներով

Երկու սյունակները մեկում այլընտրանքային արժեքներով միավորելու համար Excel- ում VBA կոդից բացի ներկառուցված գործառույթ չկա:

1. Մամուլ Alt + F11 հնարավորություն տալու ստեղները Microsoft Visual Basic հավելվածների համար պատուհան Սեղմել Տեղադրել > Մոդուլներ ստեղծել նոր դատարկ մոդուլ:

2. Պատճենեք և կպցրեք կոդը ներքևում գտնվող մոդուլին:

VBA. Միաձուլեք երկու սյունակ մեկի մեջ արժեքային այլընտրանքով

Sub MergeColumns()
'UpdatebyExtendoffice20180815
Dim xSRg, xDRg As Range
Dim xDWS As Worksheet
Dim xIntDR, xIntDC, xI As Long
Dim xFNum As Long
On Error GoTo Err1
Set xSRg = Application.InputBox("Select two columns:", "Kutools for Excel", xTxt, , , , , 8)
If xSRg Is Nothing Then
Err1:
    Application.ScreenUpdating = True
    Exit Sub
End If
Set xDRg = Application.InputBox("Select a cell to place result:", "Kutools for Excel", xTxt, , , , , 8)
If xDRg Is Nothing Then
    Exit Sub
End If
Application.ScreenUpdating = False
Set xDWS = xDRg.Worksheet
xIntDR = xDRg.Row
xIntDC = xDRg.Column
xI = 0
    For xFNum = 1 To xSRg.Count
        Set xDRg = xDWS.Cells(xIntDR + xI, xIntDC)
        xDRg.Value = xSRg.Item(xFNum).Value
        xI = xI + 1
    Next xFNum
Application.ScreenUpdating = True
End Sub

3. Մամուլ F5 ստեղնը և ընտրեք երկու սյունակ, որոնք ցանկանում եք միաձուլվել ելնող երկխոսությանը:
փաստաթուղթը միաձուլում է երկու սյունակ մեկի ՝ 2 փոփոխական արժեքով

4: սեղմեք OK, երկրորդ երկխոսության մեջ ընտրեք բջիջ `արդյունքը տեղադրելու համար:
փաստաթուղթը միաձուլում է երկու սյունակ մեկի ՝ 3 փոփոխական արժեքով

5: սեղմեք OK, Այժմ ընտրված երկու սյունակները միացվել են մեկի և այլընտրանքային արժեքների հետ:


Excel- ի համար Kutools- ի կողմից միաձուլեք երկու սյունակներ մեկի մեջ

Եթե ​​դուք ունեք Excel- ի համար նախատեսված գործիքներ տեղադրված է Excel, իր Transform Range կոմունալը կարող է լուծել այս աշխատանքը միայն 3 հեշտ քայլերի միջոցով:

Excel- ի համար նախատեսված գործիքներ, ավելի քան 300 հարմար գործառույթներ, ավելի հեշտացնում է ձեր գործերը: 

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝(Անվճար ներբեռնեք Kutools- ի համար Excel- ը հիմա!)

1. Ընտրեք սյունակները (երկու կամ ավելի), որոնք ցանկանում եք միավորել, կտտացրեք Կուտոլս > Transform Range.
փաստաթուղթը միաձուլում է երկու սյունակ մեկի ՝ 4 փոփոխական արժեքով

2. Մեջ Transform Range երկխոսություն, ստուգում Range to single column տարբերակը և սեղմեք Ok.
փաստաթուղթը միաձուլում է երկու սյունակ մեկի ՝ 5 փոփոխական արժեքով

3. Ընտրեք բջիջ `արդյունքը popping երկխոսության մեջ տեղադրելու համար: Սեղմել OK.
փաստաթուղթը միաձուլում է երկու սյունակ մեկի ՝ 6 փոփոխական արժեքով

Այժմ սյունակները միավորվել են մեկի մեջ և արժեքներն այլընտրանքային կարգով են:
փաստաթուղթը միաձուլում է երկու սյունակ մեկի ՝ 7 փոփոխական արժեքով


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

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

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

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

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (1)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Դա աշխատեց! Շնորհակալություն!!
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

Հեղինակային իրավունքի © 2009 - www.extendoffice.com. | Բոլոր իրավունքները պաշտպանված են. Powered by ExtendOffice. | | Կայքի քարտեզ
Microsoft- ը և Office- ի պատկերանշանը հանդիսանում են Microsoft Corporation- ի ապրանքային նշաններ կամ գրանցված ապրանքային նշաններ ԱՄՆ-ում և (կամ) այլ երկրներում:
Պաշտպանված է Sectigo SSL- ի կողմից