[Résolu][Calc]Accès aux noms des liens vers données externes

[pgla63]

Bonjour,

Est-il possible d'accéder par une programmation BASIC à la liste des liens externes et de déterminer les noms de toutes les sources de données disponibles dans la liste afin de pouvoir supprimer les fichiers sources à partir des noms correspondants ? (la méthode qui consiste à supprimer à partir de l'index n'est pas entièrement satisfaisante)

Je vous remercie par avance.

[micmac]

Bonjour et bienvenue,

gerrit.libreoffice.org / core / fe0b08f4af1bacafe4c7ecc87ce55bb426164676

Votre signature doit être ainsi renseignée :

1. Version exacte de AOO ou LibO (AOO 4.1.10, LibO 7.0.6 par exemple) ;
2. Version exacte du système d'exploitation (Windows XP SP3, Vista SP2, Windows 7 SP1, Win 8.1, Win 10, Ubuntu 20.04, macOS 11.4 par exemple).

Accès direct à votre signature pour la corriger.

Cordialement.

[Dude]

Salut,

déterminer les noms de toutes les sources de données disponibles dans la liste

De quelle liste s'agit-il ?
Fournis au moins une copie d'écran qu'on puisse comprendre.

[zeguedon]

Bonjour,

En l'absence de + d'informations

A tester :

Code : Tout sélectionner

Sub Main
oDoc = Thiscomponent
lesLiens = oDoc.AreaLinks
'xray lesLiens
For i = lesLiens.Count -1 To 0 step -1
	unLien = lesLiens.GetByIndex(i)
	'xray unLien
	msgBox unLien.SourceArea
	msgBox unLien.Url
	if msgBox("Souhaitez-vous supprimer ce lien ?", 4) = 6 then
		lesLiens.removeByIndex(i)
	end if
next
End Sub

@+