Erreur d'execution '13 Incompatible de type

Fermé
mandrake007 Messages postés 14 Date d'inscription jeudi 6 octobre 2016 Statut Membre Dernière intervention 18 octobre 2016 - 18 oct. 2016 à 10:57
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 - 18 oct. 2016 à 15:35
Bonjour,

je ai une lien comme

Dim value_test = As Double
val_up = Sheets(onglet).Range(col_val & j - 1)


j'ai une error comme
Erreur d'execution '13 Incompatible de type

j'ai plusier espion



j-1 = 60
Column_value & j-1 = D60
tabs = something
Sheets(tabs).Range(Column_value & j -1) = 0.0078125




A voir également:

3 réponses

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
18 oct. 2016 à 11:33
Bonjour,
Sur quelle ligne l'erreur??
Avec le code fourni, va pas être facile de vous aider!!!!!!
0
mandrake007 Messages postés 14 Date d'inscription jeudi 6 octobre 2016 Statut Membre Dernière intervention 18 octobre 2016
18 oct. 2016 à 11:34
sur lien

val_up = Sheets(onglet).Range(col_val & j - 1)
0
mandrake007 Messages postés 14 Date d'inscription jeudi 6 octobre 2016 Statut Membre Dernière intervention 18 octobre 2016
18 oct. 2016 à 11:35
erreur : Erreur d'execution '13 Incompatible de type
0
Utilisateur anonyme
18 oct. 2016 à 11:38
Bonjour

VBA c'est pas mon fort, mais un erreur de type ça veut que le compilateur n'arrive pas à interpréter ce que tu lui donnes comme étant un double.

Ta copie d'écran étant illisible je me réfère à ce que tu as écrit en dessus.

Sheets(tabs).Range(Column_value & j -1) = 0.0078125

Dans ton code c'est pas tabs, c'est onglet, en supposant que onglet et tab valent la même chose:
  • est-ce que le symbole décimal sur ton PC est bien le . par défaut sur un PC français, c'est la , auquel cas, 0,0078125 est un double alors que 0.0078125 non.
  • Est ce que ta cellule est au format texte? "0.0078125" n'est pas non plus un double
  • Enfin, il me semble que sur VBA, les cellules ont une propriété Value, que vaut elle?

0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
18 oct. 2016 à 14:43
Bonjour Whismeril,

En dehors de ce que vous avez mis en evidence, j'ai simule comme j'ai pu avec la ligne ou est l'erreur et les infos de l'image. Je n'ai pas d'erreur mais pourrai confirmer avec le fichier du monsieur mandrake007

mandrake007:
Pouvez-vous mettre votre fichier a dispo ??

Pour transmettre un fichier,
Veillez a ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
0
mandrake007 Messages postés 14 Date d'inscription jeudi 6 octobre 2016 Statut Membre Dernière intervention 18 octobre 2016
18 oct. 2016 à 14:59
http://www.cjoint.com/c/FJsm6YBBQ2T
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > mandrake007 Messages postés 14 Date d'inscription jeudi 6 octobre 2016 Statut Membre Dernière intervention 18 octobre 2016
18 oct. 2016 à 15:32
Re,

Nous avons besoin de votre ficher excel, pas de l'image !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
0
mandrake007 Messages postés 14 Date d'inscription jeudi 6 octobre 2016 Statut Membre Dernière intervention 18 octobre 2016
18 oct. 2016 à 15:32
ficher excel cest confidentiel
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > mandrake007 Messages postés 14 Date d'inscription jeudi 6 octobre 2016 Statut Membre Dernière intervention 18 octobre 2016
18 oct. 2016 à 15:35
Re

Ben oui, pouvez-vous faire un fichier en modifiant les donnees au juste nécessaire ??
0