Macro excel: pb d'affectation de valeur!
babelfish
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
lami20j Messages postés 21644 Statut Modérateur, Contributeur sécurité -
lami20j Messages postés 21644 Statut Modérateur, Contributeur sécurité -
bonjour
j 'ai une chaine de caractere nommee de type "145-152", je dois placer les valeurs 145 et 152 dans 2 cellules distinctes.
j'utilise instr pour trouver la position de "-" et ensuite les fonctions right et left pour extraire les nombres.
je copie les resultats des fonctions right et left dans 2 chaines de caracteres avant de les affecter a mes 2 cellules. seulememt voila, si mes chaines de caracteres contiennent bien respectivement "145" et "152", mes cellules ne veulent pas prendre ces valeurs et restent nulles...
str: chaine contenant "145-152"
D: chaine contenant "-"
Pleft et Pright: chaine de caracteres
If InStr(str, D) <> 0 Then
Pleft = Left(str, (InStr(str, D) - 1))
Sheet1.cells(156,6).value = Pleft
pright = Right(str, (InStr(str, D) - 1))
Sheet1.cells(156,7).value= Pright
End If
Pourauoi mes cellules restent-elles vides alors que pright et Pleft contiennent bien ce que je veux?
merci
j 'ai une chaine de caractere nommee de type "145-152", je dois placer les valeurs 145 et 152 dans 2 cellules distinctes.
j'utilise instr pour trouver la position de "-" et ensuite les fonctions right et left pour extraire les nombres.
je copie les resultats des fonctions right et left dans 2 chaines de caracteres avant de les affecter a mes 2 cellules. seulememt voila, si mes chaines de caracteres contiennent bien respectivement "145" et "152", mes cellules ne veulent pas prendre ces valeurs et restent nulles...
str: chaine contenant "145-152"
D: chaine contenant "-"
Pleft et Pright: chaine de caracteres
If InStr(str, D) <> 0 Then
Pleft = Left(str, (InStr(str, D) - 1))
Sheet1.cells(156,6).value = Pleft
pright = Right(str, (InStr(str, D) - 1))
Sheet1.cells(156,7).value= Pright
End If
Pourauoi mes cellules restent-elles vides alors que pright et Pleft contiennent bien ce que je veux?
merci
A voir également:
- Macro excel: pb d'affectation de valeur!
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
- Déplacer colonne excel - Guide
2 réponses
Salut,
il ne faut pas utiliser de mots clés en tant que variables
str c'est une focnction et je vois que tu l'utilises en tant que nom de varible
il ne faut pas utiliser de mots clés en tant que variables
str c'est une focnction et je vois que tu l'utilises en tant que nom de varible
J'ai pris ta macro et je l'ai testée.
Chez moi ça marche.
Chez moi ça marche.
Sub a()
strr = "145-152"
D = "-"
'Pleft et Pright: chaine de caracteres
If InStr(strr, D) <> 0 Then
Pleft = Left(strr, (InStr(strr, D) - 1))
Sheets("Feuil1").Cells(1, 1).Value = Pleft
Pright = Right(strr, (InStr(strr, D) - 1))
Sheets("Feuil1").Cells(2, 1).Value = Pright
End If
End Sub
:(
peut etre un probleme de type? mais ca ne genere pas d'erreur...