Aus der Zwischenablage in Calc einfuegen

[ChristianMuc]

Hallo,

Hier wieder ein Problem von mir:

Ich möchte, dass wenn ich ein Kontrollfeld anklicke, ein bestimmter Zellbereich in Calc gelöscht wird und dann die Daten, die in der Zwischenablage bereitliegen in den eben gelöschten Bereich eingefügt werden.
Das löschen konnte ich schon erfolgreich programmieren, nur weiß ich leider nicht, wie ich auf die Zwischenablage zugreifen kann. Gibt es da eine Möglichkeit?

Christian

[hawkhunter2002]

Hallo Christian,

folgender Code fügt dir den Inhalt der Zwischenablage in die aktuelle Zelle ein.
Habs einfach mit dem Makrorekorder aufgenommen.

Code: Alles auswählen

sub Einfuegen()

dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:Paste", "", 0, Array())


end sub

Gruß

Hawk