selektion kopieren

[ooodoc]

Hallo
Der folgende Code selektiert eine Spalte, den Inhalt der Spalte würde ich gern kopieren.
Habe aber über select und copy nichts gefunden.

Code: Alles auswählen

sub Blatt_Spalte
  doc = ThisComponent
  a = doc.getCurrentController
  'gesamte Spalte markieren
  a.select(doc.Sheets(0).Columns(0))
end sub

Gruß OTTO

[Toxitom]

Hey Otto,

der einfachte Weg: Nimm den Markorekorder und zeichne dir das "Copy&Paste" Ereignis auf - anschliessend passt du das Ganze entsprechend an.
Copy und Einfügen ist mit dem Dispatcher-Code machbar - und wohl auch der schnellste Weg.
Über UNO würdest du den Inhaltsarray er Selektion (Bereich) auslesen und diesen im neuen Bereich eintragen. Ist aber deutlich umständlicher als mit dem Dispatcher -Code

Gruss
Thomas

[komma4]

da der Dispatcher Code zu unübersichtlich ist.

Otto,

Code: Alles auswählen

oDok = ThisComponent
oDokCtrl = oDok.getCurrentController() 
oRahmen = oDokCtrl.getFrame()

' die Auswahl kopieren
REM copy the current selection to the clipboard.
oDispatchHelper = createUnoService( "com.sun.star.frame.DispatchHelper" )
oDispatchHelper.executeDispatch( oRahmen, ".uno:Copy", "", 0, Array() ) 

Vielleicht unverständlich, aber übersichtlich