Incrémentation Numéro VBA Excel
Fermé
GromGrom
Messages postés
97
Date d'inscription
mercredi 27 avril 2011
Statut
Membre
Dernière intervention
6 juin 2023
-
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
- Numero prive - Guide
- Liste déroulante excel - Guide
- Si et excel - Guide
- Aller à la ligne excel - Guide
- Somme automatique excel - 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