photosdematures.com

Ang Copy Paste sa VBA ay katulad ng ginagawa namin sa excel worksheet, tulad ng maaari naming kopyahin ang isang halaga at i-paste ito sa isa pang cell maaari din kaming gumamit ng espesyal na i-paste upang i-paste lamang ang mga halaga, katulad sa VBA ginagamit namin ang pamamaraan ng kopya na may saklaw na pag-aari sa kopyahin ang isang halaga mula sa isang cell patungo sa iba pa at upang mai-paste ang halagang ginagamit namin ang pagpapaandar ng worksheet na espesyal na i-paste o i-paste ang pamamaraan.

Paano Kopyahin ang I-paste sa VBA?

Nasa ibaba ang ilang mga halimbawa ng kung paano makopya ang i-paste sa excel gamit ang VBA.

Ang pangunahing bagay na ginagawa namin sa excel ay kinokopya namin, pinuputol namin, at na-paste namin ang data mula sa isang cell patungo sa isa pang cell. Hindi ito nangangailangan ng espesyal na pagpapakilala rin. Gayunpaman, habang ang pag-aaral ng VBA coding ay mahalaga upang maunawaan ang parehong konsepto sa wika ng pag-cod. Ang Copy Paste sa VBA ay ang gawain na gawain na ginagawa namin sa araw-araw sa excel. Upang makopya muna, kailangan naming magpasya kung aling cell ang kokopyahin.

Halimbawa # 1 - Kopyahin at I-paste ang Mga Halaga Gamit ang Saklaw na Bagay

Maaari mong i-download ang VBA Copy Paste Excel Template na ito dito - VBA Copy Paste Excel Template

Ipagpalagay na mayroon kang salitang "Excel VBA" sa cell A1.

Sabihin nating halimbawa kung nais mong kopyahin ang cell A1 maaari naming magamit ang bagay na VBA RANGE.

Code:

 Sub Copy_Example () Saklaw ("A1"). Wakas Sub 

Sa sandaling sanggunian mo ang cell maaari naming makita ang lahat ng mga katangian at pamamaraan kasama nito. Kaya piliin ang pamamaraan na "Kopya”.

Code:

 Sub Copy_Example () Saklaw ("A1"). Kopyahin ang End Sub 

Matapos piliin ang pamamaraan pindutin ang space key upang makita ang argumento ng pamamaraan ng Kopyahin.

Sabi nito Patutunguhan

Ito ay walang anuman kundi saan mo nais na kopyahin ang mga halaga sa VBA nang hindi pinili ang pamamaraang PASTE.

Kung nag-i-paste kami sa parehong sheet maaari naming piliin ang cell sa pamamagitan ng paggamit ng Range object. Sabihin natin kung nais nating i-paste ang halaga sa B3 cell maaari nating ilagay ang patutunguhan bilang "Saklaw (" B3 ")".

Code:

 Sub Copy_Example () Saklaw ("A1"). Destination ng Kopya: = Saklaw ("B3") Tapusin ang Sub 

Kopyahin nito ang data mula sa cell A1 at i-paste sa cell B3.

Maaari din naming gamitin ang pamamaraan sa ibaba upang i-paste ang data.

Code:

 Sub Copy_Example () Saklaw ("A1"). Saklaw ng Kopya ("B3"). Piliin ang ActiveSheet. I-paste ang End Sub 

Una, kopyahin at pipiliin namin ang data mula sa cell A1 at i-paste sa cell B3.

Halimbawa # 2 - Kopyahin sa isa pang Worksheet sa Parehong Workbook

Ngayon kung nais naming kopyahin-i-paste ang halaga mula sa iba't ibang mga worksheet gamit ang VBA macro pagkatapos sa Destination argument kailangan naming sanggunian ang pangalan ng sheet sa pamamagitan ng paggamit ng WORKSHEETS object pagkatapos ay banggitin ang saklaw ng mga cell sa WORKSHEET na iyon. Ang code sa ibaba ang gagawa ng trabaho.

Code:

 Sub Copy_Example () Saklaw ("A1"). Destination ng Kopya: = Mga Worksheet ("Sheet2"). Saklaw ("B3") End Sub 

Kung nais naming kopyahin ang data mula sa isang partikular na sheet at nais na i-paste sa isa pang partikular na sheet, kailangan naming banggitin ang parehong mga pangalan ng mga sheet.

Una kailangan naming banggitin ang sheet ng pagkopya.

Mga worksheet ("Sheet1"). Saklaw ("A1"). Kopyahin

Pagkatapos sa argumentong Patutunguhan, kailangan nating banggitin ang naka-target na pangalan ng worksheet at saklaw ng cell.

Patutunguhan: = Mga Worksheet ("Sheet2"). Saklaw ("B3")

Kaya dapat itong magustuhan ng code.

Code:

 Sub Copy_Example () Mga Worksheet ("Sheet1"). Saklaw ("A1"). Destination ng Kopya: = Mga Worksheet ("Sheet2"). Saklaw ("B3") End Sub 

Halimbawa # 3 - Kopyahin mula sa Isang Workbook patungo sa isa pang Workbook

Nakita namin kung paano makopya mula sa worksheet patungo sa isa pang worksheet sa parehong workbook. Ngunit magagawa rin natin ito mula sa isang workbook hanggang sa isa pang workbook.

Tingnan ang code sa ibaba.

Code:

 Sub Copy_Example () Mga Workbook ("Book 1.xlsx"). Mga worksheet ("Sheet1"). Saklaw ("A1"). Kopyahin ang Mga Workbook ("Book 2.xlsx"). Paganahin ang ActiveWorkbook.Worksheets ("Sheet 2"). Piliin ang ActiveSheet.Paste End Sub 

Una ay kokopyahin nito ang data mula sa worksheet na "Sheet1" sa workbook na "Book1.xlsx" mula sa cell A1.

“Mga Workbook ("Book 1.xlsx"). Mga worksheet ("Sheet1"). Saklaw ("A1"). Kopyahin ”

Pagkatapos ay buhayin nito ang workbook na "Book 2.xlsx".

Mga Workbook ("Book 2.xlsx"). Paganahin

Sa aktibong workbook, pipiliin nito ang worksheet na "Sheet 2"

ActiveWorkbook.Worksheets ("Sheet 2"). Piliin

Ngayon sa aktibong sheet, ito ay i-paste

ActiveSheet.Pasta

Alternatibong Paraan para sa paggamit ng Copy Paste sa VBA

Mayroon kaming isa pang alternatibong paraan ng pagkakaroon ng data mula sa isang cell patungo sa isa pang cell. Ipagpalagay na mayroon kang salitang "Excel VBA" sa cell A1 at kailangan mo ang parehong makarating sa cell B3.

Ang isang pamamaraan na nakita namin ay ang paggamit ng pamamaraan ng kopya at i-paste ng VBA, ngayon ay ipapakita ko sa iyo ang isa sa mga kahaliling paraan. Tingnan ang piraso ng code sa ibaba upang maunawaan.

Code:

 Sub Copy_Example1 () Saklaw ("A1"). Halaga = Saklaw ("B3"). Value End Sub 

Sinasabi sa itaas kung anuman ang halaga na naroon sa cell A1 ay dapat na katumbas ng halaga sa cell B3.

Saklaw ("A1"). Halaga = Saklaw ("B3"). Halaga

Kahit na ito ay hindi isang kopya at i-paste ang pamamaraan na nagdaragdag pa rin ng higit na halaga sa aming kaalaman sa pag-cod.

Nangungunang Mga Paraan ng VBA Copy at I-paste bilang Mga Halaga

Ngayon makikita namin ang iba't ibang mga paraan ng mga halaga ng pagkopya at pag-paste ng VBA. Ipagpalagay na nasa cell A1 ka tulad ng ipinakita sa larawan sa ibaba.

• Kung nais naming kopyahin at i-paste kailangan naming mag-refer sa cell dito, sa halip ay maaari lamang kaming gumamit ng isang pag-aari ng Selection. Paraan ng pagkopya.

Code:

 Sub Copy_Example1 () Selection.Copy Destination: = Saklaw ("B3") End Sub 

O kaya

 Sub Copy_Example1 () ActiveCell.Copy Destination: = Saklaw ("B3") End Sub 

• Kung nais mong kopyahin ang buong ginamit na saklaw ng worksheet maaari mong gamitin ang code sa ibaba.

Code:

 Sub Copy_Example2 () Mga Worksheet ("Sheet1"). Destination ng Ginamit naRange.Copy: = Mga Worksheet ("Sheet2"). Saklaw ("A1") End Sub 

Kopyahin nito ang buong ginamit na saklaw sa worksheet na "Sheet1" at i-paste ang pareho sa worksheet na "Sheet2"