Find ne trouve pas les nombres
Résolu
ngio1301
Messages postés
49
Statut
Membre
-
ngio1301 Messages postés 49 Statut Membre -
ngio1301 Messages postés 49 Statut Membre -
Bonjour,
Je suis un peu désappointé suite au comportement de ce petit code pour sélectionner après recherche un nombre dans une colonne.
voici le code:
Private Sub BtnTrouve_Click()
Dim O As Range
Set O = Feuil17.Range("A:A").Find(Me.TxtTrouve.Value, , xlValues, xlWhole)
If O Is Nothing Then
MsgBox "Non trouvé"
Else
O.Select
End If
Me.TxtTrouve = ""
End Sub
Si c'est du texte il le trouve, mais pas quand c'est un nombre???
Si vous avez une idée, je suis ok. Merci d'avance.
Je suis un peu désappointé suite au comportement de ce petit code pour sélectionner après recherche un nombre dans une colonne.
voici le code:
Private Sub BtnTrouve_Click()
Dim O As Range
Set O = Feuil17.Range("A:A").Find(Me.TxtTrouve.Value, , xlValues, xlWhole)
If O Is Nothing Then
MsgBox "Non trouvé"
Else
O.Select
End If
Me.TxtTrouve = ""
End Sub
Si c'est du texte il le trouve, mais pas quand c'est un nombre???
Si vous avez une idée, je suis ok. Merci d'avance.
A voir également:
- Find ne trouve pas les nombres
- Pourquoi ma tv ne trouve pas toutes les chaînes - Guide
- Find and mount - Télécharger - Récupération de données
- Ou se trouve le presse papier - Guide
- Ou se trouve la corbeille de whatsapp - Guide
- Où se trouve mon adresse url ? - Guide
4 réponses
Quand on ne sait pas faire, on ne met pas un fichier qui change l'environnement excel du helper et plante en plein milieu !
On met un fichier de travail réduit à l'essentiel, sans mot de passe et sans macro Workbook_Open
Merci pour mes autres fichiers que j'ai dû fermer brutalement en perdant les avancées.
eric
On met un fichier de travail réduit à l'essentiel, sans mot de passe et sans macro Workbook_Open
Merci pour mes autres fichiers que j'ai dû fermer brutalement en perdant les avancées.
eric
Bonjour,
Teste ce code
Teste ce code
Private Sub BtnTrouve_Click()
Dim O As Range
Set O = Feuil17.Range("A:A").Find(Me.TxtTrouve.Value, LookIn:=xlValues, Lookat:=xlWhole)
If O Is Nothing Then
MsgBox "Non trouvé"
Else
O.Select
End If
Me.TxtTrouve = ""
End Sub
Bonjour,
un texbox contient du texte, d'où son nom.
Si tu dois rechercher un nombre il faut convertir et chercher
eric
un texbox contient du texte, d'où son nom.
Si tu dois rechercher un nombre il faut convertir et chercher
CDbl(Me.TxtTrouve.Value)
eric
Bonjour tt le monde
Mettre le classeur sans données confidentielles en pièce jointe sur
https://mon-partage.fr
Dans lien de téléchargement
faire un clic droit- copier l’adresse du lien et le coller dans votre message en cours sur ccm
bonjour
le lien est ici: https://mon-partage.fr/f/vanrkFqT/
Pour accéder au fichier
CP=6012020A
MDP=aide
merci d'avance.
losrque vous serez sur la feuille suivi rames vous faites ajouter puis entrez un nombre.
Ensuite sous la cellule PROG vous pourrez enter une donnée en menu déroulant.
Si celle ci est un nombre en tapant la recherche, la rp sera non trouvé, mais si c'est du texte il le sélectionnera.
Voilà mon souci!!!!
le lien est ici: https://mon-partage.fr/f/vanrkFqT/
Pour accéder au fichier
CP=6012020A
MDP=aide
merci d'avance.
losrque vous serez sur la feuille suivi rames vous faites ajouter puis entrez un nombre.
Ensuite sous la cellule PROG vous pourrez enter une donnée en menu déroulant.
Si celle ci est un nombre en tapant la recherche, la rp sera non trouvé, mais si c'est du texte il le sélectionnera.
Voilà mon souci!!!!
Je suis désolé que vous ayez rencontré ce souci. Toutefois, je n'ai aucuns problèmes avec ce classeur quelque soit l'endroit ou je l'utilise. Vous avez raison j'aurais du éclater le fichier et l'envoyer dry. je vous prie de m'excuser pour la gène occasionnée. Pour ce qui est du problème ce n'était juste qu'une question de format. merci d'avoir prêté attention.