Trasnfert une formule vers une macro

Messages postés
582
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
19 septembre 2019
- - Dernière réponse : fabien25000
Messages postés
589
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
26 juin 2019
- 31 mai 2019 à 18:00
Bonjour mes amis,

Je vouderai avoir une macro qui fait la meme tache de cette formule :

=LIEN_HYPERTEXTE(STXT(CELLULE("nomfichier";A1);1;TROUVE("[";CELLULE("nomfichier";A1))-1)&A1&"")


Cette formule donne un lien hypertexet sur un fichier excel.

Dans la colonne A existe le nom de fichier,

Est ce qu'il est possible de transfert cette formule vers une macro pour que la macro s'applique sur la colonne A,

et je ne serai pas obliger de faire copier coller du formule.

Merci de m'aider SVP,

Merci infinimet


Configuration: Windows / Firefox 52.0
Afficher la suite 

2 réponses

Messages postés
8706
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
15 octobre 2019
435
0
Merci
bonjour, veux-tu simplement que la macro enregistre la formule dans certaines cellules?
nonossov
Messages postés
582
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
19 septembre 2019
-
ce que je veux au lieu de faire copier coller sur la colonne entiere la macro s'applique la formule sur la colonne C:C jusqu'a la cellule non vide
fabien25000
Messages postés
589
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
26 juin 2019
46 > nonossov
Messages postés
582
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
19 septembre 2019
-
et étirer la formule n'est pas suffisant comme solution?
nonossov
Messages postés
582
Date d'inscription
lundi 29 décembre 2014
Statut
Membre
Dernière intervention
19 septembre 2019
-
Franchement j'ai déja d'autre macro et je veux associer cette macro avec les autres
fabien25000
Messages postés
589
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
26 juin 2019
46 -
et ces autres macro font quoi? on a peut être pas besoin de tout ré-écrire mais qu'une ligne à rajouter..?
Commenter la réponse de yg_be
Messages postés
589
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
26 juin 2019
46
0
Merci
Worksheets("NOMDETAFEUILLE").Range(ADEFINIRPARTESSOINS).Formula = "=HYPERLINK(MID(CELL("nomfichier";A1);1;FIND("[";CELL("nomfichier";A1))-1)&A1&"")" 

Voilà comment ça s'écrit reste à donner les variables pour les cellules dans la boucle
Commenter la réponse de fabien25000