A voir également:
- Exclure de cellules dans une plage
- Exclure de cellules dans une plage ✓ - Forum - Excel
- Comment exclure des cellules vides d'une liste? ✓ - Forum - Excel
- Compter les cellules d'une plage horaire ✓ - Forum - Bureautique
- Comparer 1 chaine de caractere d'une cellule par rapport plage ✓ - Forum - Excel
- Compter 2 occurrences dans une même cellule sur une plage ✓ - Forum - Excel
4 réponses
danielc0
- Messages postés
- 684
- Date d'inscription
- mardi 5 juin 2018
- Statut
- Membre
- Dernière intervention
- 5 septembre 2020
For Each c In plage
If c Like "*total*" = False Then
Me.ListBox1.AddItem c.Value
End If
Next c
andy2092
- Messages postés
- 62
- Date d'inscription
- dimanche 13 mai 2018
- Statut
- Membre
- Dernière intervention
- 31 mars 2020
Cela ne fonctionne malheureusement pas. Voici un exemple qui est illustré dans les images.
La disposition des données et du formulaire est la même que sur mon fichier réel.
La disposition des données et du formulaire est la même que sur mon fichier réel.
danielc0
- Messages postés
- 684
- Date d'inscription
- mardi 5 juin 2018
- Statut
- Membre
- Dernière intervention
- 5 septembre 2020
Regarde :
andy2092
- Messages postés
- 62
- Date d'inscription
- dimanche 13 mai 2018
- Statut
- Membre
- Dernière intervention
- 31 mars 2020
Ça marche super merci ! Par contre j'ai également une autre cellule contenant "Ligne Vierge" que je ne veux pas inclure dans le formulaire. Est-ce possible de l'inclure dans le code en plus du "TOTAL" ?
danielc0
- Messages postés
- 684
- Date d'inscription
- mardi 5 juin 2018
- Statut
- Membre
- Dernière intervention
- 5 septembre 2020
En supposant que ta cellule ne contienne rien :
Sinon :
Daniel
Set plage = [A1:A10]
For Each c In plage
If UCase(c.Value) Like UCase("*TOTAL*") = False And c.Value <> "" Then
Me.ListBox1.AddItem c.Value
End If
Next c
Sinon :
Set plage = [A1:A10]
For Each c In plage
If UCase(c.Value) Like UCase("*TOTAL*") = False And _
c.Value <> "Ligne Vierge" Then
Me.ListBox1.AddItem c.Value
End If
Next c
Daniel
danielc0
- Messages postés
- 684
- Date d'inscription
- mardi 5 juin 2018
- Statut
- Membre
- Dernière intervention
- 5 septembre 2020
PS. "Set plage = [Nom onglet! A1:A10] ? "
Oui, sauf si le nom comporte des espaces. Il faut alors, comme dans Excel, le mettre entre apostrophes :
Oui, sauf si le nom comporte des espaces. Il faut alors, comme dans Excel, le mettre entre apostrophes :
Set plage = ['Nom onglet'! A1:A10] ?
Merci pour l'info. Désolé mais j'ai fait une erreur ! Dans ma plage il y a que du texte mais il existe des parties genre "total" que je ne veux pas inclure dans mon formulaire. Est-ce possible ?