Behar duzunean, orri batetik beste orri edo lan-liburu batera barruti bat kopiatu dezakezu. Kopiatu eta itsatsi mota desberdinak daude. Artikulu honen ondoren, Excel VBA kopia-barrutia beste orri batera erabiltzeko modu desberdinak ezagutuko dituzu.

Azalpena bizia izateko, pertsona jakin batzuen informazio pertsonala adierazten duen datu-multzo lagin bat erabiliko dut. . Datu multzoak 4 zutabe ditu. Zutabe hauek Izen-abizenak, Izen-abizenak, eta E-posta dira.

Deskargatu lan-koadernoa praktikatzeko

Excel VBA Kopiatu Barrutia beste orri batean 8 modu

1. Kopiatu Barrutia Formatua duen beste orri batera

Orri batetik beste orri batera Formatua rekin Kopiatu nahi duzunean, besterik gabe egin dezakezu . 2>VBA .

Hemen, Kopiatuko dut barruti bat Dataset orritik WithFormat orrira.

Has dezagun prozedura,

Lehenik eta behin, ireki Garatzailea fitxa >> hautatu Visual Basic

ALT + F11 teklatua ere erabil dezakezu VBA irekitzeko. 3>editorea.

Ondoren, Microsoft Visual Basic aplikazioetarako izeneko leiho berri bat irekiko da.

Hortik, ireki Txertatu >> hautatu Modulua .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekita dagoenean. >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_BelowLastCell_AnotherSheets ere hautatu lan-liburua Makroak barruan.

Azkenik, Exekutatu Hautatutako Makroa .

Ondorioz, Kopiatuko du hautatutako barrutia eta Itsatsi beste orri bateko azken errenkadatik. .

8. VBA Kopiatu barruti bat beste lan-liburu baten azken errenkadan

Kopiatu nahi baduzu barruti bat beste lan-liburuko orri baten azken errenkadaraino VBA ere erabil dezakezu.

Hemen, kopiatuko dut barruti bat Dataset2-tik orritik Hori1 ko Liburuko 2 baina hutsik ez dagoen lehenengo gelaxkatik.

Prozedura hasteko,

Lehenik eta behin, ireki Garatzailea fitxa >> hautatu Visual Basic

ALT + F11 teklatua ere erabil dezakezu VBA editorea irekitzeko.

Ondoren, Microsoft Visual Basic aplikazioetarako leiho berri bat irekiko da.

Hortik, ireki Txertatu >> hautatu Moduloa .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekitako Modulua .

6158

Hemen, Azpiprozedura Copy_Range_BelowLastCell_To_Another_Workbook non wsCopy eta wsDestination Lan-orria mota dira, lCopyLastRow eta lDestLastRow Luzea mota dira.

Lehenik, Ezarri kopiatu beharreko orrirako eta helburuko orrirako aldagaiak ezartzeko erabiltzen da.

Ondoren, Rankada metodoa erabili du kopia barrutian A zutabearen datuetan oinarritutako azken errenkada aurkitzeko.

Berriro, Rankada metodoa erabili du. A zutabearen datuetan oinarritutako lehen errenkada hutsa aurkitzeko helmuga-barrutian ere erabilitako Offset propietate bat behera egiteko.

Azkenik, Kopiatua Dataset2 orriaren datuak Excel VBA Copy Range beste Sheet.xlsm lan-liburutik helmugara Sheet1 lan-liburuko Book2.xlsx .

Orain, Gorde kodea eta itzuli lan-orrira.

Ondoren, ireki Ikusi fitxa >> Makroak >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_BelowLastCell_To_Another_Workbook ere hautatu lan-liburua Makroak barruan.

Azkenik, Exekutatu Hautatutako Makroa .

Ondorioz, Kopiatuko du hautatutako tartea lehendik dagoen orritik beste lan-liburu bateko azken errenkadara.

Praktika atala

Lan-koadernoan lan-orri bat eman dut Excel-en VBA kopia-barrutia azaldutako modu hauek lantzeko beste orri batera.

Ondorioa

Artikulu honetan, 8 modu erraz eta azkar mota ezberdin azaldu ditut.Excel VBA kopiatu barrutia beste orri batera. Modu ezberdin hauek orri batetik bestera eta orri batetik bestera lan-koaderno bat kopiatzen lagunduko dizute. Azkenik, iradokizunak, ideiak eta iritziak badituzu, mesedez behean iruzkintzen baduzu.

4919

Hemen, Azpiprozedura Kopiatu_Barrutia_Format_Beste_Orri batera

deklaratu dut. B1:E10 barrutia hartu dut lehendik dagoen orritik WithFormat orriaren izenera kopiatzeko.

Hemen, Kopia erabili dut. hautatutako barrutia kopiatzeko metodoa, Kopiatu metodoak edozein barruti kopiatzen du Formatua rekin.

Azkenik, Gorde kodea eta itzuli lan-orrira. .

Ondoren, ireki Ikusi fitxa >> Makroak >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_withFormat_ToAnother_Sheet hautatu lan-liburua ere Makroak barruan.

Azkenik, Exekutatu Hautatutako Makroa .

Beraz, Kopiatuko du hautatutako barrutia Formatua rekin hautatu dudan orri berrian ( Formatuarekin) .

2. VBA Kopiatu barruti bat beste orri batera formatu gabe

Baita ere posible da barruti bat kopiatu beste orri batera Formatu gabe VBA erabiliz.

Hemen, Kopiatuko dut Datu multzoa orritik WithoutFormat orrira bitartekoa.

Has gaitezen prozedura,

Orain, ireki Garatzailea . fitxa >> hautatu Visual Basic ( erabili ALT + F11)

Ondoren, irekiko da Microsoft Visual Basic aplikazioetarako.

Ondoren, ireki Txertatu >> hautatu Modulua .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekitako Modulua .

7811

Hemen, Azpi prozedura Copy_Range_WithoutFormat_Toanother_Sheet

Barrutia hartu dut deklaratu dut B1:E10 lehendik dagoen orritik orri izenera WithoutFormat kopiatzeko.

Hemen, Kopiatu metodoa erabili dut hautatutako barrutia kopiatzeko baina baita aipatu du Itsatsi:=xlPasteValues ​​ PasteSpecial metodoan, hautatutako barrutiaren Balioak soilik itsatsiko dituena, ez formatua.

Azkenik. , Gorde kodea eta itzuli lan-orrira.

Ondoren, ireki Ikusi fitxa >> Makroak >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_Without_Format_Toanother_Sheet eta hautatu lan-liburua ere Makroak barruan.

Azkenik, Exekutatu hautatutako makroa .

Horrela, kopiatuko du hautatutako barrutia Balioak ez Formatua<3rekin soilik>.

3. Kopiatu barruti bat beste orri batera formatua eta zutabearen zabalerarekin

Batzuetan, agian Kopiatu hautatutako edozein barruti dagoen bezala, horretarako Kopiatu barruti bat Formatua eta Zutabearen Zabalera dituena.

Hemen, Kopiatuko dut barruti bat Datu multzoa orritik Formatu eta amp; Zutabearen zabalera orria.

Zereginak VBA erabiliz egiteko prozedura ikusteko,

Lehenik eta behin, ireki Garatzailea fitxa >> hautatu Visual Basic

ALT + F11 teklatua ere erabil dezakezu VBA editorea irekitzeko.

Ondoren, leiho berri bat irekiko da Microsoft Visual Basic for Applications.

Hor, ireki Txertatu >> hautatu Modulua .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekitako Modulua .

5569

Hemen, Azpi prozedura Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth

Barrutia hartu dut B1:E10 lehendik dagoen orritik xede-orriaren izenara kopiatzeko Formatu & Zutabearen zabalera .

Hemen, Kopiatu metodoa erabili dut hautatutako barrutia kopiatzeko. ItsatsiSpecial metodoa ere erabili dut, non Itsatsi:=xlPasteColumnWidths aipatu dudanean, hautatutako barrutia itsatsi dezan Formatua eta Zutabeen Zabalera rekin batera. .

Azkenik, Gorde kodea eta itzuli lan-orrira.

Ondoren, ireki Ikusi fitxa >> Makroak >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth eta ere hautatu lan-liburua Makroak barruan.

Azkenik, Exekutatu hautatutakoa Makroa .

Ondorioz, kopiatuko du hautatutako barrutia Formatua eta Zutabearen zabalera rekin.

4. VBA Kopiatu barruti bat beste orri batera formula batekin

Kopiatu nahi duzun datu multzoan formularen bat baduzu. Ez kezkatu! Formula duen barrutia beste orri batera kopiatu dezakezu formula osorik mantenduz.

Hemen, kopiatuko dut barruti bat Dataset orritik WithFormula orrira

Has dezagun prozedura,

Hasteko, ireki Garatzailea fitxa >> hautatu Visual Basic ( ALT + F11 teklatua ere erabil dezakezu)

Ondoren, irekiko du Microsoft Visual Basic for Applications.

Hortik, ireki Txertatu >> hautatu Modulua .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekitako Modulua .

7495

Hemen, Azpi prozedura Copy_Range_withFormula_ToAnother_Sheet

Barrutia hartu dut deklaratu dut B1:E10 lehendik dagoen orritik helmuga-orriaren izenera kopiatzeko WithFormula .

Hemen, Kopiatu metodoa erabili dut hautatutako barrutia kopiatzeko. ItsatsiSpecial metodoa ere erabili dut, non Itsatsi:=xlPasteFormulas aipatu dudanez, Formulak aukeratutako barrutiarekin batera eraman dezan.

Azkenik. , Gorde kodea eta itzuli lan-orrira.

Ondoren, ireki Ikusi. fitxa >> Makroak >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_withFormula_ToAnother_Sheet hautatu lan-liburua ere Makroak barruan.

Azkenik, Exekutatu Hautatutako Makroa .

Horrela, Kopiatuko ditu hautatutako gelaxka-barruti guztiak Formulak erabiliz.

Antzeko irakurketak:

• Nola erabili VBA barrutiaren desplazamendua (11 modu)
• VBA Excel-en barrutiko gelaxka bakoitzeko (3 metodo)
• Nola erabili VBAren barruti objektua Excel-en (5 propietate)

5. Doikuntza automatikoa duen barrutia beste orri batera kopiatu

Barruti bat beste orri batera kopiatzen duzun bitartean, Egokitze automatikoa metodoa ere erabil dezakezu VBA ra Autodokitu orri berrian kopiatutako barrutian.

Hemen, Kopiatuko dut barruti bat Dataset-etik orrira Egokitze automatikoa orrira

Has dezagun prozedura,

Lehenik eta behin, ireki Garatzailea fitxa >> hautatu Visual Basic

ALT + F11 teklatua ere erabil dezakezu VBA editorea irekitzeko.

Ondoren, Microsoft Visual Basic aplikazioetarako leiho bat irekiko da.

Ondoren, ireki Txertatu > ;> hautatu Modulua .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekita dagoenean. Modulua .

7411

Hemen, Azpi prozedura Copy_Range_withFormat_AutoFit

deklaratu dut Lehenik eta behin, Dataset lan-orria hautatu nuen. Ondoren, B1:E10 barrutia hartu zuen lehendik dagoen orritik AutoDoit izeneko helmugako orrira kopiatzeko.

Hemen, Kopia erabili dut. hautatutako barrutia kopiatzeko metodoa eta Egokitu automatikoa metodoak emandako zutabeak automatikoki egokituko ditu B:E .

Azkenik, Gorde kodea eta joan itzuli lan-orrira.

Ondoren, ireki Ikusi fitxa >> Makroak >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_withFormat_AutoFit hautatu lan-liburua ere Makroak barruan.

Azkenik, Exekutatu Hautatutako Makroa .

Ondorioz, Hautatutako barrutia kopiatuko du orri berri batera eta, gainera, Automatikoki zutabeak

6. VBA Kopiatu barruti bat beste lan-liburu batera

Nahi baduzu, kopiatu tarte bat orri batetik beste orri batera ere egin dezakezu beste lan-koaderno batena.

Hemen, Kopiatuko dut barruti bat Datu multzoa orritik Hori1 Liburuko1 ra. lan-koadernoa.

Has dezagun prozedura,

Lehenik eta behin, ireki Garatzailea fitxa >> hautatu Visual Basic (y ALT + F11 teklatua ere erabil dezakezu)

Ondoren, Microsoft Visual irekiko duAplikazioetarako oinarrizkoa.

Ondoren, ireki Txertatu >> hautatu Modulua .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekitako Modulua .

7030

Hemen, Azpiprozedura deklaratu dut Copy_Range_WithFormat_Toanother_WorkBook

Barrutia hartu dut B3:E10 orriaren izenetik Datu multzoa lehendik dagoen orritik lan-liburuaren izen berrira kopiatzeko Liburu1 eta fitxaren izena Hori1 .

Hemen, Kopiatu metodoa erabili dut hautatutako barrutia lan-liburu berrira kopiatzeko.

Azkenik, Gorde kodea eta itzuli lan-orrira.

Ondoren, ireki Ikusi fitxa >> Makroak >> hautatu Ikusi makroak

➤ Elkarrizketa-koadroa agertuko da.

Orain, Makro-izenetik hautatu Copy_Range_WithFormat_Toanother_WorkBook ere hautatu lan-liburua Makroak barruan.

Azkenik, Exekutatu Hautatutako Makroa .

Orain, Kopiatuko du hautatutako barrutia Datu multzoa orritik beste lan-liburu batera.

7. Kopiatu barruti bat beste orri baten azken errenkadan

Edonola ere, kopiatu barruti bat beste orri batera nahi baduzu. gelaxka jakin batetik edo azken gelaxkatik VBA erabiliz egin dezakezu.

Prozeduran sartu baino lehen, esan nahi dizut, bi orri berri hartu ditudala Izen-abizenak, helbide elektronikoa, eta Helbidea .

Beha dezagun lehenik Dataset2 orriari.

Hona hemen Azken gelaxka orrialdea.

Hemen, Kopiatuko dut barruti bat . 2>Dataset2 orrira Azken gelaxka azpian baina hutsik ez dagoen lehenengo gelaxkatik.

Hasteko, ireki Garatzailea fitxa >> hautatu Visual Basic

Ondoren, Microsoft Visual Basic aplikazioetarako irekiko da.

Ondoren, ireki Txertatu >> hautatu Modulua .

A Modulua irekiko da eta ondoren idatzi hurrengo kodea irekitako Modulua .

9025

Hemen, Azpi prozedura Copy_Range_BelowLastCell_AnotherSheets

Lehenik, orria hautatu dut Dataset2 eta gero Rankada metodoa erabili du Azken errenkada zenbatzeko eta zenbatutako errenkada lr n mantendu.

Ondoren hartu. barrutia A2:C & lr lehendik dagoen orritik helmuga-orriaren izenera kopiatzeko Azken gelaxka azpian .

Berriro, erabili Rankada metodoa Azkena zenbatzeko. Azken gelaxka azpian izeneko beste orri baten errenkada eta lrAnotherSheet -n mantendu zuen zenbatutako errenkada.

Hemen, Kopiatu metodoa erabili dut hautatutako barrutia kopiatzeko eta Egokitze automatikoa metodoak automatikoki egokituko ditu emandako zutabeak A:C .

Azkenik, Gorde kodea eta itzuli lan-orrira.

Ondoren, ireki Ikusi fitxa >> Makroetatik