Macro pour coller fonction

Bonjour à tous,

J'essai de créer une macro qui me permet de coller une fonction qui utilise rechercheV

Le but est le suivante : en feuille base : une base de données de références correspondantes

En feuille Croisement, je souhaite coller des références en colonne A. Puis je colle la fonction qui se trouve en H3 sur B4, et j'étire sur toute la plage de cellule nécessaire.

Ensuite, au cas où des références différentes soit présent, je colle la fonction de J3 en C4 et j'étends sur toute la surface. Prévoir 5 à 10 colonnes.

Est-ce qu'une macro pourrait me simplifier la tache en un seul clic ?

(le format texte est à préserver car j'ai des références avec un zero devant)

Merci pour votre aide

Pamounier

Bonjour,

un exemple pour B :

Sub collerFonction()
    Dim derlig As Long
    derlig = Cells(Rows.Count, "A").End(xlUp).Row
    Range("B4:B" & derlig).Formula = [H3].Formula
End Sub

Adapte les références relatives ta formule en H3 en fonction de ce qu'elles doiventt être dans la 1ère cellule collée (B4) : donc ...(G4...)

Je n'ai pas très bien compris les conditions pour les autres colonnes mais le principe sera le même.

Mais pourquoi tu ne les laisses pas en permanence tes formules ?

En plus tu as 2010. Si tu déclares ta plage en tableau les formules se recopient sur toutes les lignes où tu ajoutes des données.

eric