Macro extraire texte en Majuscule
Fermé
Applemilk
Messages postés
8
Date d'inscription
mercredi 4 août 2010
Statut
Membre
Dernière intervention
1 août 2011
-
4 août 2010 à 15:14
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 4 août 2010 à 18:19
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 4 août 2010 à 18:19
A voir également:
- Macro extraire texte en Majuscule
- Mettre un texte en majuscule - Guide
- Extraire une video youtube - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- É majuscule - Guide
- Transcription audio en texte word gratuit - Guide
1 réponse
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
4 août 2010 à 18:19
4 août 2010 à 18:19
Bonjour,
Peut-être avec ...
A+
Peut-être avec ...
Public Function Extrait(Var As String) As String Dim TB, i As Integer TB = Split(Var, "-") For i = 1 To Len(TB(1)) If Asc(Mid(TB(1), i, 1)) > 90 Or Asc(Mid(TB(1), i, 1)) < 65 Then Exit For Next Extrait = Left(TB(1), i - 1) End Function
A+