Erreur d'exécution 13
Résolu
mir.kan
Messages postés
181
Statut
Membre
-
mir.kan Messages postés 181 Statut Membre -
mir.kan Messages postés 181 Statut Membre -
Bonjour à tous,
J'ai cherché mon cas dans le forum mais sans succès, donc voilà mon problème.
Lorsque je lance ma macro, j'ai cette erreur: Erreur d'exécution '13': Incompatibilité de type
Je lance de Débogage et il me renvois ici:
'Déclaration de la variable DateDeFinalisation de type Date
Dim DateDeFinalisation as Date
'Affection à la variable DateDeFinalisation la date se trouvant dans la colonne Date Finalisation
DateDeFinalisation = Cells(LigneEnLecture,48) (l'erreur se trouve ici).
quelqu'un pourrait m'aider svp.
Merci d'avance
J'ai cherché mon cas dans le forum mais sans succès, donc voilà mon problème.
Lorsque je lance ma macro, j'ai cette erreur: Erreur d'exécution '13': Incompatibilité de type
Je lance de Débogage et il me renvois ici:
'Déclaration de la variable DateDeFinalisation de type Date
Dim DateDeFinalisation as Date
'Affection à la variable DateDeFinalisation la date se trouvant dans la colonne Date Finalisation
DateDeFinalisation = Cells(LigneEnLecture,48) (l'erreur se trouve ici).
quelqu'un pourrait m'aider svp.
Merci d'avance
1 réponse
-
Bonjour,
C'est simple :
Cells(LigneEnLecture,48) est un objet Range et DateDeFinalisation une variable Date, en primaire on m'a toujours dit : on ne peut pas ajouter des chapeaux et des serviettes !
Cordialement
Patrice-
-
Re,
« j'aimerais affecter Cells(LigneEnLecture,48) à ma variable DateDeFinalisation » c'est pas possible !!!
Il est possible d'affecter la valeur contenue dans Cells(LigneEnLecture,48) à ta variable DateDeFinalisation, à condition que ce soit une date.
With Cells(LigneEnLecture, 48) If IsDate(.Value) Then DateDeFinalisation = .Value End With -
-
