Bin "Newbie" mit LO und stelle gerade meine Tabellen vom alten auf das neue Kalkulationsprogramm um...
Jetzt bitte lächeln: Ich arbeite tatsächlich noch immer mit MS Works 4.5 aus Win95, zwar mittlerweile auf XP aber es geht...
Mein neues System ist Win7/64 und LO in Version 4.3.7.2 auf PC1 und LO 4.4.5.2 auf PC2
Jetzt zum Problem:
LO wandelt ja wohl standardmässig <TAB's> aus der Zwischenablage in Leerzeichen um.
Dieses Verhalten lässt sich ja mit "Inhalte einfügen" gut vermeiden, allerdings muss man dann durch die aufklappenden Dialoge durchtickern, das behindert meine Arbeitsabläufe deutlich.
Hab' mal ein Makro aufgezeichnet und der Kombination <Strg>+<V> zugewiesen, soweit so schön.
Leider muss ich den Textimport-Dialog trotzdem manuell mit <OK> bestätigen ("Enter" oder per Maus),
lässt sich das automatisieren?
Hier der Code:
Code: Alles auswählen
Rem ***BASIC***
sub zwischenablage
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Format"
args1(0).Value = 1
dispatcher.executeDispatch(document, ".uno:PasteSpecial", "", 0, args1())
rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "By"
args2(0).Value = 1
args2(1).Name = "Sel"
args2(1).Value = false
dispatcher.executeDispatch(document, ".uno:GoLeft", "", 0, args2())
end sub
Gruß Alex
