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

or

Ինչպե՞ս պատճենել բազմաթիվ ընտրություններ կամ միջակայքեր Excel- ում:

Օրինակ, դուք ունեք մեծ աշխատանքային թերթ, և այժմ ցանկանում եք պատճենել միայն որոշ ընտրված տիրույթներ և տարածել այլ աշխատանքային թերթերի: Բայց երբ ընտրեք մի քանի տիրույթներ և կտտացրեք պատճենը, կլինի երկխոսության տուփ, որը կհիշեցնի ձեզ. «Այդ հրամանը չի կարող օգտագործվել բազմաթիվ ընտրությունների ժամանակ»: Այս պայմաններում ինչպե՞ս եք արագ պատճենում բազմաթիվ ընտրված միջակայքերը: Ահա մի քանի հնարքներ `այս խնդիրը լուծելու համար:


Պատճենեք ընտրված բազմաթիվ տիրույթներ Clipboard- ով

Օգնությամբ Clipboard, կարող եք միանգամից ընտրել բոլոր ընտրված տիրույթները մեկ այլ տիրույթի կամ աշխատանքային թերթի: Խնդրում ենք անել հետևյալը.

1: Սեղմեք Գլխավոր > փաստաթուղթ պատճենել բազմաթիվ տիրույթներ 09 է Clipboard խումբը ցուցադրել Clipboard Pane., Տեսեք,

2, Եվ այնուհետև մեկ առ մեկ պատճենեք ձեր ընտրած միջակայքերը: Միևնույն ժամանակ, պատճենված միջակայքերը հայտնվել են Clipboard Pane. տե՛ս վերևի նկարը.

3, Ընտրեք նպատակակետի տիրույթի առաջին բջիջը, որին կտեղադրեք պատճենված բոլոր տիրույթները և կտտացրեք Կպցնել բոլորը կոճակը Clipboard Վահանակ

Եվ ապա պատճենված բոլոր տիրույթները տեղադրվել են նշված նպատակակետի տիրույթում:

Հեշտությամբ միացրեք բազմաթիվ աշխատանքային թերթերից / աշխատանքային գրքերից բազմաթիվ ընտրություններ մեկ աշխատանքային թերթի / աշխատանքային գրքի

Գուցե ձանձրալի է տարբեր աշխատանքային գրքույկներից տասնյակ թերթերը մեկ թերթի մեջ միավորելը: Բայց Excel- ի համար նախատեսված Kutools- ի հետ Միավորել (աշխատանքային թերթեր և աշխատանքային գրքեր) օգտակար, դուք կարող եք դա անել միայն մի քանի կտտոցով: Լիարժեք անվճար փորձն 30-օրյա:
գովազդային թերթերի գրքեր 1

Excel- ի համար նախատեսված գործիքներ - Ներառում է ավելի քան 300 հարմար գործիքներ Excel- ի համար: 30 օրյա անվճար փորձնական ամբողջական հնարավորություն, վարկային քարտ չի պահանջվում: Get It Now

Պատճենեք ընտրված բազմաթիվ տիրույթներ VBA կոդով

VBA կոդի միջոցով դուք կարող եք նաև պատճենել ընտրված բազմաթիվ տիրույթներ և տեղադրել դրանք ցանկացած այլ աշխատանքային թերթում:

1. Հոլդինգը Ctrl բանալին և ընտրեք բազմաթիվ ոչ հարակից միջակայքեր, որոնք ցանկանում եք օգտագործել:

2. Մամուլ ալտ + F11 ստեղները միաժամանակ բացել Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներև մուտքագրեք հետևյալ կոդը Մոդուլում.

Ընտրանք Բաց ենթագրերի բազմապատկում եթե միջակայքը ընտրված չէ Եթե TypeName (ընտրություն) <> "Շրջան" ապա MsgBox "Ընտրեք պատճենվող տիրույթը. թույլատրվում է բազմակի ընտրություն": Ելք Ենթավարտից Եթե «Պահպանեք տարածքները որպես Լեռնաշղթայի առանձին օբյեկտներ NumAreas = Selection.Areas.Count ReDim SelAreas (1 To NumAreas) For i = 1 To NumAreas Set SelAreas (i) = Selection. Areas (i) Next» Որոշել վերին ձախը բջիջը բազմակի ընտրության դեպքում. <LeftCol ապա LeftCol = SelAreas (i). Սյունակ Հաջորդ Սահմանել UpperLeft = Բջիջներ (TopRow, LeftCol) 'Ստացիր տեղադրման հասցեն Սխալի վերսկսման մասին Հաջորդ Սահմանել PasteRange = Application.InputBox _ (Հուշում. միջակայք ՝ ", _ Վերնագիր: =" Պատճենել բազմակի ընտրությունը ", _ Տեսակ ՝ = 1) Սխալի վրա GoTo 8 'Ելք, եթե չեղարկված է Եթե TypeName (PasteRange) <>" Range ", ապա Ելք Sub' Համոզվեք, որ միայն ձախ վերին բջիջն է օգտագործված Սահմանել PasteRange = PasteRange.Range ("A0") 'Ստուգեք մածուկի տիրույթը առկա տվյալների համար NonEmptyCellCount = 1 For i = 0 To NumAreas RowOffset = SelAreas (i). Row - TopRow ColOffset = Sel Տարածքներ (i). Սյունակ - LeftCol NonEmptyCellCount = NonEmptyCellCount + _ Application.CountA (Range (PasteRange.Offset (RowOffset, ColOffset), _ PasteRange.Offset (RowOffset + SelAreas (i). Rows.Chaffet - 1, (i) .Columns.Count - 1))) Հաջորդ i 'Եթե տեղադրման տիրույթը դատարկ չէ, նախազգուշացրեք օգտվողին If NonEmptyCellCount <> 1 ապա _ If MsgBox ("Վերագրանցե՞լ գոյություն ունեցող տվյալները", vbQuestion + vbYesNo, _ "Պատճենել բազմակի ընտրություն ") <> vb Այո, այնուհետև Ելք ենթակետից 'Պատճենիր և տեղադրիր յուրաքանչյուր տարածք i = 0-ի համար NumAreas- ում RowOffset = SelAreas (i): Row - TopRow ColOffset = SelAreas (i). Column - LeftCol SelAreas (i). Copy PasteRange.Offset ( RowOffset, ColOffset) Հաջորդ i End Sub

3. Այնուհետեւ կտտացրեք Վազում կոդ ՝ կոդն աշխատեցնելու համար:

4, Եվ հիմա խնդրում ենք նշել բջիջը ՝ միջակայքերը բացման մեջ տեղադրելու համար Պատճենել բազմակի ընտրություն երկխոսության տուփը և կտտացրեք OK կոճակ Տեսեք,


Արագ պատճենեք բազմաթիվ ընտրված միջակայքերը մեկ աշխատանքային թերթից

The Պատճենել բազմակի տիրույթներ օգտակարությունը Excel- ի համար նախատեսված գործիքներ կարող է օգնել ձեզ արագորեն պատճենել բազմաթիվ աշխատանքային տիրույթներ ակտիվ աշխատանքային թերթից: Խնդրում ենք անել հետևյալը.

Excel- ի համար նախատեսված գործիքներ - Ներառում է ավելի քան 300 հարմար գործիքներ Excel- ի համար: 30 օրյա անվճար փորձնական ամբողջական հնարավորություն, վարկային քարտ չի պահանջվում: Get It Now

1, Առանց պահելու ընտրեք այն տիրույթները, որոնք ցանկանում եք օգտագործել մեկ առ մեկ Ctrl ստեղնը, ապա կտտացրեք Կուտոլս > Պատճենելու տիրույթները, Տեսեք,

2, Մեջ Պատճենել բազմակի տիրույթներ երկխոսության տուփ, ստուգեք բոլորը տարբերակ ՝ սկսած Տեղադրել հատուկ բաժինը և սեղմել Լավ բutton Տեսեք վերևի նկարը.

Նշում: Եթե ​​ցանկանում եք շարքի բարձրությունը և սյունակի լայնությունը պահպանել որպես սկզբնական միջակայք, խնդրում ենք ստուգել Ներառյալ շարքի բարձրությունը տարբերակ և Ներառյալ սյունի լայնությունը տարբերակը Պատճենել բազմակի տիրույթների երկխոսության դաշտում:

3, Նշեք մի բջիջ, որպեսզի տիրույթները տեղադրեն հետևյալ հուշման վանդակում և կտտացրեք այն OK կոճակը:

Եվ այժմ ընտրված բոլոր միջակայքերը կփակցվեն նշված բջիջում, քանի որ նույն շարքի բարձրությունն ու սյունի լայնությունը, ինչպես սկզբնական ընտրությունները:

Կտտացրեք այստեղ Պատճենել բազմակի տիրույթների օգտակարության մասին լրացուցիչ տեղեկություններ ստանալու համար       

Excel- ի համար նախատեսված գործիքներ - Ներառում է ավելի քան 300 հարմար գործիքներ Excel- ի համար: 30 օրյա անվճար փորձնական ամբողջական հնարավորություն, վարկային քարտ չի պահանջվում: Get It Now


Պատճենել բազմաթիվ տիրույթներ բազմաթիվ աշխատանքային թերթերից / աշխատանքային գրքերից

Excel- ի համար Kutools- ը տրամադրում է մեկ այլ Միավորել աշխատանքային թերթերը օգտակար է Excel- ում բազմաթիվ աշխատանքային թերթերից կամ շատ աշխատանքային գրքույկից բազմաթիվ տիրույթներ պատճենելու համար: Խնդրում ենք անել հետևյալը.

Excel- ի համար նախատեսված գործիքներ - Ներառում է ավելի քան 300 հարմար գործիքներ Excel- ի համար: 30 օրյա անվճար փորձնական ամբողջական հնարավորություն, վարկային քարտ չի պահանջվում: Get It Now

1: սեղմեք Kutools Plus > Միավորել.

2. Բացման «Միավորել աշխատաթերթերը». 1-րդ երկխոսության տուփի 3-ին քայլ, խնդրում ենք ստուգել Միացրեք բազմաթիվ աշխատանքային թերթեր աշխատանքային գրքից մեկ աշխատանքային թերթի մեջ տարբերակը եւ սեղմեք հաջորդ կոճակը:

3, Միավորել աշխատաթերթերը - 2-րդ երկխոսության տուփի քայլ 3-ը, խնդրում ենք արեք հետևյալը.

(1) Ընտրեք աշխատանքային գիրքը ՝ Աշխատանքային տետրերի ցուցակ բաժինը, ապա կտտացրեք Թերթել յուրաքանչյուր աշխատանքային թերթի ետևի կոճակը ՝ յուրաքանչյուր աշխատանքային թերթից սահմանելու տիրույթը.
(2) Կտտացրեք այն կոճակին Ավելացնել կոճակը ՝ այլ աշխատանքային գրքեր ավելացնելու համար, որոնցից դուք պատճենելու եք տիրույթները, և այնուհետև կրկնել վերևում (1) ՝ ավելացված աշխատանքային գրքում տիրույթները նշելու համար:
(3) Կտտացրեք այն կոճակին Ավարտել կոճակը:

Excel- ի համար նախատեսված գործիքներ - Ներառում է ավելի քան 300 հարմար գործիքներ Excel- ի համար: 30 օրյա անվճար փորձնական ամբողջական հնարավորություն, վարկային քարտ չի պահանջվում: Get It Now

4, Դրանից հետո դուրս է գալիս Kutools for excel երկխոսության տուփ և խնդրում է փրկել համակցված սցենարը: Խնդրում ենք սեղմել այո կոճակը կամ Ոչ կոճակը, որքան անհրաժեշտ է:

Մինչ այժմ բազմակի աշխատանքային թերթերից կամ աշխատանքային գրքերից նշված բոլոր սահմանները պատճենվել և տեղադրվել են նոր աշխատանքային գրքում:


Դեմո. Պատճենեք ընտրված բազմաթիվ տիրույթներ մեկ աշխատանքային թերթից

Դեմո. Պատճենեք ընտրված բազմաթիվ տիրույթներ բազմաթիվ աշխատանքային գրքերից / աշխատանքային թերթերից


Excel- ի համար նախատեսված գործիքներ պարունակում է ավելի քան 300 հարմար գործիք Excel- ի համար, 30 օրում առանց սահմանափակումների անվճար փորձելու համար: Ներբեռնեք և անվճար փորձեք հիմա!

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

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.
    peter.habershon@eis2win.co.uk · 2 years ago
    Hi there,
    Great code but wondered how I can paste values rather than just paste?
    Thanks :)
  • To post as a guest, your comment is unpublished.
    Peter Habershon · 2 years ago
    Hi there,
    Great post and the VBA code works perfectly. Is it possible to change the code to paste special > values? If so, how?
    Thanks!
  • To post as a guest, your comment is unpublished.
    jacobkring@hotmail.com · 3 years ago
    Hi. Nice code, works great. Is it possible to modify the code in a way such that it is possible to insert/paste the market row/ranges multiple times instead of just one time?
    • To post as a guest, your comment is unpublished.
      kelly.extendoffice@gmail.com · 3 years ago
      Hi Jacob,
      Maybe this Insert Title Rows feature of Kutools for Excel can solve your problem.
      https://www.extendoffice.com/product/kutools-for-excel/excel-insert-title-rows.html
  • To post as a guest, your comment is unpublished.
    kmmanahan · 3 years ago
    Hi! How do I use the same VBA Code above but instead of simply pasting, I would like it to paste special for just the values. The table I am putting the values (constants) into is already formatted and with totals (formulas)
    Thanks so much in advance!
    • To post as a guest, your comment is unpublished.
      · 3 years ago
      Hi Katrina Manahan,

      Please open the Microsoft Visual Basic for applications window, and create a new Module, just press CTRL + V to paste the VBA code directly. The sequence numbers before code won't be pasted.
  • To post as a guest, your comment is unpublished.
    Steve O · 5 years ago
    Thanks for the code, works perfectly. This odd lack of function within Excel has stumped me many times in the past. It's normally quicker in the end to work around it, but in this case I have 4000 individually colour-coded cells so any work-around would have taken a long time, so I'm very grateful.
    Steve
  • To post as a guest, your comment is unpublished.
    David Hedin · 5 years ago
    Hi,
    Is it possible to adjust the code so that the copied cells can be pasted in another sheet? Now I get the error message "400" when I attempt this. I use Office 2010.

    Also, is it possible to copy so that empty lines are deleted? I have a big document and I copy some cells with hundreds of non-copied rows between them. This makes for a rather bulky output.
  • To post as a guest, your comment is unpublished.
    Yunivor · 5 years ago
    I found that if you have the Clipboard task plane open you can copy multiple rows simply using ctrl+C and paste them in order with crtl+V using Excel 2007.
  • To post as a guest, your comment is unpublished.
    M · 6 years ago
    Thank you SOOOOOO much - what a great site
  • To post as a guest, your comment is unpublished.
    Lyn Mc · 6 years ago
    Found above explanation of options to copy multiple ranges very helpful - thanks! I used the 'clipboard' option to copy multiple rows. Had to select each group of consecutive rows and copy it, move on and select next row or group of consecutive rows and copy it, etc.. But after this its easy, go to where you want to paste them, eg a new sheet, and click 'Paste all' from the Clipboard and all the rows are copied to there with out any gaps! Exactly what I wanted - thanks again!
  • To post as a guest, your comment is unpublished.
    Abani Pattanayak · 6 years ago
    I want to select the rows like 1, 5,6,10. so how can i copy these rows ???
    • To post as a guest, your comment is unpublished.
      David Hedin · 5 years ago
      In this case you can just select the rows and copy them as usual.
      • To post as a guest, your comment is unpublished.
        K Raj · 4 years ago
        How can I copy cell a1, e5, g2, and so on.... (more than 1000 cells in same column) and paste them into b1, f5, h2 (right into the next column in same row.)