OVH Cloud OVH Cloud

Débutant VBA

2 réponses
Avatar
phb81
Bonjour,

J'ai:
code = Right(Left(ActiveCell.value,LenB
(ActiveCell.value)/2-4,7)

Par quoi faut -il que je remplace ActiveCell.value pour
tarvailler non pas avec le contenu de la cellule active
mais le lien Hypertexte de la cellule active?

Merci d'avance

Philippe

2 réponses

Avatar
Pierre Fauconnier
Bonjour

ActiveCell.Hyperlinks(1).Address


--
Cela convient-il?
----
Pierre Fauconnier
"C'est lorsqu'il y a un temps mort qu'il faut tuer le temps..."
(remplacer NOSPAM par pfi pour me répondre. Merci)


---
phb81 wrote:
Bonjour,

J'ai:
code = Right(Left(ActiveCell.value,LenB
(ActiveCell.value)/2-4,7)

Par quoi faut -il que je remplace ActiveCell.value pour
tarvailler non pas avec le contenu de la cellule active
mais le lien Hypertexte de la cellule active?

Merci d'avance

Philippe


Avatar
phb81
Ca marche

Merci