aus Editor kopiern

Forumthread: aus Editor kopiern
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: aus Editor kopiern

aus Editor kopiern

14.11.2005 09:49:44

Ander

Guten Morgen!
Ich hab wieder mal eine Frage an Euch!
Ich möchte im Editor etwas markieren und das Markierte der
Variablen a zuweisen. Könnte mir bitte jamand bei der entsprechenden
Zeile behilflich sein.
Vielen Dank
Andreas


Sub probe()
Dim a
AppActivate "Editor"
Application.SendKeys "+{END}", True
'a = markierter Bereich im Editor
End Sub

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: aus Editor kopiern

14.11.2005 11:40:20

Ander

AW: aus Editor kopiern

14.11.2005 11:40:20

Ander

Hallo zusammen habe mir zu obigem Problem ein Makro zusammengebastelt.
Könnte mir bitte jemand kontrollieren ob dieses Makro "gut" ist und/oder
wie man es verbessern kann.
Vielen Dank im Voraus
Andreas


Sub probe()
Dim a, b
AppActivate "Editor"
Application.SendKeys "+{END}", True
Application.SendKeys "^c", True
Set b = New DataObject
b.GetFromClipboard
AppActivate "Microsoft Excel"
Cells(1, 1) = b.GetText(1)
End Sub