Bonjour,
Voila j'ai un tableau (pour classer des films) et un bouton qui fait fonction de "Recherche", seulement voila j'aimerais que lorsque l'on tape un nom de film (sachant que les noms de films sont tous en majuscule) la macro reconnaisse quand même ce que l'on tape en minuscule.
Voila l'image du tableau :
Voila le code de ma macro "Recherche" :
Sub recherche()
'
' recherche Macro
'
Message = "Entre le nom du film à chercher"
Title = "Recherche d'un film"
MyValue = InputBox(Message, Title, Default)
Range("A3").Select 'entre la première cellule de la colonne des noms
For I = 1 To 300 'max de ligne dans la colonne
If ActiveCell.Value = MyValue Then GoTo Fin
If ActiveCell.Value = "" Then GoTo Fin
ActiveCell.Offset(1, 0).Range("A1").Select
Next
Fin:
End Sub
Merci !
Voila j'ai un tableau (pour classer des films) et un bouton qui fait fonction de "Recherche", seulement voila j'aimerais que lorsque l'on tape un nom de film (sachant que les noms de films sont tous en majuscule) la macro reconnaisse quand même ce que l'on tape en minuscule.
Voila l'image du tableau :
Voila le code de ma macro "Recherche" :
Sub recherche()
'
' recherche Macro
'
Message = "Entre le nom du film à chercher"
Title = "Recherche d'un film"
MyValue = InputBox(Message, Title, Default)
Range("A3").Select 'entre la première cellule de la colonne des noms
For I = 1 To 300 'max de ligne dans la colonne
If ActiveCell.Value = MyValue Then GoTo Fin
If ActiveCell.Value = "" Then GoTo Fin
ActiveCell.Offset(1, 0).Range("A1").Select
Next
Fin:
End Sub
Merci !