Ajouter Nombres décimaux macro excel

Pinfourcat -  
 Pinfourcat -
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   Statut Membre Dernière intervention   154
 
Bonjour,

Peux-tu nous montrer ton code ?
0
Pinfourcat
 
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   Statut Membre Dernière intervention   154
 
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
Pinfourcat
 
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   Statut Contributeur Dernière intervention   7 275
 
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
Pinfourcat
 
Bonjour à tous
Simplement pour vous remercier de votre aide.
J'ai enfin trouver la solution à mon cas.Bonne journée.
Pinfourcat
0