Sujet Précédent Sujet Suivant

Trouver une nom dans un tableau

Résolu/Fermé
dikold Messages postés 22 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 14 novembre 2016 - Modifié par pijaku le 19/05/2015 à 14:50
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 19 mai 2015 à 14:51
Bonjour,

Je voudrais que mon code trouve le mot "Italy" dans une ligne d'un tableau mais quand je le lance, il me dit "rien" alors que le mot y est.



Voici mon code : 

Dim trouve As String

trouve = ActiveSheet.UsedRange.Rows(5).Select
    If trouve = "Italy" Then
        MsgBox "cool"
    Else:
        MsgBox "rien"
    End If


Merci de votre aide par avance
A voir également:

2 réponses

Réponse 1 / 2
ccm81 Messages postés 10905 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 27 décembre 2024 2 428
Modifié par ccm81 le 19/05/2015 à 11:37
Bonjour

un exemple pour chercher dans une ligne 
Dim obj As Object
Dim li As Long
li = 5
Set obj = Rows(li).Find("Italy", , , xlWhole)
If obj Is Nothing Then
  MsgBox "rien"
Else
  MsgBox "trouvé en colonne " & obj.Column
End If

Cdlmnt
2
dikold Messages postés 22 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 14 novembre 2016 1
19 mai 2015 à 14:33
merci, il marche bien celui-ci aussi
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 752 > dikold Messages postés 22 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 14 novembre 2016
Modifié par pijaku le 19/05/2015 à 14:52
Bonjour,

il marche bien celui-ci aussi
Oui et il te permet de savoir dans qu'elle colonne... Ce qui est encore mieux n'est-il pas?

Salut ccm81 ;-)
0
Réponse 2 / 2
dikold Messages postés 22 Date d'inscription mardi 19 mai 2015 Statut Membre Dernière intervention 14 novembre 2016 1
Modifié par pijaku le 19/05/2015 à 14:50
nn c'est bon j'ai trouvé avec ça : 
Dim valeur As Long
valeur = Application.WorksheetFunction.CountIf(Range("5:5"), "Italy")
If valeur = 1 Then
    MsgBox ("Il y a Italy ")
Else:
    MsgBox ("Il n'y a pas Italy ")
End If
1

Discussions similaires

Comment trouver un numéro à partir du nom et prénom
papillon -
guyguy -

10 réponses
Comment trouver une adresse avec un nom de famille ?
nanou69 -
chrys -

9 réponses
Trouver une personne a partir de son adresse
Sana -
MadameSanaaaaa59650 -

2 réponses
Annuaire portable gratuit à partir d'un nom
dani26 -
Authority -

9 réponses
Nom de champs du tableau croisé dynamique non valide
Kazooie123 -
SajDri -

6 réponses