XL 2019 Nouveau Numéro

Danyk01

XLDnaute Occasionnel
Bonjour à tous
Ma dernière demande d'aide n'étais pas concluent car j'ai plusieurs problèmes avec cette fonction

je m'explique:
j'ai ma matrice dans laquelle je peux faire un devis (zone Devis) ou des factures (zone Facture). voir fichier joint
j'aimerais transformer mon devis en facture, c'est là que le problème commence.

1) pour commencer, si je créé mon devis, pour ne pas abîmer la matrice, je change le numéro, je renseigne le chantier, et je l'enregistre immédiatement dans un dossier cible
sous un nom du client.
2) je ferme la matrice sans enregistrer
3) je retourne sur le fichier enregistré et je continue mon devis jusqu'à son terme.

A partir de là je peux changer l'intitulé devis en facture, pour cela j'ouvre la zone Facture
mais le fichier n'est plus enregistré sous le nom de la "matrice" et la fonction nouveau numéro de facture ne fonctionne plus.
Je pense qu'il faut qu'il ouvre sous le nom du fichier enregistré (mais je ne suis pas sûr)

Workbooks("01.DEVIS_FACTURES MATRICE (2).xlsm").Sheets("DEVIS").Activate

Ci-joint la procédure
'*******************************************************
'Procédure permettant de saisir le dernier numéro +1
'******************************************************

Sub ProchainNumFA()
Application.ScreenUpdating = False
Dim derlig As Long, Numéro As Long
Workbooks("KJL_JOURNAL_FACTURES.xlsm").Activate
With Workbooks("KJL_JOURNAL_FACTURES.xlsm").Sheets("Liste")
'derlig = .Application.CountA("*", [LNumero])
derlig = .Application.CountA("*", [LTableau])
Numéro = .Range("A" & derlig).Value + 1

'.Range("A" & derlig + 1) = Numéro
End With
Workbooks("01.DEVIS_FACTURES MATRICE (2).xlsm").Sheets("DEVIS").Activate
Range("V24").Value = Numéro
End Sub

2) J'aimerais que quand j'appuie sur le bouton "1.OUVRIR JOURNAL DEVIS" l'intitulé de la case B11 se change en DEVIS
et si j'appuie le bouton "2.OUVRIR JOURNAL FACTURE" l'intitulé de la case B11 se change en FACTURE
Voir pièce jointe "cellule V9 et V24"

Car j'ai mais une formule qui renvoie le nouveau numéro à une cellule V9 ou V24 selon le cas "DEVIS ou FACTURE"

Je sais, je suis un peu compliqué, mais vous m'avez déjà beaucoup aidé et je vous en suis très reconnaissant
Merci d'avance
Dany
 

Pièces jointes

  • Capture(1).JPG
    Capture(1).JPG
    87.1 KB · Affichages: 8
  • 01.DEVIS_FACTURES MATRICE (2).xlsm
    113.8 KB · Affichages: 5
Solution
Et je suis également d'accord avec Phil69970 quand il dit :
Perso j’arrête de répondre aux demandeurs qui posent des questions et qui ne répondent jamais aux différentes réponses des intervenants.

J'ai bien compris que je n'aurais jamais de réponse à mes questions, et j'en ai fait mon deuil (ça tombe bien, c'est bientôt la fête des morts).
Mais sache que ça, c'est encore plus chiant et décourageant que de modifier des macros écrites par une autre personne...


@+

cp4

XLDnaute Barbatruc
Salut cp4 ;)


Je ne suis pas sûr que ma proposition de #30 réponde à 100 % au problème posé en #1. :(
Salut @TooFatBoy ;),

Étant donné qu'il dit que a fonctionne bien, autant qu'il pointe ta solution.
Perso, j'aurai suivi les conseils de @Phil69970. Et, utilisé des userforms.
Je me demande comment il s'y prend pour compléter ses devis et factures.
Et comment, il les archives.

Bonne soirée.

edit: @Phil69970 a déjà traité cette question ICI
 
Dernière édition:

TooFatBoy

XLDnaute Barbatruc
Je me demande comment il s'y prend pour compléter ses devis et factures.
Et comment, il les archives.
Il ouvre le classeur qui lui sert de "trame", change le numéro, renseigne le chantier, et enregistre immédiatement le classeur dans un dossier portant le nom du client.
Puis il ferme le classeur qui lui sert de "trame" (là, je ne pige pas pourquoi, vu que quand on "enregistre sous", le classeur ouvert devient le classeur qui vient d'être enregistré, si je ne me trompe), sans enregistrer les modifications.
Puis il rouvre le classeur qu'il vient d'enregistrer dans le dossier portant le nom du client.

Pour compléter ses devis et factures, j'imagine qu'il faut qu'il se balade dans l'arborescence de son volume de stockage pour trouver le bon classeur.

Pour archiver, il doit cliquer sur le bouton "Archiver", je suppose. Mais je ne sais pas si la macro est déjà écrite.


Ca ne me semble pas très simple ni convivial tout ça. :(
 
Dernière édition:

patricktoulon

XLDnaute Barbatruc
Bonjour à tous
juste en passant
me semble t il un fichier xlt (modèle) est sensé rester tel qu'il est
appliquer une incrémentation du genre numéro de devis ou même facture va à l'encontre même du principe du fichier (modèle)
là ici je parlerais plutôt de fichier applicatif et en xlsm

ou alors un xlt ok mais avec un .ini
 

TooFatBoy

XLDnaute Barbatruc
Je suis bigleux et je n'ai pas vu de fichier modèle dans le sens excel (*.xlt ou *.xltm)
Non, ce sont les guillemets de mon dernier message que tu n'as pas vus. 😅
Bon, ok, mon message n'était pas suffisamment clair... 😔 Je vais le modifier.

Il n'y a pas actuellement de fichier .xltm.
C'est justement la question que j'ai posée plusieurs fois, et à laquelle je n'ai pas eu de réponse : ne serait-il pas intéressant d'utiliser un .xltm ?
 

Statistiques des forums

Discussions
314 485
Messages
2 110 101
Membres
110 663
dernier inscrit
ToussaintBug