N
nesta656
Guest
salut
voila g un userform avec une boucle qui me sauvegarde toutes les donnees que je rentre
exemple num = Sheets('données').Range('A65536').End(xlUp).Row + 1
For Each p In userform.toto.Controls
If p.Value = True Then toto = Trim(p.Caption)
Next p
vous voyez????
bon la question est:si je ne remplie pas une textbox il faudrait que lors de la validation de mon formulaire un '0' ou un autre caractere vienne remplir la cellule de destination...
ben c pas tres clair mais bon peut etre qu un personne a la reponse.
bonne soirée
voila g un userform avec une boucle qui me sauvegarde toutes les donnees que je rentre
exemple num = Sheets('données').Range('A65536').End(xlUp).Row + 1
For Each p In userform.toto.Controls
If p.Value = True Then toto = Trim(p.Caption)
Next p
vous voyez????
bon la question est:si je ne remplie pas une textbox il faudrait que lors de la validation de mon formulaire un '0' ou un autre caractere vienne remplir la cellule de destination...
ben c pas tres clair mais bon peut etre qu un personne a la reponse.
bonne soirée
