Ինչպե՞ս սյունակները և տողերը տեղափոխել մեկ տողի:

Ինչպե՞ս միացնել բազմաթիվ տողեր և սյունակներ մեկ երկար շարքում: Միգուցե ձեզ համար դա հեշտ է թվում, քանի որ կարող եք դրանք մեկ առ մեկ պատճենել և ձեռքով միանալ դրանց շարքին: Բայց ժամանակատար ու հոգնեցուցիչ կլինի, եթե լինեն հարյուրավոր շարքեր և սյուններ: Այստեղ ես կխոսեմ այն ​​լուծելու մի քանի արագ հնարքների մասին:

Տեղափոխել / փոխել սյուններն ու տողերը բանաձևով մեկ շարքի մեջ

Տեղափոխել / վերափոխել սյունակները և տողերը VBA կոդով մեկ տողի

Excel- ի համար Kutools- ի միջոցով սյունակները և տողերը տեղափոխեք մեկ շարքի

Տեղափոխել / փոխել սյուններն ու տողերը բանաձևով մեկ շարքի մեջ

Զարմանալի! Օգտագործելով արդյունավետ ներդիրներ Excel-ում, ինչպիսիք են Chrome-ը, Edge-ը, Firefox-ը և Safari-ն:
Խնայեք ձեր ժամանակի 50% -ը և ամեն օր կրճատեք մկնիկի հազարավոր կտտոցներ ձեզ համար:

Ենթադրելով, որ տվյալների մի շարք ունեք, ինչպես ցույց է տալիս սքրինշոթը ցույց տված հետևյալ նկարը, երկար բանաձևով նոր աշխատանքային թերթում կարող եք փոխակերպել տիրույթի տվյալները մեկ տողի:

Խնդրում ենք կիրառել բանաձևը հետևյալ կերպ.

1. Ակտիվ աշխատանքային գրքի նոր աշխատանքային թերթում կտտացրեք A1 բջիջը, պատճենեք և տեղադրեք այս բանաձևը. =OFFSET(Sheet1!$A$1,((ROW()-1)*5)+(FLOOR(COLUMN()-1,4)/4),(COLUMN()-1)-(FLOOR(COLUMN()-1,4)))

Նշում: Sheet1! $ 1 $ A աշխատանքային թերթի և տիրույթի հղումներն են, որոնք ցանկանում եք օգտագործել:

ROW () - 1) * 5 վերը նշված բանաձևում, 5 տողում է շարքի համարը; և Սյունակ () - 1,4) / 4Է, 4 նշանակում է սյունակի համարը: Կարող եք դրանք փոխել ՝ ըստ ձեր կարիքի:

2. Դրանից հետո լրացրեք բռնիչը աջից քաշեք, մինչև հայտնվի 0 համարը: Այս դեպքում, տիրույթի բոլոր տվյալները տեղափոխվել են մեկ աշխատանքային տողի նոր աշխատանքային թերթ: Տեսեք,

Տեղափոխել / վերափոխել սյունակները և տողերը VBA կոդով մեկ տողի

Հետևյալ VBA կոդը կարող է նաև օգնել ձեզ մի շարք տվյալների մեկ տողի վերափոխել:

1. Պահեք պահեք այն ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ պատուհան.

Sub TransformOneRow()
'Updateby20131120
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Ranges to be transform :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
xRows = InputRng.Rows.Count
xCols = InputRng.Columns.Count
For i = 1 To xRows
    InputRng.Rows(i).Copy OutRng
    Set OutRng = OutRng.Offset(0, xCols + 0)
Next
Application.ScreenUpdating = True
End Sub

3. Դրանից հետո սեղմեք F5 Կոդը գործարկելու համար ստեղնաշարի համար բացվում է երկխոսություն, որպեսզի ընտրեք մի շարք բովանդակություն, որը ցանկանում եք վերածել տողի, և կտտացրեք Ok, մեկ այլ ելնող երկխոսություն է, որպեսզի դուք ընտրեք մեկ բջիջ `արդյունքը դուրս բերելու համար: Տեսեք սքրինշոթեր.

Այնուհետեւ կտտացրեք Ok, ընտրված տիրույթում պարունակվող բովանդակությունը վերածվում է տողի: Տեսեք,

ՆշումԻ Սահմանել OutRng = OutRng.Offset (0, xCols + 0), Դուք կարող եք փոխել 0 ցանկացած համարի `ձեր կարիքը բավարարելու համար:

Քննության համար, եթե ուզում եք մեկ սյունակում առանձնացնել սկզբնական տողերին համապատասխանող արդյունքները, կարող եք փոխել Սահմանել OutRng = OutRng.Offset (0, xCols + 0) դեպի Սահմանել OutRng = OutRng.Offset (0, xCols + 1), արդյունքները ցուցադրվում են հետևյալով.

Excel- ի համար Kutools- ի միջոցով սյունակները և տողերը տեղափոխեք մեկ շարքի

Թվում է, թե վերոնշյալ երկու մեթոդները մեզ համար, սկսնակ Excel- ի համար, որոշ չափով դժվար են, այստեղ ես կխոսեմ ձեզ համար հարմար գործիքի մասին - Kutools Excel- ի համար:

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

Կոմունալով Փոխակերպել շարքը of Excel- ի համար նախատեսված գործիքներ, Դուք կարող եք արագորեն վերափոխել տիրույթը մեկ տողի, արեք հետևյալ կերպ.

1. Ընտրեք այն տիրույթը, որը ցանկանում եք տեղափոխել:

2: սեղմեք Կուտոլս > Լեռնաշղթայի փոխարկիչ > Փոխակերպել շարքը, տես նկարի նկարը.

3. Մեջ Փոխակերպել շարքը երկխոսության տուփ, ընտրեք Շարքը մեկ շարքի վրա տարբերակը, տես նկարի նկարը.

4. Այնուհետեւ կտտացրեք OK, և կտտացրեք բջիջին ՝ արդյունքը pop-out պատուհանից տեղադրելու համար

5: սեղմեք OK, և միջակայքում գտնվող տվյալները տեղափոխվել են մեկ տողի: Տեսեք սքրինշոթեր.

Եթե ​​ցանկանում եք ավելին իմանալ այս հատկության մասին, այցելեք Փոխակերպել շարքը.

Առնչվող հոդվածներ:

Ինչպե՞ս Excel- ում շարքը սյուն փոխել:

Ինչպե՞ս Excel- ում մեկ սյունակ փոխել / վերափոխել բազմաթիվ սյունակների:

Ինչպե՞ս սյունակները և տողերը տեղափոխել մեկ սյունակի:

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

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

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

Կարդալ ավելին... Անվճար ներբեռնում...

---

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

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

Կարդալ ավելին... Անվճար ներբեռնում...