Ystod Copïo Excel VBA i Daflen Arall (8 Ffordd Hawsaf)

Hugh West

02-06-2023 Macros & Excel VBA
  • Rhannu Hwn
Hugh West

Pryd bynnag y bydd ei angen arnoch gallwch gopïo ystod o un ddalen i ddalen neu lyfr gwaith arall. Mae yna wahanol fathau o gopïo a gludo. Yn dilyn yr erthygl hon, byddwch yn dod i adnabod gwahanol ffyrdd o ddefnyddio ystod copi Excel VBA i ddalen arall.

I wneud yr esboniad yn fywiog, rydw i'n mynd i ddefnyddio set ddata sampl sy'n cynrychioli gwybodaeth bersonol personau penodol . Mae gan y set ddata 4 colofn. Y colofnau hyn yw'r Enw Cyntaf, Cyfenw, Enw Llawn, a E-bost .

Lawrlwythwch Gweithlyfr i Ymarfer

Ystod Copïo VBA i Ddalen Arall.xlsm

8 Ffordd i Ragori Ystod Copïo VBA i Ddalen Arall

1. Copïo Ystod i Daflen Arall gyda Fformat

Pryd bynnag yr hoffech Copi ystod o un ddalen i ddalen arall gyda Fformat gallwch wneud hynny drwy ddefnyddio'r VBA .

Yma, byddaf Copi ystod o Set Ddata dalen i WithFormat sheet.

0>Dewch i ni ddechrau'r drefn,

Yn gyntaf, agorwch y tab Datblygwr >> dewiswch Visual Basic

>

Gallwch hefyd ddefnyddio'r bysellfwrdd ALT + F11 i agor y VBA golygydd.

Nesaf, bydd yn agor ffenestr newydd o'r enw Microsoft Visual Basic for Applications.

Oddi yno, agor Mewnosod >> dewiswch Modiwl .

A Bydd modiwlyn agor ac yna teipiwch y cod canlynol yn yr agoriad>> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_BelowLastCell_AnotherSheets hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedwch y Macro a ddewiswyd.

Felly, bydd Copio yr ystod a ddewiswyd a bydd yn Gludo o'r rhes olaf o ddalen arall .

8. VBA Copïwch Ystod i'r Rhes Olaf o Lyfr Gwaith Arall

Os ydych chi eisiau Copi 3> ystod i'r rhes olaf o daflen llyfr gwaith arall gallwch hefyd ddefnyddio'r VBA .

Yma, byddaf yn Copïo ystod o Set Ddata2 dalen i Taflen 1 o Llyfr2 ond o'r gell gyntaf nad yw'n wag.

I gychwyn y drefn,

Yn gyntaf, agorwch y tab Datblygwr >> dewiswch Visual Basic

Gallwch hefyd ddefnyddio'r bysellfwrdd ALT + F11 i agor y golygydd VBA . <1

Nesaf, bydd yn agor ffenestr newydd o Microsoft Visual Basic for Applications.

Oddi yno, agor Mewnosod >> dewiswch Modiwl .

A Bydd modiwl yn agor ac yna teipiwch y cod canlynol yn y Modiwl a agorwyd. 

1174

Yma, datganais yr Is-weithdrefn Copy_Range_BelowLastCell_To_Another_Workbook lle wsCopy a wsCyrchfan

3>yn Taflen Waith math, lCopyLastRow a lDestLastRowMae yn Math Hir.

Yn gyntaf, defnyddir Gosod i osod newidynnau i'r ddalen ei chopïo a'r ddalen gyrchfan.

Nesaf, defnyddio'r dull Rhes i ddod o hyd i'r rhes olaf yn seiliedig ar ddata colofn A yn yr ystod copi.

Eto, defnyddio'r dull Rhes i ddod o hyd i'r rhes wag gyntaf yn seiliedig ar ddata colofn A yn yr ystod cyrchfan, defnyddiwyd Gwrthbwyso hefyd i symud i lawr un priodwedd.

Yn olaf, Copïwyd data Dataset2 daflen o'r Ystod Copïo Excel VBA i Ddalen Arall.xlsm i'r gyrchfan Taflen 1 y llyfr gwaith Llyfr2.xlsx .

Nawr, Cadw y cod ac ewch yn ôl i'r daflen waith.

Nesaf, agorwch y Gweld tab >> o Macros >> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_BelowLastCell_To_Another_Workbook hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedeg y Macro a ddewiswyd.

Felly, bydd Copi yr ystod a ddewiswyd o'r ddalen bresennol i res olaf llyfr gwaith arall.

<0

Adran Ymarfer

Rwyf wedi darparu taflen ymarfer yn y llyfr gwaith i ymarfer y ffyrdd eglurhaol hyn o Excel VBA ystod copi i ddalen arall.

Casgliad

Yn yr erthygl hon, rwyf wedi esbonio 8 math gwahanol o ffyrdd hawdd a chyflym oMae Excel VBA yn copïo'r ystod i ddalen arall. Bydd y gwahanol ffyrdd hyn yn eich helpu i gopïo ystod o un ddalen i'r llall a hefyd o un ddalen i lyfr gwaith arall. Yn olaf ond nid lleiaf, os oes gennych unrhyw fath o awgrymiadau, syniadau ac adborth mae croeso i chi wneud sylwadau isod.

Modiwl.
7340

Yma, datganais yr Is-weithdrefn Copy_Range_withFormat_ToAnother_Sheet

Rwyf wedi cymryd ystod B1:E10 i'w gopïo o'r ddalen bresennol i enw'r ddalen WithFormat .

Yma, defnyddiais y Copi dull i gopïo'r amrediad a ddewiswyd, Copïwch dull copïo unrhyw ystod gyda Fformat .

Yn olaf, Cadw y cod ac ewch yn ôl i'r daflen waith .

Nesaf, agorwch y tab Gweld >> o Macros >> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_withFormat_ToAnother_Sheet hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedwch y Macro a ddewiswyd.

Felly, bydd Copïo yr ystod a ddewiswyd gyda Fformat i'r ddalen newydd rwyf wedi dewis ( Gyda Fformat) .

> 2. VBA Copïo Ystod i Ddalen Arall heb Fformat

Mae hefyd yn bosibl Copio amrediad i ddalen arall heb Fformat trwy ddefnyddio'r VBA .

Yma, byddaf Copi >ystod o taflen Set Ddata i WithoutFormat sheet.

Dechrau'r drefn,

Nawr, agorwch y Datblygwr tab >> dewiswch Visual Basic ( defnyddiwch y ALT + F11)

Newid, bydd yn agor Microsoft Visual Basic ar gyfer Cymwysiadau.

Yna, agorwch Insert >> dewiswch Modiwl .

A Bydd modiwl yn agor ac yna teipiwch y cod canlynol yn y Modiwl a agorwyd.

6005

Yma, datganais yr Is-weithdrefn Copy_Range_WithoutFormat_Toanother_Sheet

Rwyf wedi cymryd ystod B1:E10 i gopïo o'r ddalen bresennol i enw'r ddalen Heb Fformat .

Yma, defnyddiais y dull Copi i gopïo'r ystod a ddewiswyd ond hefyd crybwyllwyd Gludo:=xlPasteValues ​​ yn y dull PasteSpecial fel y bydd ond yn gludo Gwerthoedd o'r ystod a ddewiswyd, nid y fformat.

Yn olaf , Cadw y cod ac ewch yn ôl i'r daflen waith.

Nesaf, agorwch y Gweld tab >> o Macros >> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_WithoutFormat_Toanother_Sheet a hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedeg y Macro a ddewiswyd.

Felly, bydd Copïo yr ystod a ddewiswyd yn unig gyda Gwerthoedd na Fformat<3 3. Copïwch Ystod i Ddalen Arall gyda Fformat a Lled Colofn

Weithiau efallai y byddwch am Copïwch unrhyw ystod a ddewiswyd fel ag y mae, er mwyn i chi allu Copïo ystod gyda Fformat a Lled Colofn .

Yma, Byddaf yn Copi ystod o Set Ddata taflen i Fformat & Lled Colofn daflen.

I weld y drefn i wneud y dasg gan ddefnyddio VBA ,

Yn gyntaf, agorwch y tab Datblygwr >> dewiswch Visual Basic

Gallwch hefyd ddefnyddio'r bysellfwrdd ALT + F11 i agor y golygydd VBA . <1

Nesaf, bydd yn agor ffenestr newydd o Microsoft Visual Basic for Applications.

Yna, agor Mewnosod >> dewiswch Modiwl .

A Bydd modiwl yn agor ac yna teipiwch y cod canlynol yn y Modiwl a agorwyd. 

2395

Yma, datganais yr Is-weithdrefn Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth

Rwyf wedi cymryd ystod B1:E10 i gopïo o'r ddalen bresennol i enw'r ddalen gyrchfan Fformat & Lled Colofn .

Yma, defnyddiais y dull Copi i gopïo'r ystod a ddewiswyd. Defnyddiais y dull PasteSpecial hefyd lle soniais am Gludo:=xlPasteColumnWidths fel ei fod yn gludo'r ystod a ddewiswyd ynghyd â Fformat a Lled Colofn .

Yn olaf, Cadw y cod ac ewch yn ôl i'r daflen waith.

Nesaf, agorwch y tab Gweld >> o Macros >> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth a hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedeg y dewisedig Macro .

O ganlyniad, bydd Copi yr ystod a ddewiswyd gyda Fformat a Lled Colofn .<1

4. VBA Copïwch Ystod i Ddalen Arall gyda Fformiwla

Rhag ofn bod gennych unrhyw fformiwla yn eich set ddata rydych am ei chopïo. Dim pryderon! Gallwch gopïo'r ystod sy'n cynnwys Fformiwla i ddalen arall gan gadw'r fformiwla yn gyfan.

Yma, byddaf Copi ystod o Set Ddata sheet i Gyda dalen Fformiwla

Gadewch i ni ddechrau'r drefn,

I ddechrau, agorwch y tab Datblygwr >> dewiswch Visual Basic ( gallwch hefyd ddefnyddio'r bysellfwrdd ALT + F11 )

Nesaf, mae'n yn agor Microsoft Visual Basic ar gyfer Cymwysiadau.

Oddi yno, agor Mewnosod >> dewiswch Modiwl .

A Bydd modiwl yn agor ac yna teipiwch y cod canlynol yn y Modiwl a agorwyd. 

2566

Yma, datganais yr Is-weithdrefn Copy_Range_withFormula_ToAnother_Sheet

Rwyf wedi cymryd ystod B1:E10 i gopïo o'r ddalen bresennol i enw'r ddalen gyrchfan WithFormula .

Yma, defnyddiais y dull Copi i gopïo'r ystod a ddewiswyd. Defnyddiais y dull PasteSpecial hefyd lle soniais am Gludo:=xlPasteFormulas fel ei fod yn cario'r Fformiwla ynghyd â'r amrediad a ddewiswyd.

Yn olaf , Cadw y cod ac ewch yn ôl i'r daflen waith.

Yna, agorwch y View tab >> o Macros >> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_withFormula_ToAnother_Sheet hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedwch y Macro a ddewiswyd.

Felly, bydd Copïo yr holl ystodau celloedd a ddewiswyd gyda Fformiwla .

Darlleniadau Tebyg:

  • Sut i Ddefnyddio Offset Ystod VBA (11 Ffordd)
  • VBA ar gyfer Pob Cell mewn Ystod yn Excel (3 Dull)
  • Sut i Ddefnyddio Gwrthrych Amrediad VBA yn Excel (5 Priodwedd)

5. Copïo Ystod ag AutoFit i Daflen Arall

Wrth Copïo ystod i ddalen arall gallwch hefyd ddefnyddio'r dull AutoFit yn yr VBA i AutoFit yr ystod a gopïwyd yn y ddalen newydd.

Yma, byddaf yn Copïo ystod o Set Ddata taflen i AutoFit sheet

Dechrau'r drefn,

Yn gyntaf, agorwch y tab Datblygwr >> dewiswch Visual Basic

Gallwch hefyd ddefnyddio'r bysellfwrdd ALT + F11 i agor y golygydd VBA . <1

Nesaf, bydd yn agor ffenestr o Microsoft Visual Basic for Applications.

Yna, agorwch Mewnosod > ;> dewiswch Modiwl .

A Bydd modiwl yn agor ac yna teipiwch y cod canlynol yn yr agoriad Modiwl . 
5569

Yma, datganais yr Is-weithdrefn Copy_Range_withFormat_AutoFit

Yn gyntaf, dewisais y daflen waith Set Ddata . Yna cymerais yr amrediad B1:E10 i'w gopïo o'r ddalen bresennol i'r ddalen gyrchfan o'r enw AutoFit .

Yma, defnyddiais y Copi dull i gopïo'r ystod a ddewiswyd a bydd y dull AutoFit yn awtoffitio'r colofnau a roddwyd B:E .

Yn olaf, Cadw y cod ac ewch yn ôl i'r daflen waith.

Nesaf, agorwch y Gweld tab >> o Macros >> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_withFormat_AutoFit hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedwch y Macro a ddewiswyd.

Felly, bydd Copi yr ystod a ddewiswyd i ddalen newydd a hefyd AutoFit y colofnau.

6. VBA Copïo Ystod i Lyfr Gwaith Arall

Os ydych chi eisiau gallwch chi hefyd Copi ystod o un ddalen i ddalen arall o lyfr gwaith gwahanol.

Yma, byddaf yn Copi ystod o Set Ddata taflen i Sheet1 o Llyfr1 llyfr gwaith.

Dechrau'r drefn,

Yn gyntaf, agorwch y tab Datblygwr >> dewiswch Visual Basic (y gallwch hefyd ddefnyddio'r bysellfwrdd ALT + F11 )

>

Yna, bydd yn agor Microsoft VisualSylfaenol ar gyfer Ceisiadau.

Nesaf, agor Mewnosod >> dewiswch Modiwl .

A Bydd modiwl yn agor ac yna teipiwch y cod canlynol yn y Modiwl a agorwyd. 

3624

Yma, datganais yr Is-weithdrefn Copy_Range_WithFormat_Toanother_WorkBook

Rwyf wedi cymryd yr amrediad B3:E10 o enw dalen Set Ddata i gopïo o'r ddalen bresennol i enw'r llyfr gwaith newydd Llyfr 1 ac enw'r ddalen Sheet1 .

Yma, defnyddiais y dull Copi i gopïo'r ystod a ddewiswyd i'r llyfr gwaith newydd.

Yn olaf, Arbedwch y cod ac ewch yn ôl i'r daflen waith.

Nesaf, agorwch y tab Gweld >> o Macros >> dewiswch Gweld Macros

➤ Bydd blwch deialog yn ymddangos.

Nawr, o'r Enw Macro dewiswch y Copy_Range_WithFormat_Toanother_WorkBook hefyd dewiswch y llyfr gwaith o fewn Macros yn .

Yn olaf, Rhedwch y Macro a ddewiswyd.

Nawr, bydd Copïo yr ystod a ddewiswyd o'r Set Ddata ddalen i lyfr gwaith arall.

7. Copïwch Ystod i'r Rhes Olaf ar Ddalen Arall

Beth bynnag, os ydych am Copio ystod i ddalen arall o gell benodol neu'r gell olaf gallwch ei wneud gan ddefnyddio'r VBA .

Cyn dechrau'r weithdrefn, rwyf am ddweud wrthych, rwyf wedi cymryd dwy ddalen newydd sy'n cynnwys Enw Llawn, E-bost, a Cyfeiriad .

Gadewch i ni arsylwi ar y ddalen Set Ddata2 yn gyntaf.

1>

Dyma'r ddalen Islaw Cell Olaf .

>

Yma, byddaf Copi ystod o 2>Dalen Set Data2 i Islaw'r Gell Olaf ond o'r gell gyntaf nad yw'n wag.

I ddechrau, agorwch y tab Datblygwr >> dewiswch Visual Basic

Nesaf, bydd yn agor Microsoft Visual Basic ar gyfer Cymwysiadau.

Yna, agor Mewnosod >> dewiswch Modiwl .

A Bydd modiwl yn agor ac yna teipiwch y cod canlynol yn y Modiwl a agorwyd. 

7521

Yma, datganais yr Is-weithdrefn Copy_Range_BelowCell_AnotherSheets

Yn gyntaf, dewisais y ddalen set ddata2 ac yna defnyddio'r dull Rhes i gyfrif y Rhes Olaf a chadw'r rhes gyfrif yn lr .

Yna cymerwyd yr ystod A2:C & lr i gopïo o'r ddalen bresennol i enw'r ddalen cyrchfan Islaw'r Gell Olaf .

Eto, defnyddio'r dull Rhes i gyfrif y Diwethaf Rhes o ddalen arall o'r enw Islaw'r Gell Olaf a chadw'r rhes gyfrif yn lrAnotherSheet .

Yma, defnyddiais y dull Copi i gopïo'r ystod a ddewiswyd a bydd y dull AutoFit yn awtoffitio'r colofnau a roddwyd A:C .

Yn olaf, Cadw y cod ac ewch yn ôl i'r daflen waith.

Nesaf, agorwch y Gweld tab >> o Macros

Post blaenorol Sut i Gyfrifo Blwydd-dal Tyfu yn Excel (2 Ffordd Hawdd)
Post nesaf Talgrynnu i'r Doler Agosaf yn Excel (6 Ffordd Hawdd)

Mae Hugh West yn hyfforddwr a dadansoddwr Excel hynod brofiadol gyda dros 10 mlynedd o brofiad yn y diwydiant. Mae ganddo radd Baglor mewn Cyfrifeg a Chyllid a gradd Meistr mewn Gweinyddu Busnes. Mae gan Hugh angerdd am addysgu ac mae wedi datblygu dull addysgu unigryw sy’n hawdd ei ddilyn a’i ddeall. Mae ei wybodaeth arbenigol o Excel wedi helpu miloedd o fyfyrwyr a gweithwyr proffesiynol ledled y byd i wella eu sgiliau a rhagori yn eu gyrfaoedd. Trwy ei flog, mae Hugh yn rhannu ei wybodaeth gyda’r byd, gan gynnig tiwtorialau Excel am ddim a hyfforddiant ar-lein i helpu unigolion a busnesau i gyrraedd eu llawn botensial.