Macro VBA avec InStr

Résolu
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006 - 5 juil. 2006 à 18:01
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006 - 6 juil. 2006 à 13:33
Bonjour,

Voila le code que j'ai mis ne veut pas me donner la position du caractere espace ... si je le met en dur direct dans la fonction cela fonctionne mais quand je vais chercher ce texte dans une cellule et la plus rien.
Si quelqu'un à une idée merci d'avance


Sub space()
    Dim iPos As Integer
    Dim copier As Strin
    Dim nom As String
  
   
    For compteur = 5 To 1239 Step 2
    nom = Range("C" & compteur)
    iPos = InStr(nom, " ")                      
   MsgBox iPos
   Next compteur
   
 End sub

la box me renvoi tjs zéro alors que le contenu de la cellule est bien présente
merci

21 réponses

Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006
6 juil. 2006 à 12:24
Encore merci Julien c'est vraiment formidable ! Une dernière pour la route ... Est il possible d'enlever les espaces superflu ? Genre ceux à la fin des cellules (il y a desfois un espace qui traine) et ceux entre les mots comme M. Francois PIGNON où il peut y avoir jusqu'a 3 espaces entre le prénom et le nom .. Merci ^^
0
Rejoignez-nous