Re probleme de macro
teddy33
-
tiloter Messages postés 50 Statut Membre -
tiloter Messages postés 50 Statut Membre -
Bonjour,ety merci de ta reponse
voici un copier coller exact
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error Resume Next
z = Target.Comment.Text
tablo = Split(z, Chr(10))
For i = 0 To UBound(tablo)
k = Evaluate(k + tablo(i))
Next
Target = IIf(k > 0, k, "")
Cancel = False
End Sub
pourtant il fonctionne si les chiffre son entier mais ne fonctionne plus avec les decimale sous excel 2007
et merci de ta reponse
voici un copier coller exact
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error Resume Next
z = Target.Comment.Text
tablo = Split(z, Chr(10))
For i = 0 To UBound(tablo)
k = Evaluate(k + tablo(i))
Next
Target = IIf(k > 0, k, "")
Cancel = False
End Sub
pourtant il fonctionne si les chiffre son entier mais ne fonctionne plus avec les decimale sous excel 2007
et merci de ta reponse
A voir également:
- Re probleme de macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Re ettre clavier azerty - Guide
- Macro maker - Télécharger - Divers Utilitaires
3 réponses
Bonjour,
Est ce que Exel est bien configuré afin d'admettre des valeurs decimales?
Vas dans "outils","options", Moi je suis sur open office et je ne sais pas pour toi, donc tu regarde un endroit il doit y avoir "Decimal". Et a coté une case avec le nombre de chiffres apres la virgules. Si il est a 0, met 2 comme nombre.
Topsy
Est ce que Exel est bien configuré afin d'admettre des valeurs decimales?
Vas dans "outils","options", Moi je suis sur open office et je ne sais pas pour toi, donc tu regarde un endroit il doit y avoir "Decimal". Et a coté une case avec le nombre de chiffres apres la virgules. Si il est a 0, met 2 comme nombre.
Topsy
