Macro N+1

Résolu
daniel22 Messages postés 335 Date d'inscription   Statut Membre Dernière intervention   -  
daniel22 Messages postés 335 Date d'inscription   Statut Membre Dernière intervention   -

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



A voir également:

4 réponses

M-12 Messages postés 1349 Statut Membre 285
 

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
0
daniel22 Messages postés 335 Date d'inscription   Statut Membre Dernière intervention   4
 

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

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



0
daniel22 Messages postés 335 Date d'inscription   Statut Membre Dernière intervention   4
 

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.



0
M-12 Messages postés 1349 Statut Membre 285
 

Re,

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

0
daniel22 Messages postés 335 Date d'inscription   Statut Membre Dernière intervention   4
 

Ok...

Grand merci pour ton aide.



0