Compteur dans userform
max850
Messages postés
304
Date d'inscription
Statut
Membre
Dernière intervention
-
max850 Messages postés 304 Date d'inscription Statut Membre Dernière intervention -
max850 Messages postés 304 Date d'inscription Statut Membre Dernière intervention -
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
A voir également:
- Compteur dans userform
- Compteur électrique - Guide
- Compteur contractions - Télécharger - Santé & Bien-être
- Comment ralentir un compteur linky forum - Accueil - Objets connectés
- Compteur point fléchette excel - Télécharger - Sport
- Compteur cyber café gratuit - Télécharger - Outils professionnels
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
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
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
Pourquoi ceci:
num = Range("B65536").End(xlUp).Row + 1Vous devez prendre une cellule c'est tout, l'incremente :
-lire la cellule
-faire+1
-ecrire la cellule
-mettre cette valeur dans la text box
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
Pourquoi: et non pas remplacer la valeur précédente
Ce n'est pas incrémenter une cellule c'est changer de cellule a chaque fois
effectivement je change de cellule à chaque fois
mais en ajoutant + 1 à chaque fois