Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Erreur calcul cells

Erreur calcul cells

8 réponses
Avatar
PST
Bonjour

Pourquoi :

Cells(I, 6) =3D Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) =3D 2577 - Cells(I, 3) >> ne fonctionne pas, message =

erreur, imcompatibilit=E9 de type

merci
Signaler un problème avec ce contenu

8 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
poc
"PST" a écrit dans le message de news:
475471f4$0$5078$
Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas, message
erreur, imcompatibilité de type

merci
Avatar
LSteph
Bonsoir,

C'est quoi dedans?
??...
Essaie avec evaluate

--
lSteph

Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas, message
erreur, imcompatibilité de type

merci


Avatar
LSteph
Encore que...

Si je mets des chiffres dans ces cellules et fixe la valeur de I, chez
moi tout cela fonctionne!

--

lSteph

Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas, message
erreur, imcompatibilité de type

merci


Avatar
PST
Voila la macro complete
Elle bloque sur la ligne Cells(I, 5) = 2577 - Cells(I, 3)

Ce ne sont que des chiffres


Sub Der_Colonne_vide()
For I = 1 To 10
For j = 1 To 1
Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value
Cells(I, 5) = 2577 - Cells(I, 3)
Next
Next
End Sub


Encore que...

Si je mets des chiffres dans ces cellules et fixe la valeur de I, chez
moi tout cela fonctionne!

--

lSteph

Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas, messa ge
erreur, imcompatibilité de type

merci




Avatar
LSteph
Bonjour,

Elle bloque sur la ligne Cells(I, 5) = 2577 - Cells(I, 3)


Il parait vraisemblable que la Cellule I de la colonne 3 ou celle de
la colonne 5 qui ne contienne pas une valeur numérique mais pour peu
qu'une valeur y soit apparente, probablement celle-ci convertie en texte.

--
lSteph

Voila la macro complete
Elle bloque sur la ligne Cells(I, 5) = 2577 - Cells(I, 3)

Ce ne sont que des chiffres


Sub Der_Colonne_vide()
For I = 1 To 10
For j = 1 To 1
Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value
Cells(I, 5) = 2577 - Cells(I, 3)
Next
Next
End Sub


Encore que...

Si je mets des chiffres dans ces cellules et fixe la valeur de I, chez
moi tout cela fonctionne!

--

lSteph

Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas,
message erreur, imcompatibilité de type

merci







Avatar
FFO
Salut à toi
Vérification faite ta ligne de commande ne fonctionne que si Cells(I,3) est
un nombre
Or compte tenu de ton code Cells(I,3) est déterminé par l'instruction qui
précède :

Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value

Au message d'erreur opère un débugage
passe ta souris sur Cells(I, 3) au niveau de la ligne surligné en jaune :

Cells(I, 5) = 2577 - Cells(I, 3)

pour en connaître sa valeur

Il est fort à parier qu'elle ne soit pas apparentée à un nombre

donc en trouver l'origine au niveau de la ligne de commande :

Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value

Pour corriger l'anomalie

A ta dispo pour t'aider à cette fin




Voila la macro complete
Elle bloque sur la ligne Cells(I, 5) = 2577 - Cells(I, 3)

Ce ne sont que des chiffres


Sub Der_Colonne_vide()
For I = 1 To 10
For j = 1 To 1
Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value
Cells(I, 5) = 2577 - Cells(I, 3)
Next
Next
End Sub


Encore que...

Si je mets des chiffres dans ces cellules et fixe la valeur de I, chez
moi tout cela fonctionne!

--

lSteph

Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas, message
erreur, imcompatibilité de type

merci








Avatar
PST
Merci au pluriel

problème réglé

Astuce débugage toujours bienvenues


Salut à toi
Vérification faite ta ligne de commande ne fonctionne que si Cells (I,3) est
un nombre
Or compte tenu de ton code Cells(I,3) est déterminé par l'ins truction qui
précède :

Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value

Au message d'erreur opère un débugage
passe ta souris sur Cells(I, 3) au niveau de la ligne surligné en jaune :

Cells(I, 5) = 2577 - Cells(I, 3)

pour en connaître sa valeur

Il est fort à parier qu'elle ne soit pas apparentée à un nombre

donc en trouver l'origine au niveau de la ligne de commande :

Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value

Pour corriger l'anomalie

A ta dispo pour t'aider à cette fin




Voila la macro complete
Elle bloque sur la ligne Cells(I, 5) = 2577 - Cells(I, 3)

Ce ne sont que des chiffres


Sub Der_Colonne_vide()
For I = 1 To 10
For j = 1 To 1
Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value
Cells(I, 5) = 2577 - Cells(I, 3)
Next
Next
End Sub


Encore que...

Si je mets des chiffres dans ces cellules et fixe la valeur de I, che z
moi tout cela fonctionne!

--

lSteph

Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas, mes sage
erreur, imcompatibilité de type

merci









Avatar
PST
Merci au pluriel
Astuces toujours bienvenues
problème réglé

Salut à toi
Vérification faite ta ligne de commande ne fonctionne que si Cells (I,3) est
un nombre
Or compte tenu de ton code Cells(I,3) est déterminé par l'ins truction qui
précède :

Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value

Au message d'erreur opère un débugage
passe ta souris sur Cells(I, 3) au niveau de la ligne surligné en jaune :

Cells(I, 5) = 2577 - Cells(I, 3)

pour en connaître sa valeur

Il est fort à parier qu'elle ne soit pas apparentée à un nombre

donc en trouver l'origine au niveau de la ligne de commande :

Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value

Pour corriger l'anomalie

A ta dispo pour t'aider à cette fin




Voila la macro complete
Elle bloque sur la ligne Cells(I, 5) = 2577 - Cells(I, 3)

Ce ne sont que des chiffres


Sub Der_Colonne_vide()
For I = 1 To 10
For j = 1 To 1
Cells(I, 3).Value = Cells(I, 256).End(xlToLeft).Value
Cells(I, 5) = 2577 - Cells(I, 3)
Next
Next
End Sub


Encore que...

Si je mets des chiffres dans ces cellules et fixe la valeur de I, che z
moi tout cela fonctionne!

--

lSteph

Bonjour

Pourquoi :

Cells(I, 6) = Cells(I, 1) + Cells(I, 2) >> fonctionne


Cells(I, 5) = 2577 - Cells(I, 3) >> ne fonctionne pas, mes sage
erreur, imcompatibilité de type

merci