OVH Cloud OVH Cloud

erreur générés par VBA

3 réponses
Avatar
Hobbit
Salutation,

J ai la desagreable impression que VBA me g=E9n=E9re des=20
erreurs la ou elles n ont pas lieu d etre. En effet j ai=20
cree une macro qui a marche un certain nombre de fois et=20
qui se met a me genere sur une condition une erreur=20
definie par l application ou par l objet sans raisons=20
apparente a la ligne de code suivante:
If Cells(compt, 2) =3D client Then
avec
client =3D Worksheets("Evolution ParClient").Range("A6")

Merci d avance

Hobbit

3 réponses

Avatar
papou
Bonjour
Comment est déclarée la variable client ?
Sinon, essaie de spécifier complètement avec :
client = Worksheets("Evolution ParClient").Range("A6").Value
If Cells(compt, 2).Value = client

Cordialement
Pascal

"Hobbit" a écrit dans le message de
news:bfee01c47a04$c6728bb0$
Salutation,

J ai la desagreable impression que VBA me génére des
erreurs la ou elles n ont pas lieu d etre. En effet j ai
cree une macro qui a marche un certain nombre de fois et
qui se met a me genere sur une condition une erreur
definie par l application ou par l objet sans raisons
apparente a la ligne de code suivante:
If Cells(compt, 2) = client Then
avec
client = Worksheets("Evolution ParClient").Range("A6")

Merci d avance

Hobbit
Avatar
patrick
Bonjour,
à première vue je mettrais
client = Worksheets("Evolution ParClient").Range("A6").value


"Hobbit" a écrit dans le message news:
bfee01c47a04$c6728bb0$
Salutation,

J ai la desagreable impression que VBA me génére des
erreurs la ou elles n ont pas lieu d etre. En effet j ai
cree une macro qui a marche un certain nombre de fois et
qui se met a me genere sur une condition une erreur
definie par l application ou par l objet sans raisons
apparente a la ligne de code suivante:
If Cells(compt, 2) = client Then
avec
client = Worksheets("Evolution ParClient").Range("A6")

Merci d avance

Hobbit
Avatar
Hobbit
Merci a tous les deux mais j'ai trouve mon erreur. Mon
compteur depassert les limites de la feuille d'Excel.
Désolé de vous avoir fais chercher pour rien

Hobbit
-----Message d'origine-----
Salutation,

J ai la desagreable impression que VBA me génére des
erreurs la ou elles n ont pas lieu d etre. En effet j ai
cree une macro qui a marche un certain nombre de fois et
qui se met a me genere sur une condition une erreur
definie par l application ou par l objet sans raisons
apparente a la ligne de code suivante:
If Cells(compt, 2) = client Then
avec
client = Worksheets("Evolution ParClient").Range("A6")

Merci d avance

Hobbit
.