Abfrage in den Zwischenspeicher via Button

[CharlieLima]

Moin in die Community,


ich bin noch recht neu hier. Daher entschuldigt bitte meine bestimmt recht simple Frage (nachdem was ich hier alles im Forum gesehen habe  ).

Vorweg. Die Suche hat bei mir leider nicht geholfen.

Nun zu meinem Problem.
Ich habe eine Tabelle, wo alle Daten gespeichert werden (Anschriften, Telefonnummern, Namen und auch Mailadressen). Nun habe ich mir eine Abfrage erstellt ("Abfrage_Mailadressen_Gesamt"), welche mir die gesamten Mailadressen ausgibt.

Nun möchte ich auf meinem Hauptformular ein Button haben, welcher mir per VBA die Mailadressen aus der oben genannten Abfrage in den Zwischenspeicher kopiert, sodass ich diese bei Outlook in das "An" Feld kopieren kann.

Ist dies ein umsetzbarer Ansatz?

Vielen Dank im Voraus, für eure Unterstützung.

[joschi50]

Du kannst Text über den Code über folgende Zeilen in die Zwischenablage kopieren. Einen direkten Befehl in VBA gibt es nicht.
In diesem Fall handelt es sich um ein Adressfeld mit einer Anschrift.

Code [Auswählen] Erweitern

Dim DataObj As MSForms.DataObject
Dim adrf As String
adrf = Me.adressfeld
    Set DataObj = New MSForms.DataObject
    DataObj.SetText adrf
    DataObj.PutInClipboardDas funktioniert auch mit einer Abfrage. Musst halt eine Schleife programmieren die alle Datensätze durchläuft und leere Emailfelder aussortiert und dann Kommagetrennt in einen String einfügt.