Sujet Précédent Sujet Suivant

Addition 2 cellules (incompatibilité de type)

Fermé
Linebaker Messages postés 51 Date d'inscription vendredi 23 novembre 2012 Statut Membre Dernière intervention 21 avril 2023 - 5 avril 2019 à 08:52
Linebaker Messages postés 51 Date d'inscription vendredi 23 novembre 2012 Statut Membre Dernière intervention 21 avril 2023 - 5 avril 2019 à 10:46
Bonjour,

Dans le code j'écris cette ligne :
ActiveCell.Offset(0, 4).Value = CDbl(ActiveCell.Offset(0, 4).Value) + CDbl(ActiveCell.Offset(1, 4).Value)

Celle-ci (ActiveCell.Offset(0, 4).Value (sa valeur est "")) est en texte ce qui me donne un Incompatibilité de type car CDbl(ActiveCell.Offset(1, 4).Value) = 3.

Comment corriger le tout pour que ActiveCell.Offset(0, 4).Value = CDbl(ActiveCell.Offset(0, 4).Value) + CDbl(ActiveCell.Offset(1, 4).Value) = 3

Merci
A voir également:

2 réponses

Réponse 1 / 2
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
5 avril 2019 à 08:53
Bonjour,

Utilises Val()
1
Réponse 2 / 2
Linebaker Messages postés 51 Date d'inscription vendredi 23 novembre 2012 Statut Membre Dernière intervention 21 avril 2023 1
5 avril 2019 à 10:46
Salut Patrice,

Merci
0

Discussions similaires

Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
Great Teacher Onizuka SAISON 2
remi1912 -
Firaz -

34 réponses
Je tiens combien de temps avec 2Go d'internet ?
champi100 -
dadout -

7 réponses
Windows defender: avertissement de sécurité
surfinia -
Tchoumi -

20 réponses