Bonjour à tous,
J'ai un formulaire contenant des sections différentes où j'ajoute des clients, des articles, etc....
tout ce passe bien sauf pour la numérotation des contrôles :
Au premier ajout cela donne :
<xml:Enot:Name>0001
<xml:Enot:Street>0001
<xml:Enot:City>0001
Au deuxième ajout
<xml:Enot:Name>0001 le premier ajout devient <xml:Enot:Name>0002
<xml:Enot:Street>0001 le premier ajout devient <xml:Enot:Street>0002
<xml:Enot:City>0001 le premier ajout devient <xml:Enot:City>0002
<xml:Enot:Name>0002
<xml:Enot:Street>0002
<xml:Enot:City>0002
Ce qui fait que je me retrouve avec 6 articles en 0002
<xml:Enot:Name>0002
<xml:Enot:Street>0002
<xml:Enot:City>0002
<xml:Enot:Name>0002
<xml:Enot:Street>0002
<xml:Enot:City>0002
Comment faire pour que chaque ajout garde sa numérotation soit le 0001, 002, 0003, etc... ?
Comme ceci :
<xml:Enot:Name>0001
<xml:Enot:Street>0001
<xml:Enot:City>0001
<xml:Enot:Name>0002
<xml:Enot:Street>0002
<xml:Enot:City>0002
<xml:Enot:Name>0003
<xml:Enot:Street>0003
<xml:Enot:City>0003
<xml:Enot:Name>0004
<xml:Enot:Street>0004
<xml:Enot:City>0004
et ne deviennent pas ça :
<xml:Enot:Name>0004
<xml:Enot:Street>0004
<xml:Enot:City>0004
<xml:Enot:Name>0004
<xml:Enot:Street>0004
<xml:Enot:City>0004
<xml:Enot:Name>0004
<xml:Enot:Street>0004
<xml:Enot:City>0004
<xml:Enot:Name>0004
<xml:Enot:Street>0004
<xml:Enot:City>0004
voici la macro :
'** Renommer les champs des formulaires ************************************ oForm = thiscomponent.drawpage.Forms.GetByName("Standard") TabNomChamps=oForm.getElementNames for i = 0 to ubound(TabNomChamps) NomChamp=TabNomChamps(i) oChamp=oForm.GetByName(NomChamp) if oChamp.Tag<>"" then if oChamp.name<>oChamp.Tag then oChamp.name=oChamp.Tag & " " & NumArticle end if next '***************************************************************************
Merci pour les renseignements
Françoise |