Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
2008to2012
2008to2012
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Zwischenablage per VBA befüllen

Forumthread: Zwischenablage per VBA befüllen

Zwischenablage per VBA befüllen
19.03.2025 11:16:01
Andreas
Hallo liebes Forum.

Ich möchte gerne die Zwischenablage mit einem vorgegebenen Text per VBA befüllen. Mein Ziel ist es, für dieses Makro dann im Menüband eine Schaltfläche einzurichten, so dass ich den vorgegebenen Text per Klick auf diese Schaltfläche in die Zwischenablage bekomme und diesen dann an beliebiger Stelle einfügen kann.

Mir schwebt etwas in folgender Richtung vor, vielleicht bin ich da aber auch komplett auf dem Holzweg: 



    DatenObjekt.SetText "Text für Zwischenablage"

    DatenObjekt.PutInClipboard


Vorab bedanke ich mich schon mal für eure Hilfe.

Grüße
Andi
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zwischenablage per VBA befüllen
19.03.2025 11:32:21
Onur
Schreib den Text (es wird ja kaum immer der gleiche sein) irgendwo in die Datei, dann kannst du einfach mit Copy arbeiten.
AW: Zwischenablage per VBA befüllen
19.03.2025 13:09:09
RPP63
Moin Andi!
Dies funktioniert bei mir problemlos:
(Verweis auf MS Forms 2.0 Object Library ist gesetzt) 
Sub Fill_Clipboard()

Dim ZwiAb As New DataObject

ZwiAb.SetText ("Rhabarberkuchen")

ZwiAb.PutInClipboard

End Sub


Gruß Ralf
Anzeige
AW: Zwischenablage per VBA befüllen
19.03.2025 13:43:41
Andreas
Mahlzeit Ralf.

Vielen Dank für deinen Lösungsvorschlag, der Code macht genau was ich wollte.

Eine kleine Ergänzung noch zu deinem Hinweis mit dem Verweis auf MS Forms 2.0 Object Library (für alle, die nicht wissen, was gemeint ist).

Visual Basic Editor (VB-Editor) -> ALT+F11
Extras -> Verweise -> Durchsuchen
im Verzeichnis "C:\WINDOWS\SYSTEM32" die "FM20.DLL" auswählen

Danach sollte bei den Verweisen der Haken bei Microsoft Forms 2.0 Object Library gesetzt sein

Grüße
Andi
Anzeige
AW: Zwischenablage per VBA befüllen
19.03.2025 13:45:32
Onur
Was gefällt dir an meinem Vorschlag nicht? Da brauchst du nicht dauernd die Datei mit dem Makro geöffnet zu lassen.
AW: Zwischenablage per VBA befüllen
19.03.2025 11:46:29
Andreas
Hallo Onur.

Tatsächlich ist das immer der gleiche Text.

Grüße
Andi
AW: Zwischenablage per VBA befüllen
19.03.2025 11:48:29
Onur
Am einfachsten: Schreibe den Text in irgend eine (versteckte) Zelle - z.B. Z100.
Dann brauchst du nur den Code: 
Range("Z100").Copy
Anzeige
AW: Zwischenablage per VBA befüllen
19.03.2025 12:00:39
Andreas
Leider brauche ich den Text in unterschiedlichsten Dateien, daher wäre das jetzt auch nicht die 1A-Lösung.
AW: Zwischenablage per VBA befüllen
19.03.2025 12:05:34
Onur 
Range("Z100") = "Text für Zwischenablage"

Range("Z100").Copy
AW: Zwischenablage per VBA befüllen
19.03.2025 12:18:27
Andreas
Danke Onur, ich behalte die Lösung mal im Hinterkopf. Wie gesagt, ich hatte mir da etwas eleganteres vorgestellt. Wenn ich den Text jedes mal erst in einen versteckten Bereich schreiben muss, dann ist der Mehrwert eher gering.

Vielleicht versuche ich auch mal ein etwas konkreteres Anwendungsbeispiel:
Ich erstelle häufig Tabellen, bei denen ich am Ende wie eine Art Signatur den Text "erstellt durch Benutzer XY" einfügen möchte. Diesen Text würde ich eben durch das Makro in die Zwischenablage laden um es dann je nach Layout der Tabelle an einer beliebigen Stelle einfügen zu können.

Wenn ich nun zuerst in Zelle Z100 den Text "erstellt durch Benutzer XY" eintrage, dann kann ich das eigentlich auch direkt in der final dafür vorgesehenen Zelle machen.
Anzeige
AW: Zwischenablage per VBA befüllen
19.03.2025 12:31:12
Onur
Wieso überhaupt in die Zwischenablage?
Öffne eine neue Datei und schreibe ein Makro, das den Text in die AKTIVE Zelle schreibt und füge es in die "Symbolleiste für den Schnellzugriff hinzu, dann kannst du von überall her darauf zugreifen:

Das in ein allg. MODUL: 
Public Sub Makro()

    ActiveCell = "Hallo"

    ThisWorkbook.Close

End Sub
Anzeige
AW: Zwischenablage per VBA befüllen
19.03.2025 13:46:35
Andreas
Für mein Anwendungsbeispiel würde das 100%ig funktionieren.

Es gibt aber auch Anwendungsfälle, da möchte ich den Text z.B. in ein Kommentar einfügen, daher mein Ansatz über die Zwischenablage ;-)

Trotzdem vielen Dank für deine Mühe, mittlerweile habe ich ja auch schon die Lösung, die ich wollte
Anzeige
AW: Zwischenablage per VBA befüllen
19.03.2025 13:51:10
Onur
Du solltest die meinen und Ralfs Vorschläge kombinieren - Sein Makro mit der letzten Zeile meines Makros als Button in die Leiste packen .
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum