Inputbox présentant un nom avec seulement la saisie d'une lettre

JBARBE

XLDnaute Barbatruc
Bonjour à tous,
Tout est dit dans le titre !
Dans l'image suivante si je saisie dans inputbox >>dup le nom dupont devrait s'afficher automatiquement avec une macro adaptée !
Mais je crois que cela n'est pas possible avec inputbox et qu'il faut avoir recourt à une boite de dialogue ?
Qu'en pensez-vous!
Merci à l'avance et bonne journée !
inputbox.jpg

VB:
Option Compare Text

Sub recherche_NOM()
Dim i As Long, NOM As String
NOM = Application.InputBox("Veuillez indiquer le NOM", "recherche")
With Sheets("Feuil1")
For i = 2 To 65536
If .Cells(i, 1) = "" Then
MsgBox " NOM non trouvé"
Exit Sub
ElseIf .Cells(i, 1) = NOM Then
.Cells(i, 1).Select
Exit Sub
End If
Next i
End With
End Sub
 
Dernière édition:

Discussions similaires

Réponses
8
Affichages
476
Réponses
2
Affichages
229

Statistiques des forums

Discussions
312 194
Messages
2 086 066
Membres
103 110
dernier inscrit
Privé