Incompatibilité de type ???

[Pat]

Salut a tous ,
j'ai cette erreur dans ce code:
Private Sub TxtDiamètre_Change()
With FeuilledesaisieCTA

.TxtSurface.value = (TxtDiamètre.value * TxtDiamètre.value) * 3.1416 / 4 / 1000000
End With
End Sub

Quelqu'un peut m'aider ???
Merci d'avance

 

[Hervé]

bonjour pat

problème classique, les textbox renvoi des string (du texte, pas de la lingerie fine), il te faut donc convertir d'abord ces données.

=cdbl(txtdiamètre)*cdbl(txtdiamètre)....

ou

val(....)*val(....)

joyeux noel

salut

Message édité par: Hervé, à: 24/12/2005 17:13

 

[Pat]

Salutr Hervé,
j'ai ce que tu m'a dit mais çà ne fonctionne pas

Private Sub TxtDiamètre_Change()
With FeuilledesaisieCTA

.TxtSurface.value = CDbl(TxtDiamètre) * CDbl(TxtDiamètre) * 3.1416 / 4 / 1000000
End With
End Sub


???????????????????????????????

 

[Pat]

Resalut Hervé,
çà fonctionne , j'ai pris val(....)*val(....) et c'est OK
Merci pour ton aide.
Joyeux NOEL et Bonne année

 

[Hervé]

re pat

hop, hop !!! très vite fait

en pièce jointe une démo, te montrant que je n'ai pas de souci de conversion (sans cdbl d'ailleurs ), ton problème doit venir d'ailleurs, merci de nous fournir un modèle.

salut [file name=Classeur1_20051224172913.zip size=8985]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051224172913.zip[/file]

 

[Pat]

J'ai fait un copier coller de ton code et............çà ne marche pas; mais pas grave avec la conversion pas de prob.
Ci joint le lien pour mon classeur avec ton code
Merci tout de même et bon réveillon
@+
http://cjoint.com/?myrRgGqamC

 

[porcinet82]

Bonsoir a tous,

J'ai fait un fichier plus simple que celui que tu avais fait car ce n'est pas évident de comprendre un fichier sur lequel on a pas travaillé.
Je pense que sur le principe, c'est ce que tu voulais faire avec ton fichier, j'espere donc que tu pourras t'en aider.

[file name=test_20051224193754.zip size=15410]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/test_20051224193754.zip[/file]

Bon noel a tous les foromeurs???!!!

@+