Trouver des même mot et afficher dans TextBox
Résolu/Fermé
New_VBA_User
Messages postés
82
Date d'inscription
mardi 27 août 2019
Statut
Membre
Dernière intervention
3 octobre 2019
-
13 sept. 2019 à 09:32
New_VBA_User Messages postés 82 Date d'inscription mardi 27 août 2019 Statut Membre Dernière intervention 3 octobre 2019 - 16 sept. 2019 à 08:52
New_VBA_User Messages postés 82 Date d'inscription mardi 27 août 2019 Statut Membre Dernière intervention 3 octobre 2019 - 16 sept. 2019 à 08:52
A voir également:
- Afficher texte dans textbox vba
- Vba textbox date format dd/mm/yyyy - Forum VB / VBA
- Afficher mot de passe wifi android - Guide
- Excel cellule couleur si condition texte - Guide
- Mettre un texte en majuscule - Guide
- Vba format texte ✓ - Forum VB / VBA
1 réponse
Zoul67
Messages postés
1959
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
30 janvier 2023
149
13 sept. 2019 à 09:58
13 sept. 2019 à 09:58
Bonjour,
Si tu devais le faire par formule, la fonction NB.SI serait toute indiquée.
En VBA tu peux utiliser Application.WorksheetFunction pour y faire appel. Fais un enregistrement de macro pour obtenir la syntaxe.
A+
Si tu devais le faire par formule, la fonction NB.SI serait toute indiquée.
En VBA tu peux utiliser Application.WorksheetFunction pour y faire appel. Fais un enregistrement de macro pour obtenir la syntaxe.
A+
13 sept. 2019 à 10:08
j'ai fais comme ça
TextBox1.Value = Application.WorksheetFunction.CountIfs(Range("AE:AE"), "PC")ça marche bien.
je voulais savoir si c'était possible d'utiliser les control de textbox, au lieu de taper 20 ligne de codes .
merci.
13 sept. 2019 à 13:21
13 sept. 2019 à 14:57
Si tu renommes tes textbox suivant le texte à chercher, tu peux tenter une astuce comme :
Private Sub UserForm_Initialize() For Each t In UserForm1.Controls t.Value = Application.WorksheetFunction.CountIfs(Range("AE:AE"), t.Name) Next t End SubAprès, il faut gérer les autres contrôles s'il y en a...
A+
13 sept. 2019 à 17:35
16 sept. 2019 à 08:52