XL 2013 Dernier numéro +1

Danyk01

XLDnaute Occasionnel
Bonjour

Pour avoir la dernière numérotation de mes devis,
Dans mon fichier (DEVIS) J'aimerais renseigner dans une cellule le dernier numéro +1 issu d'un autre classeur (JOURNAL DEVIS) en cliquant sur le bouton que j'ai mis en place pour ça.
J'ai essayé des codes mais je n'y arrive pas
Merci pour votre aide
 

Pièces jointes

  • FICHIER ESSAI.xlsm
    16.7 KB · Affichages: 4
  • JOURNAL DEVIS2.xlsx
    12.3 KB · Affichages: 5

Claudy

XLDnaute Accro

sylvanu

XLDnaute Barbatruc
Supporter XLD
Vous ouvrez les deux fichiers.
Vous entrez la formules dans le fichier essai.
Vous fermez le fichier source, et XL réactualise le lien. C'est tout.
Chez moi, une fois le fichier Journaldevis fermé la formule devient :
VB:
=MAX('C:\Users\PC_PAPA\Desktop\[JOURNAL DEVIS2.xlsx]Liste'!$A:$A)+1
A l'avenir le lien sera correct et XL ira au bon endroit.
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Avec une petite video !
Vous ouvrez les deux fichiers.
Vous vous mettez en fichier essai B4.
Vous tapez =max(
ensuite vous cliquez sur la colonne A:A de Devis2
puis vous tapez )+1 puis enter.
Ce qui doit faire un truc du genre =MAX('[JOURNAL DEVIS2.xlsx]Liste'!$A:$A)+1 avec votre lien.
Vous avez un lien relatif.
Vous fermez devis2, la formule s'est transformée avec un lien absolu. Du genre :
=MAX('C:\Users\PC_PAPA\Desktop\[JOURNAL DEVIS2.xlsx]Liste'!$A:$A)+1

C'est tout. Après le lien restera et marchera même si le fichier Devis2 est fermé ... mais ne change pas de place.
 

Pièces jointes

  • Enregistrement #11 2.zip
    411.1 KB · Affichages: 6

Danyk01

XLDnaute Occasionnel
Avec une petite video !
Vous ouvrez les deux fichiers.
Vous vous mettez en fichier essai B4.
Vous tapez =max(
ensuite vous cliquez sur la colonne A:A de Devis2
puis vous tapez )+1 puis enter.
Ce qui doit faire un truc du genre =MAX('[JOURNAL DEVIS2.xlsx]Liste'!$A:$A)+1 avec votre lien.
Vous avez un lien relatif.
Vous fermez devis2, la formule s'est transformée avec un lien absolu. Du genre :
=MAX('C:\Users\PC_PAPA\Desktop\[JOURNAL DEVIS2.xlsx]Liste'!$A:$A)+1

C'est tout. Après le lien restera et marchera même si le fichier Devis2 est fermé ... mais ne change pas de place.

Merci beaucoup, ça marche
J'ai d'autres questions, je dois refaire un nouveau thème?
 

Discussions similaires

Réponses
3
Affichages
721
  • Résolu(e)
Microsoft 365 Excel VBA
Réponses
50
Affichages
2 K