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
-------- Message original --------
Sujet : Re: [prog] Copier à partir du presse-papier
De : Thibault Vataire <tvata...@starxpert.fr>
Pour : prog@fr.openoffice.org
Date : 15/05/2010 13:19
Bonjour,
Ci-dessous un exemple permettant de coller le contenu du presse papier dans un
document Writer.
sub pasteClipboardContent()
dim controller as object
controller = thisComponent.currentController
if (not isNull(controller)) then
controller.insertTransferable(createUnoService("com.sun.star.datatransfer.clipboard.SystemClipboard").contents)
end if
end sub
En espérant que cela corresponde à ce que vous souhaitiez faire.
Cordialement,
T. Vataire.
---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
