Tartalomjegyzék
Ha bármilyen szöveget vagy képet kivág vagy másol, az először a vágólapra kerül. Ezt követően a szöveget vagy a képet bárhová beillesztheti, például Word- és Excel-fájlokba. Az Excelben a vágólapról többféleképpen is beillesztheti. A Microsoft Visual Basic alkalmazások (VBA) lehetővé teszi, hogy a vágólapról beillessze az Excel fájlba néhány kóddal. Ebben a cikkben 3 módszert mutatok be a következők használatára VBA a vágólapról az Excelbe való beillesztéshez.
Tegyük fel, hogy másoltam néhány szöveget egy szöveges fájlból, és ezeket elmentette a vágólapra. Most pedig be szeretné illeszteni az Excel-fájlba az alábbi módon VBA .
Gyakorlati munkafüzet letöltése
Beillesztés a vágólapról Excel.xlsm-be3 módszer a VBA használatával a Vágólapról az Excel-be történő beillesztéshez
1. Beillesztés a vágólapról egyetlen cellába a VBA használatával
A módszer alkalmazása előtt aktiválni kell Microsoft Forms 2.0 objektumkönyvtár a VBA projektet, hogy ezt megtegye,
➤ Sajtó ALT+F11 a The VBA
➤ Go to Eszközök> Referenciák a VBA ablak.
Megnyitja a Hivatkozás - VBAProject ablak.
➤ Check Microsoft Forms 2.0 objektumkönyvtár és kattintson a OK .
Ez aktiválja a Microsoft Forms 2.0 objektumkönyvtár ...most,
➤ Kattintson a Beillesztés lapot, és válassza a Modul .
Megnyitja a Modul(kód) ablak.
➤ Szúrja be a következő kódot a Modul(kód) ablak,
Sub Paste_from_Clipboard() Dim CObj As MSForms.DataObject Set CObj = New MSForms.DataObject CObj.GetFromClipboard XText = CObj.GetText(1) ActiveSheet.Range("B4").Value = XText End Sub A kód létrehoz egy Makró amely beilleszti a szöveget a vágólapról a cellába B4 .
A kód beillesztése után,
➤ Kattintson a Fuss ikon vagy nyomja meg a F5 .
Most,
➤ Zárja be vagy minimalizálja a VBA ablak.
Látni fogja, hogy a vágólapról származó szövegek beillesztésre kerültek a cellába. B4 .
Bővebben: Hogyan lehet másolni és beilleszteni az Excelben képletek nélkül (7 egyszerű trükk)
Hasonló olvasmányok
- Egyedi értékek másolása egy másik munkalapra az Excelben (5 módszer)
- Összevont és szűrt cellák másolása Excelben (4 módszer)
- Hogyan másolhat sorokat az Excelben (4 egyszerű módja)
- Több ezer sor másolása és beillesztése az Excelben (3 mód)
- Hogyan lehet másolni és beilleszteni a pontos formázást az Excelben (gyors 6 módszer)
2. Beillesztés a vágólapról SendKeys által
Ez a módszer a CTRL+V amely az adatok beillesztésére szolgál. A VBA kódot, akkor ezzel a paranccsal beillesztheti az adatokat a vágólapról. Először,
➤ Kattintson a jobb gombbal a lap nevére a Projekt panel a VBA ablak.
Megjelenik egy legördülő menü.
➤ Expand Beillesztés kattintással, majd válassza a Modul .
Megnyitja a Modul(kód) ablak.
➤ Szúrja be a következő kódot a Modul(kód) ablak,
Sub Paste_from_Clipboard_2() ActiveSheet.Range("B4").Select SendKeys "^v" End Sub A kód létrehoz egy Makró a nevet viseli. Paste_from_Clipboard_2 amely a következő parancsot adja CTRL+V a cella kiválasztása után B4 és illessze be az adatokat a vágólapról ebbe a cellába.
Most,
➤ Zárja be vagy minimalizálja a VBA ablak.
➤ Sajtó ALT+F8
Megnyitja a Makró ablak.
➤ Válassza ki Paste_from_Clipboard_2 a Makró neve mezőt, és kattintson a Fuss .
Ennek eredményeként látni fogja, hogy a vágólapról származó szövegek beillesztésre kerültek a cella B4 .
Bővebben: Excel VBA csak az értékek másolásához a célállomásra (makró, UDF és UserForm)
3. Beillesztés a vágólapról egy tartományban
Ebben a módszerben megmutatom, hogyan lehet adatok másolása egy lapról a vágólapra, és az adatokat a vágólapról beillesztheti egy másik lapra.
Tegyük fel, hogy a következő adatkészlettel rendelkezik egy lapon, amelynek neve Adatok .
Most,
➤ Sajtó ALT+11 a VBA ablak.
➤ Kattintson a jobb gombbal a lap nevére a Projekt panel a VBA ablak.
Megjelenik egy legördülő menü.
➤ Expand Beillesztés kattintással, majd válassza a Modul .
Megnyitja a Modul(kód) ablak.
➤ Szúrja be a következő kódot a Modul(kód) ablak,
Sub Copy_Clipboard_Range() Worksheets("Data").Range("B4:E9").Copy ActiveSheet.Paste Destination:=Worksheets("Paste sheet").Range("B5:E10") End Sub 
A kód átmásolja az adatokat a B4:E9 a lap neve Adatok a vágólapra. Ezután a program beilleszti az adatokat a B5:E10 a lap neve Paste Sheet a vágólapról.
Utána,
➤ Zárja be vagy minimalizálja a VBA ablak.
➤ Sajtó ALT+F8
Megnyitja a Makró ablak.
➤ Válassza ki Copy_Clipboard_Range a Makró neve mezőt, és kattintson a Fuss .
Ennek eredményeképpen az adatok a kívánt helyre lesznek beillesztve.
➤ Menj a Home fülre, és kattintson a kis lefelé mutató nyíl ikonra a bal alsó sarokban lévő Vágólap szalag.
Ez megnyitja a vágólapot az Excel fájl bal oldalán.
Most láthatja, hogy a lapra beillesztett adatok a vágólapon vannak. Valójában az adatokat először ide mentettük, majd innen illesztettük be a lapra.
Bővebben: Képlet az Excel-értékek másolásához és beillesztéséhez (5 példa)
Következtetés
Ebben a cikkben 3 módszert talál a vágólapról az Excel-be történő beillesztésre a következő eszközökkel VBA Az első két módszer a vágólap tartalmát egyetlen cellába illeszti be, de a harmadik módszerrel beillesztheti az adatokat egy tartományba. Ha bármilyen zavara van, kérjük, hagyjon megjegyzést.
