VBA Paste Special til að afrita gildi og snið í Excel (9 dæmi) -

  • Deildu Þessu
Hugh West

Þegar við þurfum að afrita og líma hvaða gögn sem er í Microsoft Excel höfum við möguleika á mismunandi flýtileiðum og borði í Excel. Excel VBA Macro hefur líka slíka aðstöðu frekar en vinnubókarvalkosti. Við munum ræða VBA Paste Special gildin og sniðin í Excel.

Hlaða niður æfingarvinnubók

Hlaða niður þessari æfingabók til að æfa á meðan þú ert að lesa þessa grein.

Gildi og snið með PasteSpecial.xlsm

9 dæmi til að afrita gildi og snið með Paste Special í Excel VBA

Í þessari grein munum við ræða 9 aðferðir með VBA fjölvi til að Líma sérstök gildi og snið í Excel.

Við munum skoðaðu gagnasafnið hér að neðan í þessu skyni.

1. Notaðu InputBox í VBA Paste Special til að afrita gildi og snið

Við munum nota InputBox valkostinn í þessu dæmi fyrir Paste Special .

Skref 1 :

  • Farðu á flipann Þróunaraðili .
  • Smelltu á Record Macro .
  • Setja Excel_Paste_Special_1 sem Macro nafn .
  • Ýttu síðan á OK .

Skref 2:

  • Smelltu nú á Macros skipunina.
  • Veldu Macro og ýttu svo á Stígðu inn .

Skref 3:

  • Afritu og límdu eftirfarandi kóða á skipanaeiningunni.
6243

Skref 4:

  • Ýttu á F5 að keyrakóða.
  • Nýr svargluggi mun birtast. Veldu upprunasviðið á þeim reit.
  • Ýttu síðan á OK .

Skref 5:

  • Önnur svargluggi mun birtast. Veldu autt svið þar sem á að líma afrituðu hólf.

Skoðaðu nú gagnasafnið.

Öll gögn eru afrituð með gildum og sniðum með VBA Paste Special .

Lesa meira: Hvernig á að nota VBA PasteSpecial og halda upprunasniði í Excel

2. Settu inn hólfasvið með gildum og sniðum með því að nota xlPasteAllUsingSourceTheme í VBA Paste Special

Við munum setja hólfsviðið beint inn á VBA kóðann í þessum hluta.

Skref 1:

  • Ýttu á Alt+F11 til að slá inn skipanaeininguna.
  • Settu eftirfarandi kóða á skipanaeininguna.
9562

Skref 2:

  • Nú, ýttu á F5 til að keyra kóðann.

Þessi xlPasteAllUsingSourceTheme skipun afritar nákvæmlega afrit upprunagagnanna.

Lesa meira: Excel VBA: Copy Cell Value and Paste to Another Cell

3. Notaðu VBA breytu til að setja inn svið með gildum og sniðum með því að nota Paste Special

Við munum sýna notkun breytna í VBA Paste Special kóðanum hér.

Skref 1:

  • Sláðu fyrst inn skipanaeininguna með því að ýta á Alt+F11 .
  • Sláðu inn kóðann hér að neðan í skipuninnimát.
6606

Skref 2:

  • Ýttu á F5 og keyrðu kóða.

Lesa meira: Excel VBA: Copy Range to Another Workbook

4. Notaðu xlPasteValues ​​og xlPasteFormats til að afrita gildi og snið í öðru blaði Halda sniðunum óbreyttum

Ofgreindar aðferðir voru notaðar til að afrita og líma gögn á sama blaði. Nú munum við sýna hvernig á að nota VBA Paste Special fyrir mismunandi blöð.

Skref 1:

  • Sláðu inn skipanaeininguna með því að smella á Alt+F11 og afrita eftirfarandi kóða á hann.
2187

Skref 2:

  • Ýttu á F5 til að keyra kóðann.

Við getum séð þessi gögn í Data_Set er afritað í Annað_blað .

Lesa meira: Hvernig á að nota VBA PasteSpecial fyrir formúlur og snið í Excel (3 Ways)

Svipaðar lestur

  • Hvernig á að afrita margar frumur í annað blað í Excel (9 aðferðir)
  • Munurinn á Paste og Paste Special í Excel
  • Excel VBA til að afrita gögn úr annarri vinnubók án þess að opna
  • Hvernig á að afrita og líma í Excel og Haltu frumustærð (7 dæmi)
  • Afrita og líma gildi í næstu tómu línu með Excel VBA (3 dæmi)

5 . Notaðu xlPasteFormats til að líma aðeins sniðin

Í fyrri aðferðunum afrituðum við öll gögnin og límdum þaumeð engum breytingum. En í þessum hluta munum við afrita aðeins snið gagna.

Skref 1:

  • Farðu í skipanaeininguna með því að ýta á Alt+ F11 .
  • Afritu og límdu kóðann hér að neðan í skipanaeiningunni.
2177

Skref 2:

  • Nú, ýttu á F5 hnappinn og keyrðu kóðann.

Skoðaðu gagnasafnið. Aðeins sniðin eru afrituð, engin gildi eru til staðar hér.

Lesa meira: Hvernig á að afrita og líma í Excel án þess að breyta sniðinu

6. Notaðu xlPasteValues ​​til að líma aðeins gildin

Við getum afritað gildin aðeins með því að nota VBA Paste Special .

Skref 1:

  • Ýttu á Alt+F11 til að slá inn skipanaeininguna.
  • Skrifaðu eftirfarandi kóða á skipanaeininguna.
8521

Skref 2:

  • Smelltu á F5 og keyrðu kóðann.

Taktu eftir gagnapakkanum. Aðeins gildi eru afrituð hér. Engin snið eru afrituð í þessari aðferð.

Lesa meira: Hvernig á að nota VBA til að líma gildi eingöngu án sniðs í Excel

7. Afritaðu og límdu allt innihald stakrar frumu

Í fyrri köflum afrituðum við fjölda gagna. Hér munum við afrita aðeins einn reit.

Skref 1:

  • Nú, ýttu á Alt+F11 og sláðu inn skipunina mát.
  • Sláðu inn eftirfarandi kóða á eininguna.
1305

Skref 2:

  • Nú, ýttu á F5 hnappinn til að keyra kóðann.

Við getum séð að ein reit er afrituð hingað, ekki svið.

Lesa meira: Formúla til að afrita og líma gildi í Excel (5 dæmi)

8. Afritaðu og límdu alla eiginleika ákveðins dálks með VBA

Eins og einn reiti getum við afritað einn dálk í gagnasafninu.

Skref 1:

  • Ýttu einfaldlega á Alt+F11 til að slá inn skipanaeininguna.
  • Skrifaðu kóðann hér að neðan í einingunni.
6173

Skref 2:

  • Keyddu kóðann með því að ýta á F5 .

Hér getum við séð að dálkur B er afritaður í dálk E .

Lesa meira: [Lögað]: Hægrismelltu á Copy and Paste virkar ekki í Excel (11 lausnir)

9. Afritaðu og límdu alla eiginleika línu með Excel VBA

Á sama hátt getum við afritað eina línu með því að nota Paste Special .

Skref 1 :

  • Smelltu á Alt+F11 til að slá inn stjórnunareininguna.
  • Afritaðu eftirfarandi kóða á skipanaeininguna.
3417

Skref 2:

  • Keyddu kóðann með því að ýta á F5 .

Hér er Röð 4 afrituð í Röð 11 .

Lesa meira: Hvernig á að afrita margar línur í Excel með fjölvi (4 dæmi)

Niðurstaða

Í þessari grein höfum við útskýrt 9 aðferðir við VBA Paste Sérstök gildi og snið í Excel. Ég vona að þetta verði fullnægjandiþínum þörfum. Endilega kíkið á heimasíðu okkar Exceldemy.com og gefðu upp tillögurnar þínar í athugasemdareitnum.

Hugh West er mjög reyndur Excel þjálfari og sérfræðingur með yfir 10 ára reynslu í greininni. Hann er með BA gráðu í bókhaldi og fjármálum og meistaragráðu í viðskiptafræði. Hugh hefur ástríðu fyrir kennslu og hefur þróað einstaka kennsluaðferð sem auðvelt er að fylgja eftir og skilja. Sérfræðiþekking hans á Excel hefur hjálpað þúsundum nemenda og fagfólks um allan heim að bæta færni sína og skara fram úr í starfi. Í gegnum bloggið sitt deilir Hugh þekkingu sinni með heiminum og býður upp á ókeypis Excel námskeið og netþjálfun til að hjálpa einstaklingum og fyrirtækjum að ná fullum möguleikum.