OVH Cloud OVH Cloud

Problème de Type

6 réponses
Avatar
Shewy80
Bonjour à tous

J'ai un problème avec mes calculs.
Chez moi ça marche nikel, mais à l'IUT j'ai une erreur "Incompatibilité de
type"
(pourtant m^me version Excel ?)

Quelqu'un peut il m'expliquer ??

Voici la ligne en question

Montemp = tbMTt1.Value * (tbTXt1.Value / 100)
tbTOTt1.Value = Format(Montemp, "##0.00")

Voici mes déclarations :
Dim Montemp As Double

J'ai également essayer en mettant 'Val'
Montemp = val(tbMTt1.Value) * val((tbTXt1.Value / 100))
mais ça marche pas non plus

Merci de votre aide !

6 réponses

Avatar
Pierre CFI [mvp]
bonjour
à l'IUT, la version excel est bien compléte ? tu as regardé dans les réfs si tout y est ?

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Shewy80" a écrit dans le message de news:comj59$og4$
Bonjour à tous

J'ai un problème avec mes calculs.
Chez moi ça marche nikel, mais à l'IUT j'ai une erreur "Incompatibilité de
type"
(pourtant m^me version Excel ?)

Quelqu'un peut il m'expliquer ??

Voici la ligne en question

Montemp = tbMTt1.Value * (tbTXt1.Value / 100)
tbTOTt1.Value = Format(Montemp, "##0.00")

Voici mes déclarations :
Dim Montemp As Double

J'ai également essayer en mettant 'Val'
Montemp = val(tbMTt1.Value) * val((tbTXt1.Value / 100))
mais ça marche pas non plus

Merci de votre aide !




Avatar
Shewy80
oui oui j'ai bien vérifier. Aucune référence noté : "MANQUANTE"
J'ai également ajouter les macros complémentaires au cas où ...
Je ne comprend pas d'où proviens le problème.



"Pierre CFI [mvp]" a écrit dans le message de
news:
bonjour
à l'IUT, la version excel est bien compléte ? tu as regardé dans les réfs
si tout y est ?


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Shewy80" a écrit dans le message de
news:comj59$og4$

Bonjour à tous

J'ai un problème avec mes calculs.
Chez moi ça marche nikel, mais à l'IUT j'ai une erreur "Incompatibilité
de


type"
(pourtant m^me version Excel ?)

Quelqu'un peut il m'expliquer ??

Voici la ligne en question

Montemp = tbMTt1.Value * (tbTXt1.Value / 100)
tbTOTt1.Value = Format(Montemp, "##0.00")

Voici mes déclarations :
Dim Montemp As Double

J'ai également essayer en mettant 'Val'
Montemp = val(tbMTt1.Value) * val((tbTXt1.Value / 100))
mais ça marche pas non plus

Merci de votre aide !








Avatar
Michel Pierron
Bonjour Shewy80;
Je suppose que tbmachin signifie TextBox; auquel cas, ton instruction
devrait être:
Montemp = CDbl(tbMTt1.Value) * CDbl(tbTXt1.Value / 100)
MP

"Shewy80" a écrit dans le message de
news:comj59$og4$
Bonjour à tous

J'ai un problème avec mes calculs.
Chez moi ça marche nikel, mais à l'IUT j'ai une erreur "Incompatibilité de
type"
(pourtant m^me version Excel ?)

Quelqu'un peut il m'expliquer ??

Voici la ligne en question

Montemp = tbMTt1.Value * (tbTXt1.Value / 100)
tbTOTt1.Value = Format(Montemp, "##0.00")

Voici mes déclarations :
Dim Montemp As Double

J'ai également essayer en mettant 'Val'
Montemp = val(tbMTt1.Value) * val((tbTXt1.Value / 100))
mais ça marche pas non plus

Merci de votre aide !




Avatar
Michel Pierron
Oups;
Montemp = CDbl(tbMTt1.Value) * CDbl(tbTXt1.Value) / 100
voulais-je dire.
MP

"Michel Pierron" a écrit dans le message de
news:%
Bonjour Shewy80;
Je suppose que tbmachin signifie TextBox; auquel cas, ton instruction
devrait être:
Montemp = CDbl(tbMTt1.Value) * CDbl(tbTXt1.Value / 100)
MP

"Shewy80" a écrit dans le message de
news:comj59$og4$
Bonjour à tous

J'ai un problème avec mes calculs.
Chez moi ça marche nikel, mais à l'IUT j'ai une erreur "Incompatibilité
de


type"
(pourtant m^me version Excel ?)

Quelqu'un peut il m'expliquer ??

Voici la ligne en question

Montemp = tbMTt1.Value * (tbTXt1.Value / 100)
tbTOTt1.Value = Format(Montemp, "##0.00")

Voici mes déclarations :
Dim Montemp As Double

J'ai également essayer en mettant 'Val'
Montemp = val(tbMTt1.Value) * val((tbTXt1.Value / 100))
mais ça marche pas non plus

Merci de votre aide !







Avatar
Shewy80
Cdbl je ne connaissais pas.
J'ai cherché sur le net:
"The CDbl function converts an expression to a variant of subtype Double."

Donc OK Mais une qustion me viens à l'esprit:
N'y aurait il pas un risque de référence manquante ??

Je vais essayer le plus tot possible et vous tiens tous à l'EDF !!
Merkiii

"Michel Pierron" a écrit dans le message de
news:
Oups;
Montemp = CDbl(tbMTt1.Value) * CDbl(tbTXt1.Value) / 100
voulais-je dire.
MP

"Michel Pierron" a écrit dans le message de
news:%
Bonjour Shewy80;
Je suppose que tbmachin signifie TextBox; auquel cas, ton instruction
devrait être:
Montemp = CDbl(tbMTt1.Value) * CDbl(tbTXt1.Value / 100)
MP

"Shewy80" a écrit dans le message de
news:comj59$og4$
Bonjour à tous

J'ai un problème avec mes calculs.
Chez moi ça marche nikel, mais à l'IUT j'ai une erreur
"Incompatibilité



de
type"
(pourtant m^me version Excel ?)

Quelqu'un peut il m'expliquer ??

Voici la ligne en question

Montemp = tbMTt1.Value * (tbTXt1.Value / 100)
tbTOTt1.Value = Format(Montemp, "##0.00")

Voici mes déclarations :
Dim Montemp As Double

J'ai également essayer en mettant 'Val'
Montemp = val(tbMTt1.Value) * val((tbTXt1.Value / 100))
mais ça marche pas non plus

Merci de votre aide !










Avatar
michdenis
Bonjour Shewy80,

"N'y aurait il pas un risque de référence manquante "

Absolument pas car cdbl() est une fonction aussi élémentaire que "Left()" et qu'elle fait parti de la même bibliothèque
"VBA"


Salutations!




"Shewy80" a écrit dans le message de news: con6ls$ene$
Cdbl je ne connaissais pas.
J'ai cherché sur le net:
"The CDbl function converts an expression to a variant of subtype Double."

Donc OK Mais une qustion me viens à l'esprit:
N'y aurait il pas un risque de référence manquante ??

Je vais essayer le plus tot possible et vous tiens tous à l'EDF !!
Merkiii

"Michel Pierron" a écrit dans le message de
news:
Oups;
Montemp = CDbl(tbMTt1.Value) * CDbl(tbTXt1.Value) / 100
voulais-je dire.
MP

"Michel Pierron" a écrit dans le message de
news:%
Bonjour Shewy80;
Je suppose que tbmachin signifie TextBox; auquel cas, ton instruction
devrait être:
Montemp = CDbl(tbMTt1.Value) * CDbl(tbTXt1.Value / 100)
MP

"Shewy80" a écrit dans le message de
news:comj59$og4$
Bonjour à tous

J'ai un problème avec mes calculs.
Chez moi ça marche nikel, mais à l'IUT j'ai une erreur
"Incompatibilité



de
type"
(pourtant m^me version Excel ?)

Quelqu'un peut il m'expliquer ??

Voici la ligne en question

Montemp = tbMTt1.Value * (tbTXt1.Value / 100)
tbTOTt1.Value = Format(Montemp, "##0.00")

Voici mes déclarations :
Dim Montemp As Double

J'ai également essayer en mettant 'Val'
Montemp = val(tbMTt1.Value) * val((tbTXt1.Value / 100))
mais ça marche pas non plus

Merci de votre aide !