Lecture d'instructions

bonsoir

re...c'est ma journée des soucis

j'ai mon bout de code apres avoir defini mes variable :

Cible = Workbooks("ClasseurA.xls").ActiveSheet.Range("L9")
x = Application.Match(Cible, Workbooks("ClasseurA..xls").ActiveSheet.Range("b64:b117"), 0)
If x = 0 Then
MsgBox "cible non trouvée "
Else
MsgBox "Valeur  trouvée dans la cellule B" & x + 63 & ""
If Cible = velo Then   ' le soucis vient pour la suite :
Workbooks("ClasseurA..xls").ActiveSheet.Range("D" & x + 63).Offset(0, 2) = Range("L20").Value
Workbooks("ClasseurA..xls").ActiveSheet.Range("m82") = Date ' cette ligne n'est pas lue !!!!

Else

'traitement 

seulement la ligne

Workbooks("ClasseurA..xls").ActiveSheet.Range("q82") = Date '  n'est pas lue !!!!

et je n'ai donc pas

de date en cellule M82

Est ce qu'apres

if cible

vba ne serait pas capable de lire la seconde instruction ....qui parait toute simple ?

Merci pour vos réponses

Bonsoir

Toujours sans fichier, alors on ne sait pas si le problème vient de là ou c'est juste une erreur de recopie

Tu as deux . (points) dans "ClasseurA..xls"

Rechercher des sujets similaires à "lecture instructions"