Etendre une formule

[Pierwak]

Bonjour a tous
Je rencontre actuellement un problème qui me donne pas mal de fil a retordre. Je l'ai déja évoqué ici mais je n'ai pas eu de réponses. Il parait que ma question n'était pas assez claire, je vais donc essayer de la poser la plus clairement possible, et le cas échéant j'essaierai de vous faire un fichier exemple, bien que ca ne soit pas simple.

Mes utilisateurs travaillent sur une feuille verrouillée, on ne peut donc pas étendre les formules en les "tirant" sans déverrouiller la feuille. L'ajout/suppression de ligne est entièrement géré par macro/userform. Seulement il y a dans la base une colonne qui est calculée a partir de plusieurs autres via une formule. j'aimerai que la formule se copie automatiquement lors de la création d'une nouvelle ligne...

Voili voilou, j'espère que quelqun aura une idée car moi je ne vois pas trop comment faire mais c'est quelque chose d'important pour la qualité de la solution que j'apporte a mes utilisateurs.

 

[tototiti2008]

Re : Etendre une formule

Bonjour Pierwak,

Le principe :

Tu déprotèges ta feuille
Tu recopies ta formule
Tu reprotèges ta feuille

 

[Cousinhub]

Re : Etendre une formule

Bonjour

en supposant que tes formules sont dans la colonne H, et que tu remplis une à une les lignes, essaie avec ce code :

    [H65000].End(xlUp).AutoFill Destination:=[H65000].End(xlUp).Resize(2, 1)

 

[Pierwak]

Re : Etendre une formule

Salut tototiti, bhbh,
Merci, ton code fonctionne nickel bhbh, je vais de ce pas l'ajouter à mes colonnes comportant une formule.
encore merci.