PREF31 Open-Office a écrit :
Bonjour et merci
Mais ce que je voudrais faire c'est un collage spécial de texte non
formaté dans calc et que l'utilisateur n'ai pas à choisir les options de
la boite de dialogue "import de texte" (langage, numéro de ligne,
séparateurs ..)
En enregistrant la macro cela me donne le code ci dessous mais je n'ai
trouvé nulle part les noms et valeurs des arguments qui rendraient cet
import silencieux pour l'utilisateur
sub Main
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())
end sub
Claude
Bonsoir,
A propos de PasteSpecial, j'ai vu passer ça il y a quelques jours :
http://user.services.openoffice.org/fr/forum/viewtopic.php?f=8&t=22551
Agnès S.
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
