Pasta VBA

Wklej VBA działa w taki sam sposób, jak robimy Kopiuj / Wytnij i Wklej w Excelu. VBA Wklej to zautomatyzowaną wersję tego, co regularnie robimy w regularnej pracy programu Excel. Wklejanie danych w dowolnym wymaganym miejscu jest rutynowym zadaniem. Aby wykonać tę czynność, musimy zdefiniować lokalizację, z której wybieramy dane i lokalizację, w której będziemy je wklejać.

Jak korzystać z pasty Excel VBA?

Dowiemy się, jak korzystać z pasty VBA z kilkoma przykładami w Excelu.

Możesz pobrać ten szablon VBA Paste Excel tutaj - VBA Paste Excel Template

Pasta VBA - Przykład nr 1

Rozważmy każdą komórkę w programie Excel, która zawiera tekst. Tutaj trzymaliśmy tekst „ VBA Paste ” w komórce B3, jak pokazano poniżej.

Wykonaj poniższe kroki, aby użyć VBA Paste.

Krok 1: Teraz przejdź do okna VBA i otwórz nowy moduł z menu Wstaw, jak pokazano poniżej.

Krok 2: Gdy to zrobimy, otrzymamy pusty moduł. W tym zacznij pisać podkategorię. Zaleca się zapisanie podkategorii w nazwie funkcji, którą wykonujemy.

Kod:

 Sub VBAPaste1 () End Sub

Krok 3: Teraz najpierw wybierz komórkę Zakres, w której mamy dane, które musimy skopiować. Tutaj naszą komórką Range jest B3, a następnie funkcja .Copy . Spowoduje to skopiowanie danych z komórki Range, którą wybraliśmy.

Kod:

 Sub VBAPaste1 () Zakres („B3”) Kopiuj Koniec Sub

Krok 4: Teraz potrzebujemy komórki docelowej, w której musimy wkleić skopiowaną wartość. Za pomocą polecenia Miejsce docelowe wybierz komórkę Zakres. Tutaj wybraliśmy komórkę D1, w której zobaczymy wartość.

Kod:

 Sub VBAPaste1 () Range („B3”). Miejsce docelowe kopiowania: = Range („D1”) End Sub

Krok 5: Po zakończeniu skompiluj kod i uruchom go.

Zobaczymy, że zawartość komórki B3 jest teraz kopiowana i wklejana do komórki D3, jak pokazano powyżej.

Pasta VBA - Przykład 2

Rozważmy inny przykład pasty VBA. W tym celu przejdź do okna VBA i otwórz moduł, a następnie wykonaj poniższe kroki.

Krok 1: Zacznij pisać podkategorię w nazwie wklej VBA lub w dowolnej innej nazwie, jak pokazano poniżej.

Kod:

 Sub VBAPaste2 () End Sub

Krok 2: Tutaj rozważymy te same dane lub komórkę referencyjną B3, które widzieliśmy w przykładzie-1. Wybierz komórkę zakresu B3, a następnie polecenie Kopiuj . Spowoduje to skopiowanie danych.

Kod:

 Sub VBAPaste2 () Zakres („B3”) Kopiuj Koniec Sub

Krok 3: Teraz wybierz komórkę zakresu, w której musimy wkleić skopiowane dane. Tutaj wybieramy komórki od D1 do D3, w przeciwieństwie do wybierania tylko jednej komórki, jak pokazano w przykładzie-1.

Kod:

 Sub VBAPaste2 () Range („B3”). Copy Range („D1: D3”). Wybierz End Sub

Krok 4: Po skopiowaniu danych i zaznaczeniu komórek, do których należy je wkleić. Teraz wybierz polecenie Wklej za pomocą funkcji ActiveSheet . Ten arkusz Actives pozwala na skopiowanie komórki wklejonej w komórkach zakresu.

Kod:

 Sub VBAPaste2 () Range („B3”). Copy Range („D1: D3”). Wybierz ActiveSheet. Wklej End Sub

Krok 5: Teraz skompiluj kod i uruchom go. Zobaczymy, wartość komórki z komórki B3 zostanie wklejona z komórek D1 do D3.

Pasta VBA - przykład nr 3

Inną metodą wklejania VBA jest ręczny proces kopiowania i wklejania.

Wykonaj poniższe kroki:

Krok 1: Napisz podkategorię wklej VBA, jak pokazano poniżej.

Kod:

 Sub VBAPaste3 () End Sub

Krok 2: Lepiej podać sekwencję podkategorii, jeśli piszesz wiele zestawów kodów w jednym pliku. Aby wkleić cokolwiek, najpierw musimy skopiować te dane. Tutaj wybraliśmy polecenie Kopiuj .

Kod:

 Sub VBAPaste3 () Selection.Copy End Sub

Krok 3: Teraz wybierz zakres lub komórkę odniesienia, którą musimy skopiować i wkleić. Tutaj mamy komórkę D3 z danymi „VBA Paste”.

Kod:

 Sub VBAPaste3 () Selection.Copy Range („D3”). Wybierz End Sub

Krok 4: Teraz w programie Excel wybieramy komórki, w których musimy wkleić dane ręcznie lub za pomocą klawiszy Shift + Ctrl + góra / dół. Tutaj również wybierzemy lokalizację komórek poleceniem End (xlUp) w celu wybrania zakresu komórek wyjściowych.

Kod:

 Sub VBAPaste3 () Selection.Copy Range ("D3"). Select Range (Selection, Selection.End (xlUp)). Wybierz End Sub

Krok 5: Teraz wybierz zakres komórek wyjściowych, tutaj wybraliśmy komórki D1 do D3, w których zobaczymy wklejone dane.

Kod:

 Sub VBAPaste3 () Selection.Copy Range („D3”). Select Range (Selection, Selection.End (xlUp)). Select Range („D1: D3”). Select End Sub

Krok 6: Jako funkcję musimy wykonać funkcję wklejania, więc musimy aktywować polecenie wklejania w VBA za pomocą polecenia ActiveSheet, a następnie wklej kropkę (.).

Kod:

 Sub VBAPaste3 () Selection.Copy Range („D3”). Select Range (Selection, Selection.End (xlUp)). Select Range („D1: D3”). Wybierz ActiveSheet.Paste End Sub

Krok 7: Teraz wreszcie pozwól aplikacji CutCopyMode na FAŁSZ, co oznacza, że ​​kopiujesz tylko dane zamiast wycinać je również z komórki referencyjnej.

Kod:

 Sub VBAPaste3 () Selection.Copy Range („D3”). Select Range (Selection, Selection.End (xlUp)). Select Range („D1: D3”). Wybierz ActiveSheet.Paste Application.CutCopyMode = False End Sub

Krok 8: Przed uruchomieniem kodu najpierw umieść kursor na komórce B3. Następnie skompiluj kod i uruchom go. Zobaczymy, że nasze dane zostaną skopiowane do komórek od D1 do D3.

Pasta VBA - Przykład 4

Istnieje inny sposób użycia wklejania VBA w jednym wierszu kodu.

Wykonaj poniższe kroki:

Krok 1: Wpisz podkategorię w sekwencji i nazwie wykonanej funkcji.

Kod:

 Sub VBAPaste4 () End Sub

Krok 2: Użyj polecenia Arkusze i wybierz Arkusz, w którym będziemy pracować. Tutaj nasza nazwa arkusza to „Arkusz1”. Możemy użyć Workbook.Sheet (1) również do wybrania „Arkusza1” zamiast tego.

Kod:

 Sub VBAPaste4 () Arkusze robocze („Arkusz 1”). Napis końcowy

Krok 3: Wybierz komórkę, z której skopiujemy dane. Tutaj naszą komórką Range jest B3, która ma te same dane, co widzieliśmy w powyższych przykładach.

Kod:

 Sub VBAPaste4 () Arkusze („Arkusz 1”). Zakres („B3”). Napis końcowy

Krok 4: Teraz wstaw polecenie Kopiuj po kropce (.), Aby skopiować dane z wybranej komórki zakresu.

Kod:

 Sub VBAPaste4 () Arkusze robocze („Arkusz 1”). Zakres („B3”). Kopiuj Koniec Sub

Krok 5: Teraz użyj polecenia Miejsce docelowe, aby wybrać lokalizację, w której wkleimy skopiowane dane. W tym celu wybierz Arkusz jako „Arkusz1”, co zrobiliśmy na początku tego przykładu, i wybierz komórki zakresu w dowolnym miejscu tego samego arkusza. Tutaj wybraliśmy komórki wyjściowe Range od D1 do D3.

Kod:

 Sub VBAPaste4 () Arkusze robocze („Arkusz 1”). Zakres („B3”). Miejsce docelowe kopiowania: = Arkusze robocze („Arkusz 1”). Zakres („D1: D3”) Koniec Sub

Krok 6: Teraz skompiluj i uruchom. Tekst „Wklej VBA” z komórki B3 zostanie skopiowany i wklejony w komórkach D1 do D3, jak pokazano poniżej.

Zalety pasty Excel VBA

  • Zastosowanie pierwszych 2 przykładów jest najłatwiejszym i najszybszym sposobem na zastosowanie VBA Paste.
  • W przypadku ogromnych danych, w których trudno jest wykonać wiele czynności, jeśli zautomatyzujemy tego rodzaju małą funkcję, zaoszczędziłoby to wiele czasu na ręcznym wykonywaniu czynności.
  • Nie ma limitu kopiowania i wklejania danych.

Rzeczy do zapamiętania

  • Użyj podkategorii w taki sposób, że jeśli używasz wielu modułów, wówczas umieszczenie w niej sekwencji ułatwi śledzenie i wybranie odpowiedniego makra.
  • Zapisz plik programu Excel w formacie Macro Enable, aby zapisany kod został zachowany do następnego użycia.
  • Jeśli piszesz wiele wierszy kodu, zaleca się skompilowanie kodu wiersz po wierszu, aby sprawdzić, czy występuje w nim błąd.
  • Zaleca się umieszczenie kursora w komórce B3, jeśli używasz przykładu-3.

Polecane artykuły

To był przewodnik po VBA Paste. Tutaj omówiliśmy Wklej VBA i jak korzystać z Wklej Excel VBA wraz z praktycznymi przykładami i szablonem Excel do pobrania. Możesz także przejrzeć nasze inne sugerowane artykuły -

  1. VBA Match | Jak używać?
  2. Formuła Excel TRANSPOSUJ
  3. Zakres VBA | Łatwe makra Excel
  4. Zagnieżdżona formuła IF w programie Excel

Kategoria:

VBA