pb de chiffre avec macro

[celine88]

bonjour,

j'ai fait une macro mais le souci c'est les chiffres que je lui demande de me mettre dans un tableau, il me les mets sous formes de textes.
j'ai essayé de lui mettre le code suivant :

.Range('J' & VarDerL) = Format(Total, 0, 0#)

le soucis c'est qui m'arrondi mon chiffre et je veux qu'il me le mette tel quel.

merci

 

[mutzik]

Bonjour Céline,

Essaie le code suivant
Range('J' & VarDerL) = Total

ensuite, à toi de formatter ta cellule excel dans le format que tu veux

 

[celine88]

oui mais le problème c'est que je mets une formule somme à la fin de ma colonne et ca ne marche pas. il me prend le résultat comme du texte.

 

[mutzik]

Re Céline,

le mieux c'est que tu joignes ton classeur avec des valeurs bidon pour qu'on puisse mieux juger de ce que tu veux (fichier zippé sans caractères spéciaux et moins de 50Ko)

 

[Marco60]

Salut Celine88, Mutzik,
Je vois que tu as mis une virgule après le premier 0. As-tu essayé avec le point.

.Range('J' & VarDerL) = Format(Total, 0.0#)

Si ce n'est pas ça, joins un fichier cela pourra nous aider.

A+

Marc

 

[celine88]

malheureusement ca ne fonctionne pas. j'avais déjà essayé. quand je mets 0.0# il me met que 0#.

 

[Marco60]

Re le fil,
Mutzik a raison, joins un classeur, notre aide ne sera que meilleure.

A+

Marc

 

[celine88]

le problème c'est que mon fichier compressé fait 133 ko et il faut qu'il soit inférieur à 50ko

 

[PascalXLD]

Bonjour

Essaies

.Range('J' & VarDerL) = val(total)

ou

.Range('J' & VarDerL) = cdbl(total)

Bon courage

 

[celine88]

merci beaucoup Pascal

ca a marché avec
.Range('J' & VarDerL) = cdbl(total)

c'est super!!! merci merci et encore merci