A voir également:
- Ajouter Nombres décimaux macro excel
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Si et excel - Guide
- Word et excel gratuit - Guide
- Aller à la ligne excel - Guide
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
5 mars 2014 à 16:45
Bonjour,
Peux-tu nous montrer ton code ?
Peux-tu nous montrer ton code ?
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
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
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
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 ?
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
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
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
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
Comme type de variable il faut utiliser Single ou Double pour les décimaux (ou Currency avec 4 chiffres après la virgule).
eric