Ajouter Nombres décimaux macro excel

Fermé
Pinfourcat - 5 mars 2014 à 16:14
 Pinfourcat - 6 mars 2014 à 09:41
Bonjour à tous

Je cherche comment comptabiliser (EX: 10 +0.50) dans une macro.
Mon code s'exécute avec des entiers , mais pas avec 0.50.
Merci à l'avance.
Chauliac
A voir également:

4 réponses

eljojo_e Messages postés 1155 Date d'inscription lundi 10 mai 2010 Statut Membre Dernière intervention 14 octobre 2022 154
5 mars 2014 à 16:45
Bonjour,

Peux-tu nous montrer ton code ?
0
Bonjour
voici une partie du code
For i = 1 To Frame1.Controls.Count

If CheckBox32.Value = True Then
N = N + 0.5

If Frame1.Controls(i - 1).Value = True Then
w.Cells(k + 5, i + 1).Value = N
End If
End If
Next i

N étant un nombre entier cela fonctionne bien.
dès que j'ajoute 0.5 pas de comptabilité .
En te remerciant à l'avance
Pinfourcat
0
eljojo_e Messages postés 1155 Date d'inscription lundi 10 mai 2010 Statut Membre Dernière intervention 14 octobre 2022 154
5 mars 2014 à 17:58
Un truc bête, mais ne faudrait-il pas écrire 0,5 au lieu de 0.5 ? sinon comment tu as déclaré N ?
0
re

Ma variable n je l'ai déclarée une fois en integer
et puis en string.
Dans les 2 cas même résultat.
Si je remplace o.5 par 0,5
il s'affiche ce message
Erreur de compilation
Attendu fin d'instruction.
Maintenant j'ai trouver une chose

If Frame1.Controls(i - 1).Value = True Then
w.Cells(k + 5, i + 1).Value = N

Si n je le remplace par ex: 60.5 cela fonctionne
Bizarre bizarre

Encore mille fois merci
Pinfourcat
0
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 250
5 mars 2014 à 19:20
Bonjour,

Comme type de variable il faut utiliser Single ou Double pour les décimaux (ou Currency avec 4 chiffres après la virgule).

eric
0
Bonjour à tous
Simplement pour vous remercier de votre aide.
J'ai enfin trouver la solution à mon cas.Bonne journée.
Pinfourcat
0