Compteur i need you help !!!!

[Miro911]

Salut tout le monde
je sais il ya deja pas mal d'info sur le sujet mais je ne trouve pas mon bonheur dans la liste d'exemple deja present sur le forum
voila mon prob c simple je veux faire une numerotation auto sur un devis
cette numerotation auto doit utiliser les 3 premieres lettres de la cel N17+ la date format (yyyy,mm) + une incrementation automatique de 1 le tout séparer par "/". je connais la formule concatener mais je n'arrive pas à l'appliquer dans cette petite marcro deja prise sur le forum


Private Sub Workbook_Open()
Dim Compteur As Integer
Compteur = Range("N1").Value
Range("N14").Value = Compteur + 1
Range("N14").Value = Format(Date, "yyyymm/") & Compteur

End Sub

Merci d'avance pour votre aide

 

[_Thierry]

Re : Compteur i need you help !!!!

Bonjour Miro911, le Forum

Si j'ai bien interprété, voici le code par étape sur Variables :

Private Sub Workbook_Open()
Dim Compteur As Integer
Dim Commercial As String
Dim DateFacture As String
    With Worksheets("Devis_Bon de Commande")
    .Range("N1").Value = .Range("N1").Value + 1
        
        Compteur = .Range("N1")
        Commercial = Left(.Range("N17"), 3)
        DateFacture = Format(Date, "yyyymm")
    
    
    .Range("N14").Value = Commercial & "/" & DateFacture & "/" & Compteur
    End With
End Sub

Bon Appétit

@+Thierry
​

 

[Miro911]

Re : Compteur i need you help !!!!

merci c super
bon appetit

 

[Miro911]

Re : Compteur i need you help !!!!

Thierry
merci pour ton aide
je vais etre un peu vicieux comment appliqué ta macro a un doc qui servira de modele pour les utilisateurs.

merci

 

[_Thierry]

Re : Compteur i need you help !!!!

Re Bonjour Miro911, le Forum

Il y a plusieurs approches... Une des plus simples consisterait à sauver le classeur en "Template" (format XLT)... (Voir Aide)

Une autre serait d'en faire une Macro-Complémentaire (Format XLA)... (Voir Aide)

Une alternative serait de faire tout par VBA, mais il faudrait savoir absolument tout de tes besoins avec les tenants et aboutissants...

Bon Aprèm

@+Thierry
​

 

[Miro911]

Re : Compteur i need you help !!!!

Merci pour c info Thierry
Je pensais justement enregistré mon classeur sous ce format mais
si je sauvegarde un modele en version Xlt ne va t il pas y avoir un probleme avec le conpteur
en effet le modele n'étant pas modifier ni sauvegarder il n'y aura pas l'incrementation automatique

merci

 

[_Thierry]

Re : Compteur i need you help !!!!

Re

Exact !!! (Bien Vu)

Pour une "XLT" faudrait faire un TXT à la volée qui servirait de référence...

J'ai déjà posté des trucs similaires dans ce Forum... Faudrait faire une recherche car là je n'ai plus le temps...

Bon Courage
@+Thierry

 

[Miro911]

Re : Compteur i need you help !!!!

merci thierry pour ton aide a plus