Bonjour,
Voici un exemple qui fonctionne dans le contexte suivant :
- créer un tableau nommé "Tableau1" dans un doc Writer et enregistrer ce
document
- copier le tableau
- collage spécial dans le document de destination, options "Lien DDE"
sub deleteTabDDELink()
dim textTable as object
dim section as object
textTable = thisComponent.textTables.getByName("Tableau1")
section = textTable.anchor.textSection
section.isProtected = false
section.IsAutomaticUpdate = false
section.setPropertyToDefault("DDECommandFile")
section.setPropertyToDefault("DDECommandElement")
section.setPropertyToDefault("DDECommandType")
end sub
Cordialement,
T. Vataire
---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
