Transformer en nom propre en VBA

Bonjour

Je veux faire une recherche en fonction d'un nom d'utilisateur, celui-ci est désigné par un nom et un prénom (avec le initiales seulement).

J'aimerai qu'un utilisateur saisisse celui-ci soit en respectant la casse ou en minuscule.

J'ai donc appliqué la formule permettant de transformer ce nom en nom propre.

Mais voilà cela n'est valable qu'avec les prénoms simples et pas avec les prénoms composés.

Donc avec ceux-ci la recherche n'aboutit pas.

Comment mettre les prénoms composés en majuscules ? Merci

Bonsoir Papoumac32 et le forum,

Essayer avec en ajoutant Option Compare Text sous Option Explicit, comme ceci:

Option Explicit
Option Compare Text

Sub Recherche()
Dim Nom As String
Dim Nombre As Integer
Dim boucle As Integer
Dim ligne As Integer
Dim colonne As Integer
ligne = 2
colonne = 3
Nom = InputBox("le nom")
Nom = StrConv(Nom, vbUpperCase)

For boucle = ligne To 5
    If Cells(boucle, colonne).Value = Nom Then
        Nombre = Cells(boucle, colonne - 1).Value
    End If
Next boucle
 MsgBox Nom & " - " & Nombre
End Sub

Cdt
Papy Henri

Bonsoir

Merci pour cette solution; qui fonctionne parfaitement.