Macro N+1

Résolu

Bonjourà tous,

Je souhaiterais que la macro aille chercher le dernier n° dans la colonne B de la feuille N° - rajoute 1 et aille l'ndiquer dans la feuille Facture en B1.

Pour être plus clair, je joins un fichier.

Merci.

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


Windows / Edge 103.0.1264.77



daniel22

4 réponses

  1. Rebonjour M-12,

    Je n'ai pas compris la formule ....mais ça fonctionne parfaitement.

    Pour ce qui est de la macro....je n'ai pas compris non plus, mais

    je ne vois pas pourquoi dans la dernière ligne on fait référence à D1.

    Toujours désireux d'apprendre, si tu as l'occasion de m'en dire plus, je suis preneur.

    Bon dimanche.



    1. Re,

      Ce n'est pas D1 mais Dl ou DL --> une variable pour désigner la Dernière Ligne remplie

  2. Bonjour M-12 et merci pour ta réponse.

    Je regarde à cela dès demain et te dis quoi...!



    1. Bonjour,

      Formule à mettre en B1 par formule

      =RECHERCHE(9^9;N°!B:B)+1

      Et par macro

      Sub Test()
        Dim i%, j%, Dl%
        Dim Ws As Worksheet, Wd As Worksheet
        Set Ws = Sheets("N°")
        Set Wd = Sheets("Facture")
        Dl = Ws.Range("B" & Rows.Count).End(xlUp).Row
        Wd.Range("B1") = Ws.Cells(Dl, 2) + 1
      End Sub