XL 2019 Probleme incrémentation compteur

PETIT YANNICK

XLDnaute Occasionnel
Bonjour,

Je me sers d'un usf pour remplir des données dans le fichier excel Z0022.
Ce fichier excel ouvre un fichier de BDD (liste_plan_cat)
Les lignes s'incrémentent lorsqu'il y a un clic sur commandbutton5 de l'usf

La colonne F devrait s'incrémenter de cette facon
CAT00000
CAT00001
CAT00002
les autres colonnes prennent les valeur de l'usf


j'ai l'erreur suivante qui s'affiche

2019_10_03_10_03_40_Microsoft_Visual_Basic.png





la macro me crée un format de ce type

31/01/1900AT00000
31/12/1899AT00000


Quelqu'un aurait une idée d'où peut provenir le problème?
Merci d'avance de vos retours
 

Pièces jointes

  • LISTE_PLAN_CAT.xlsx
    9.4 KB · Affichages: 5
  • Z0022.xlsm
    49 KB · Affichages: 8

PETIT YANNICK

XLDnaute Occasionnel
Bonjour paf

le fichier templates (dans mon cas Z0022) devrait être renommé avec la dernière cellules de la colonne F du fichier LISTE_PLAN_CAT.xlsx lors du clic sur buttomcommand5

Je penses que le message d'erreur vient du fait que les cellules de la colonne F se renomme en format 31/01/1900AT00000 au lieu de CAT00001 .
donc les / qui sont en plus modifie le chemin. d'où le message

le nouveau fichier est censé se copier au même endroit que le fichier Z0022

je n'arrive pas a avoir le format souhaité et je ne vois pas pourquoi.

Une idée?
 

Paf

XLDnaute Barbatruc
essayer de remplacer
VB:
.Range("F" & ligne).Value = Format(Val(Right(Range("F" & ligne - 1).Value, 8)) + 1, "CAT00000") 'N° plan
par
VB:
.Range("F" & ligne).Value = "CAT" & Format(Val(Right(Range("F" & ligne - 1).Value, 5)) + 1, "00000") 'N° plan
 

Statistiques des forums

Discussions
312 100
Messages
2 085 292
Membres
102 852
dernier inscrit
Badrcola26