Compteur dans userform
max850
Messages postés
312
Statut
Membre
-
max850 Messages postés 312 Statut Membre -
max850 Messages postés 312 Statut Membre -
Bonjour le forum
Je rentre actuellement des numéros dans ma textbox via une combobox.
je voudrais créer un compteur qui serait placé dans mon Private sub_initialize pour remplacer
les valeurs de cette combobox et les placer automatiquement dans la textbox correspondante
en incrementant cette valeur à chaque réouverture de mon userform
pouvez vous m'aider s'il vous plait
merci
Je rentre actuellement des numéros dans ma textbox via une combobox.
je voudrais créer un compteur qui serait placé dans mon Private sub_initialize pour remplacer
les valeurs de cette combobox et les placer automatiquement dans la textbox correspondante
en incrementant cette valeur à chaque réouverture de mon userform
pouvez vous m'aider s'il vous plait
merci
1 réponse
-
Bonjour,
A chaque ouverture de l'UF, incrementez une variable declaree en Public si c'est seulement tant que le fichier excel est ouvert ou si ca doit incrementer sur ouverture du fichier excel (apres fermeture évidemment) incrementez une cellules dans une feuille et chargez la textbox avec cette cellule-
Bonjour f894009
j'ai bien déclaré ma variable en public as integer
comme cela
Public num As Integer
Private Sub UserForm_Initialize()
num = Range("B65536").End(xlUp).Row + 1
num = num + 1
MsgBox num
TextBox12.Value = num
.....
mais aucune incrémentation dans la colonne b de ma feuille
je suis vraiment nul -
-
Bonjour f894009
Voici ce que je viens de faire et ça fonctionne
Private Sub UserForm_Initialize()
num = Format(Feuil4.Range("b7").Value + 1, "00000")
Range("B7").Value = num
TextBox12.Value = num
mais je voudrais que cette valeur s'inscrive sur la dernière ligne de ma feuil4
et non pas remplacer la valeur précédente
dans ma colonne b j'aurais en b7 1, en b8 2 etc
c'est ce que j'avais tenté de faire avec
num = Range("B65536").End(xlUp).Row + 1 -
-
-
