Récupérer valeurs contenues dans des ellipses
JclSimon
-
gbinforme Messages postés 14930 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 14930 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je souhaiterais récupérer (en automatique) le contenu des ellipses contenues dans une feuille excel (V2003).
Je souhaiterais récupérer (en automatique) le contenu des ellipses contenues dans une feuille excel (V2003).
3 réponses
-
Bonjour,
récupérer : où ?
le contenu des ellipses : le texte ? -
Bonjour,
Je souhaiterais récupérer (en automatique) le contenu des ellipses contenues dans une feuille excel (V2003).
Contenu : numérique de 1 à 3 chiffres
Où: dans une cellule de la même feuille excel
Jean Claude -
bonjour
Tu peux l'obtenir avec une fonction personnalisée comme celle-ci à mettre dans un module (mode d'emploi)Public Function txt_obj(nom) Dim texte As String Application.Volatile texte = ActiveSheet.Shapes(nom).AlternativeText txt_obj = Mid(texte, InStr(1, texte, ": ") + 2) End Function
Ensuite dans la cellule où tu veux le texte tu mets la formule :
=txt_obj("Ellipse 1") ou en numèrique =txt_obj("Ellipse 1")*1
Tu remplaces bien sûr Ellipse 1 par le nom de ton objet concerné.
