Einfügen aus der Zwischenablage in Excel mit VBA

  • Teile Das
Hugh West

Wenn Sie einen Text oder ein Bild ausschneiden oder kopieren, wird dieser/dieses zunächst in der Zwischenablage gespeichert. Danach können Sie den Text oder das Bild überall einfügen, z. B. in Word- und Excel-Dateien. In Excel können Sie auf verschiedene Weise aus der Zwischenablage einfügen. Mit Microsoft Visual Basic-Anwendungen (VBA) ermöglicht es Ihnen, mit einigen Codes aus der Zwischenablage in Ihre Excel-Datei einzufügen. In diesem Artikel zeige ich Ihnen 3 Methoden zur Verwendung von VBA zum Einfügen aus der Zwischenablage in Excel.

Angenommen, Sie haben einige Texte kopiert aus einer Textdatei, die in der Zwischenablage gespeichert wurde. Nun möchten Sie sie in Ihre Excel-Datei einfügen, indem Sie VBA .

Download Arbeitsbuch Praxis

Einfügen aus der Zwischenablage in Excel.xlsm

3 Methoden zum Einfügen aus der Zwischenablage in Excel mit VBA

1. aus der Zwischenablage in eine einzelne Zelle mit VBA einfügen

Bevor Sie diese Methode anwenden, müssen Sie Folgendes aktivieren Microsoft Forms 2.0 Objekt-Bibliothek für die VBA um das zu tun,

➤ Presse ALT+F11 zum Öffnen von The VBA

➤ Weiter zu Werkzeuge> Referenzen im VBA Fenster.

Sie öffnet die Referenz - VBAProjekt Fenster.

➤ Prüfen Microsoft Forms 2.0 Objekt-Bibliothek und klicken Sie auf OK .

Sie aktiviert die Microsoft Forms 2.0 Objekt-Bibliothek . jetzt,

➤ Klicken Sie auf das Symbol einfügen. und wählen Sie Modul .

Sie öffnet die Modul(Code) Fenster.

➤ Fügen Sie den folgenden Code in die Datei Modul(Code) Fenster,

 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 

Der Code erstellt eine Makro der die Texte aus der Zwischenablage in die Zelle B4 .

Nach dem Einfügen des Codes,

➤ Klicken Sie auf das Symbol ausführen. Symbol oder drücken Sie F5 .

Jetzt,

➤ Schließen oder minimieren Sie die VBA Fenster.

Sie sehen, dass die Texte aus der Zwischenablage in die Zelle eingefügt wurden B4 .

Lesen Sie mehr: Kopieren und Einfügen in Excel ohne Formeln (7 einfache Tricks)

Ähnliche Lektüre

  • Kopieren eindeutiger Werte in ein anderes Arbeitsblatt in Excel (5 Methoden)
  • Zusammengeführte und gefilterte Zellen in Excel kopieren (4 Methoden)
  • Wie man Zeilen in Excel kopiert (4 einfache Methoden)
  • Kopieren und Einfügen von Tausenden von Zeilen in Excel (3 Möglichkeiten)
  • Kopieren und Einfügen von exakten Formatierungen in Excel (6 Schnellmethoden)

2. aus der Zwischenablage einfügen mit SendKeys

Diese Methode basiert auf dem Tastenkürzel STRG+V die zum Einfügen von Daten verwendet wird. Mit einer VBA Code können Sie mit diesem Befehl Daten aus der Zwischenablage einfügen. 1,

➤ Klicken Sie mit der rechten Maustaste auf den Blattnamen in der Projekt Panel des VBA Fenster.

Es wird ein Dropdown-Menü angezeigt.

➤ Erweitern einfügen. durch Anklicken und wählen Sie dann Modul .

Sie öffnet die Modul(Code) Fenster.

➤ Fügen Sie den folgenden Code in die Datei Modul(Code) Fenster,

 Sub Paste_from_Clipboard_2() ActiveSheet.Range("B4").Select SendKeys "^v" End Sub 

Der Code erstellt eine Makro namens Einfügen_aus_Zwischenablage_2 die den Befehl STRG+V nach Auswahl der Zelle B4 und fügen Sie die Daten aus der Zwischenablage in diese Zelle ein.

Jetzt,

➤ Schließen oder minimieren Sie die VBA Fenster.

➤ Presse ALT+F8

Sie öffnet die Makro Fenster.

➤ Auswählen Einfügen_aus_Zwischenablage_2 im Makro-Name Box und klicken Sie auf ausführen. .

Als Ergebnis sehen Sie, dass die Texte aus der Zwischenablage in die Zelle eingefügt wurden B4 .

Lesen Sie mehr: Excel VBA zum Kopieren nur von Werten ins Ziel (Makro, UDF und UserForm)

3. aus der Zwischenablage in einen Bereich einfügen

In dieser Methode werde ich Ihnen zeigen, wie Sie eine Reihe von Daten zu kopieren aus einem Blatt in die Zwischenablage und fügen Sie diese Daten aus der Zwischenablage in ein anderes Blatt ein.

Angenommen, Sie haben den folgenden Datensatz in einem Blatt namens Daten .

Jetzt,

➤ Presse ALT+11 zum Öffnen des VBA Fenster.

➤ Klicken Sie mit der rechten Maustaste auf den Blattnamen in der Projekt Panel des VBA Fenster.

Es wird ein Dropdown-Menü angezeigt.

➤ Erweitern einfügen. durch Klicken und wählen Sie dann Modul .

Sie öffnet die Modul(Code) Fenster.

➤ Fügen Sie den folgenden Code in die Datei Modul(Code) Fenster,

 Sub Copy_Clipboard_Range() Worksheets("Data").Range("B4:E9").Copy ActiveSheet.Paste Destination:=Worksheets("Paste sheet").Range("B5:E10") End Sub 

Der Code kopiert die Daten aus B4:E9 des Blattes mit dem Namen Daten in die Zwischenablage und fügt die Daten dann in B5:E10 des Blattes mit dem Namen Blatt einkleben aus der Zwischenablage.

Und dann,

➤ Schließen oder minimieren Sie die VBA Fenster.

➤ Presse ALT+F8

Sie öffnet die Makro Fenster.

➤ Auswählen Kopieren_Zwischenablage_Bereich im Makro-Name Box und klicken Sie auf ausführen. .

Dadurch werden Ihre Daten am gewünschten Zielort eingefügt.

➤ Gehen Sie zum Startseite und klicken Sie auf das kleine Abwärtspfeil-Symbol in der linken unteren Ecke des Fensters Zwischenablage Band.

Dadurch wird die Zwischenablage auf der linken Seite Ihrer Excel-Datei geöffnet.

Wie Sie sehen, befinden sich die Daten, die in das Blatt eingefügt wurden, in der Zwischenablage. Eigentlich wurden die Daten zuerst hier gespeichert und dann von hier aus in das Blatt eingefügt.

Lesen Sie mehr: Formel zum Kopieren und Einfügen von Werten in Excel (5 Beispiele)

Schlussfolgerung

In diesem Artikel finden Sie 3 Methoden zum Einfügen aus der Zwischenablage in Excel mit VBA Die ersten beiden Methoden fügen den Inhalt der Zwischenablage in eine einzelne Zelle ein, aber mit der dritten Methode können Sie Daten in einen Bereich einfügen. Wenn Sie irgendwelche Unklarheiten haben, können Sie gerne einen Kommentar hinterlassen.

Hugh West ist ein äußerst erfahrener Excel-Trainer und -Analyst mit über 10 Jahren Erfahrung in der Branche. Er verfügt über einen Bachelor-Abschluss in Rechnungswesen und Finanzen sowie einen Master-Abschluss in Betriebswirtschaft. Hugh hat eine Leidenschaft für das Unterrichten und hat einen einzigartigen Lehransatz entwickelt, der leicht zu befolgen und zu verstehen ist. Seine Expertenkenntnisse in Excel haben Tausenden von Studenten und Berufstätigen auf der ganzen Welt geholfen, ihre Fähigkeiten zu verbessern und in ihrer Karriere herausragende Leistungen zu erbringen. Über seinen Blog teilt Hugh sein Wissen mit der Welt und bietet kostenlose Excel-Tutorials und Online-Schulungen an, um Einzelpersonen und Unternehmen dabei zu helfen, ihr volles Potenzial auszuschöpfen.