Étendre formule VBA

Résolu

Bonjour,

J'ai créé une macro avec une formule que j'aimerais étendre jusqu'à la fin des donnees.

Lorsque j'ai créer cette Macro mon fichier comprenait 62 lignes. Ce nombre étant voué a changer m, comment remplacer le code : Range("Q4:Q62") par un code qui etend jusqu'a la dernière ligne non vide ?

Merci d'avance 

9 réponses

  1. Contributeur

    Bonjour

    la dernière ligne non vide colonne "Q"

    Derlig = Columns("Q").Find(what:="*", searchdirection:=xlPrevious).Row

    Range("Q4:Q" & Derlig)


    1
    1. Bonjour,

      Merci pour la réponse j'essaie tout a l'heure.

      Je ne sais pas si j'ai bien écrit ma question

      Je voudrais que la formule s'étende en colonne Q, tant qu'il existe des données en colonne A par exemple 

      0
  2. Contributeur

    "Je ne sais pas si j'ai bien écrit ma question"

    Bin non !

    Envoie des feuilles au format Excel....et non des photos 


    0
    1. Le lien fonctionne il ?

      0
  3. milles excuses..

    https://www.cjoint.com/c/LLAnbeWgbHO

    https://www.cjoint.com/c/LLAncQscHjO

    0
    1. Bonjour,

      Dommage que votre macro a disparue....! Au passage , salutation michel-m.


      0
      1. Bonjour,

        Pas compris ????

        0
    2. Bonjour,

      J'ai créé une macro avec une formule que j'aimerais étendre jusqu'à la fin des donnees.

      Elle n'est pas présente dans votre fichier......!


      0
      1. D'accord je comprends pas pourquoi ça n'est pas passé c'est sensé être le premier fichier

        0
    3. Bonjour,

      Il est impossible d'ouvrir le premier fichier qui est en extension xlam ... !


      0
      1. Sous quel format vous pourriez le lire ? Sur mon PC j'ouvre toujours le fichier xlam

        0
    4. https://www.cjoint.com/c/LLChYOfXb0S

      surement mieux comme ça

      0
      1. Bonjour,

        Encore une fois, la macro que vous avez créée ne figure pas dans le fichier mis à disposition et pourquoi dans la cellule Q4  il n'y a pas la formule que vous voulez étendre conformément à votre demande,.....!


        0
        1. https://www.cjoint.com/c/LLDhvUePArN

          une fois la macro activée, la formule est rentrée en Q4

          la macro je la lance via le fichier xlam habituellement

          0
      2. Merci Le Pingou et michel_m la 1ere formule proposé par michel a finalement fonctionée

        0