Userform moteur de recherche
Fermé
cox1880
Messages postés
6
Date d'inscription
mercredi 25 novembre 2015
Statut
Membre
Dernière intervention
3 décembre 2016
-
1 déc. 2015 à 11:20
cox1880 Messages postés 6 Date d'inscription mercredi 25 novembre 2015 Statut Membre Dernière intervention 3 décembre 2016 - 3 déc. 2015 à 08:20
cox1880 Messages postés 6 Date d'inscription mercredi 25 novembre 2015 Statut Membre Dernière intervention 3 décembre 2016 - 3 déc. 2015 à 08:20
A voir également:
- Moteur de recherche vba excel userform
- Liste déroulante excel - Guide
- Si et excel - Guide
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Aller à la ligne excel - Guide
- Word et excel gratuit - Guide
2 réponses
jordane45
Messages postés
38301
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
22 novembre 2024
4 705
1 déc. 2015 à 11:50
1 déc. 2015 à 11:50
Bonjour,
TU peux utiliser la méthode FIND
par exemple : https://forums.commentcamarche.net/forum/affich-37621992-methode-find-dans-vba-recherche-de-donnees-sous-excel#findall
TU peux utiliser la méthode FIND
par exemple : https://forums.commentcamarche.net/forum/affich-37621992-methode-find-dans-vba-recherche-de-donnees-sous-excel#findall
cox1880
Messages postés
6
Date d'inscription
mercredi 25 novembre 2015
Statut
Membre
Dernière intervention
3 décembre 2016
3 déc. 2015 à 08:20
3 déc. 2015 à 08:20
merci pour votre aide.
je n'y suit pas arrivé avec la fonction FIND
mais j'ai trouvé un petit code sur un tuto:
'regarde dans le tableau
For ligne = 2 To 300
'si la colonne animateur2 =
If Cells(ligne, 7) Like "*" & ComboBox1 & "*" Then
'copie la colonne thème
ListBox1.AddItem Cells(ligne, 3)
End If
par contre j'ai encore deux petit soucis
1: j'aimerai surlignet la ligne en rouge
2: j'arrive a copier la colonne C (ligne, 3) et j'aimerai copier les colonne B,C,D (ligne 2,3,4)
encore merci.
je n'y suit pas arrivé avec la fonction FIND
mais j'ai trouvé un petit code sur un tuto:
'regarde dans le tableau
For ligne = 2 To 300
'si la colonne animateur2 =
If Cells(ligne, 7) Like "*" & ComboBox1 & "*" Then
'copie la colonne thème
ListBox1.AddItem Cells(ligne, 3)
End If
par contre j'ai encore deux petit soucis
1: j'aimerai surlignet la ligne en rouge
2: j'arrive a copier la colonne C (ligne, 3) et j'aimerai copier les colonne B,C,D (ligne 2,3,4)
encore merci.