Fonction tout en majuscule
Contenu du snippet
fonction qui met toute les premieres lettres de chaque mot en majuscule
Source / Exemple :
Function MAJ(str As String) As String
Dim i As Integer, Find As String
str = Trim(str)
str = UCase(Mid(str, 1, 1)) & Mid(str, 2)
For i = 1 To Len(str)
Find = InStr(i, str, " ")
If Find <> 0 Then
str = Mid(str, 1, Find) & _
UCase(Mid(str, Find + 1, 1)) & _
Mid(str, Find + 2)
End If
Next
MAJ = str
End Function
A voir également
- Fonction tout en majuscule
- Remise en fonction - Forum C / C++ / C++.NET
- Majuscule php ✓ - Forum PHP
- Sql majuscule - Forum SQL
- Fonction pow en c ✓ - Forum C
- Effectuer une recherche sans tenir compte des majuscules/minuscules ✓ - Forum SQL
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.