Modification liens hypertexte sujet

Bonjour,

Je viens à nouveau vers vous pour un problème de liens hypertextes corrompus.
Sur plus de la moitié des liens il manque une partie du chemin pour accéder au fichier.

Quand je fais un clic droit et modifier le lien hypertexte j'ai ceci : Listing%20CR\MW14023%20modif%20brûleur%20OCM.xls
J'aimerais ajouter cette partie du chemin aux liens existants : \s013\Groupes\milestone\Change Request\

J'ai essayé avec cette macro mais ca ne fonctionne pas

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub test() Dim h As Hyperlink For Each h In [B1:B1000].Hyperlinks If UCase(Left(h.Address, 2)) = "Li" Then h.Address = "\S013\Groupes\milestone\Change Request\" & Mid(h.Address, 1) End If Next End Sub

---

Auriez-vous une solution ?

Extraction avant dernier item d'un lien hypertexte sujet

Bonjour a tous
je souhaite extaire les differents items d'un lien hypertexte afin de pouvoir interpréter dans une autre cellule la valeur obtenue.
Par Exemple :
j'ai en A1 mon lien hypertextedont le nom est Fiche_détaillée_FD1000_2500_058A.pdf

Je souhaite extraire dans une cellule voisine la chaine FD1000,
dans une autre cellule voisine la chaine 2500,
puis dans sa voisine 058A.

J'ai préalablement utilisé la formule suivante qui marche pour extraire la chaine aprés le premier underscore.

Code:

---

1 2	=stxt(A1;(cherche("_";A1;+1))+1;(cherche("_";A1;(cherche("_";A1;1))+1)-(cherche("_";A1;1))-1))

---

mais je n'arrive pas a extraire la chaine pour afficher la chaine aprés le dernier underscore et/ou avant dernier underscore.

Par contre cette formule ne marche que sur les chaines de caractères mais pas sur les lien hypertextes ce que je souhaiterais.

Je suis dans le flou si quelqu'un pourais m'aider a trouver la solution ce serait top .

Merci

XL 2010 lien hypertexte généré avec un userform sujet

Bonjour,
Je suis nouveau sur le forum.
Je bloque sur un Excel/ VBA / Userform

Je forme une base de données sur Excel
Je remplie cette base de données, via un userform.
A chaque saisie via le userform, je cherche à insérer un lien hypertexte vers un fichier (pdf...) présent dans une arborescence.
Le lien hypertexte est à coller sur une cellule remplie (listbox) dans le Userfom.
J'arrive à générer la fenêtre de recherche du fichier via

Application.Dialogs(xlDialogInsertHyperlink).Show

mais après je bloque ....

Qqn aurait une solution ou une piste ?

Merci par avance

Seb

Formule lien hypertexte mail et plusieurs comptes mails sous Thunderbird sujet

Bonjour,
existe-t-il une solution sous excel pour choisir le compte à partir duquel on veut envoyer un mail au moyen de la formule pour insérer un lien hypertexte mail dans une cellule?

J'envoie mes mails avec Thunderbird pour info.

[WD-2007] Définir un lien hypertexte comme chemin pour enregistrer sous sujet

bonjour,

je sais comment définir un chemin et donner un nom à un fichier pour enregistrer sous en macro.

J'utilise le code suivant :

Code:

---

WordApp.ChangeFileOpenDirectory "e:\"
WordApp.ActiveDocument.SaveAs Filename:=Workbooks("fichier l20").Sheets("datas autre défaut").Range("m50").End(xlUp).Text

---

Ce que j'aimerais faire c'est remplacer la 1ière ligne par un code permettant de sélectionner un lien hypertexte contenu dans une cellule qui m'indique le chemin à suivre pour enregistrer mon fichier.

Ceci permettrai de mettre à jour le fichier de destination sans toucher à la macro en cas de changement.

Je vous remercie d'avance.

[WD-2007] définir un lien hypertexte comme chemin pour enregistrer sous sujet

bonjour,

je sais comment définir un chemin et donner un nom à un fichier pour enregistrer sous en macro.

J'utilise le code suivant :

WordApp.ChangeFileOpenDirectory "e:\"
WordApp.ActiveDocument.SaveAs Filename:=Workbooks("fichier l20").Sheets("datas autre défaut").Range("m50").End(xlUp).Text


Ce que j'aimerais faire c'est remplacer la 1ière ligne par un code permettant de sélectionner un lien hypertexte contenu dans une cellule qui m'indique le chemin à suivre pour enregistrer mon fichier.

Ceci permettrai de mettre à jour le fichier de destination sans toucher à la macro en cas de changement.

Je vous remercie d'avance.