Trasnfert une formule vers une macro

nonossov Messages postés 638 Statut Membre -  
fabien25000 Messages postés 697 Statut Membre -
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

2 réponses

  1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     
    bonjour, veux-tu simplement que la macro enregistre la formule dans certaines cellules?
    0
    1. nonossov Messages postés 638 Statut Membre
       
      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
      0
      1. fabien25000 Messages postés 697 Statut Membre 59 > nonossov Messages postés 638 Statut Membre
         
        et étirer la formule n'est pas suffisant comme solution?
        0
    2. nonossov Messages postés 638 Statut Membre
       
      Franchement j'ai déja d'autre macro et je veux associer cette macro avec les autres
      0
    3. fabien25000 Messages postés 697 Statut Membre 59
       
      et ces autres macro font quoi? on a peut être pas besoin de tout ré-écrire mais qu'une ligne à rajouter..?
      0
  2. fabien25000 Messages postés 697 Statut Membre 59
     
    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
    0