[VBA] Arbeiten mit dem Clipboard?

07/10/2008 - 17:01 von Michael Mueller | Report spam
Hi.

Aus VB kenne ich folgende Codezeilen:

Clipboard.Clear
Clipboard.SetText strUebertrag

Wie würde ich das denn ich Excel2k3-VBA hinbekommen?

Geht dies nur über API-Aufrufe

OpenClipboard Lib "user32"
EmptyClipboard Lib "user32"
SetClipboardData Lib "user32"
CloseClipboard Lib "user32"

oder gibt es einen einfacheren Weg?

Danke im Voraus
Michi
 

Lesen sie die antworten

#1 Claus Busch
07/10/2008 - 18:11 | Warnen spam
Hallo Michael,

Am Tue, 7 Oct 2008 17:01:56 +0200 schrieb Michael Mueller:

Aus VB kenne ich folgende Codezeilen:

Clipboard.Clear
Clipboard.SetText strUebertrag

Wie würde ich das denn ich Excel2k3-VBA hinbekommen?



z.B. den Export der Zellen A1:A10 in die Zwischenablage:
Setze einen Verweis aud
Microsoft Forms 2.0 Object Library
und verwende dann diesen Code:

Sub ExportNachClipboard()

Dim rngZelle As Range
Dim Data As String
Dim MyData As DataObject

Set MyData = New DataObject

For Each rngZelle In Range("A1:A10")
Data = Data & rngZelle & " "
Next

With MyData
.SetText Data
.PutInClipboard
End With


End Sub


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP3 / Vista Ultimate
Office 2003 SP3 / 2007 Ultimate SP1

Ähnliche fragen