Incrémentation Numéro VBA Excel
Fermé
GromGrom
Messages postés
93
Date d'inscription
mercredi 27 avril 2011
Statut
Membre
Dernière intervention
18 décembre 2020
-
7 avril 2017 à 23:51
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 - 8 avril 2017 à 12:33
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 - 8 avril 2017 à 12:33
A voir également:
- Excel incrémentation automatique numéro vba
- Liste déroulante excel - Guide
- Formule excel - Guide
- Réponse automatique outlook - Guide
- Numero privé ✓ - Forum Mobile
- Numero inconnu - Guide
1 réponse
ThauTheme
Messages postés
1442
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
29 juillet 2022
160
8 avril 2017 à 12:33
8 avril 2017 à 12:33
Bonjour GromGrom, bonjour le forum
Remplace ta ComboBox1 par une textbox (TexBox8 normalement).
Si tu as déjà un code d'initialisation de ton UserForm, ajoute la ligne :
Sinon ajoute ce code d'initialisation :
Et adapte le code du CommandButton1 :
Remplace ta ComboBox1 par une textbox (TexBox8 normalement).
Si tu as déjà un code d'initialisation de ton UserForm, ajoute la ligne :
Me.TextBox8.Value = Application.WorksheetFunction.Max(Sheets("Clients").Columns(1)) + 1
Sinon ajoute ce code d'initialisation :
Private Sub UserForm_Initialize()
Me.textbox8.Value = Application.WorksheetFunction.Max(Sheets("Clients").Columns(1)) + 1
End Sub
Et adapte le code du CommandButton1 :
Range("A" & L).Value = TetxBox8.Value