OVH Cloud OVH Cloud

valeur dans un commentaire

5 réponses
Avatar
Deedooz
Bonjour,

Une question qui me trotte depuis un temps déjà :
Est-il possible de "formater" la valeur d'un nombre inséré dans un
commentaire ?

Je m'explique :
Dans mes cellules D4 à N4, je récupère des valeurs de calcul des cellules Q4
à AA4
Le probleme est que lorsque j'ecris le code suivant, les valeurs sont bien
récupérées mais sous la forme d'un nombre à plusieurs chiffres.
Par exemple, ma cellule D4 affiche un commentaire "variation de
7.17409135316152 %"
Alors que je voudrais qu'elle m'affiche "variation de 7.17%".
En spécifiant mes cellules Q4 à AA4 en nombre à 2 décimales ou en
pourcentage, rien n'y fait.
Quelqu'un a t-il la solution a mon probleme ?
Merci
********************
Private Sub Worksheet_Activate()
Dim a As Integer
a = 4
For a = 4 To 14
If Cells(4, a).Value > 0 Then
Cells(4, a).AddComment
Cells(4, a).Comment.Visible = False
Cells(4, a).Comment.Text Text:="Variation de " & Cells(4, a + 13).Value
* 100 & " %"
Else
Exit Sub
End If
Next a
End Sub
*************************

5 réponses

Avatar
Nicolas B.
Salut Deedooz,

Tu peux te servir de la fonction Format :

Cells(4, a).Comment.Text Text:="Variation de " & Format(Cells(4, a + _
13).Value, "0.00 %")


A+
Nicolas B.

Bonjour,

Une question qui me trotte depuis un temps déjà :
Est-il possible de "formater" la valeur d'un nombre inséré dans un
commentaire ?

Je m'explique :
Dans mes cellules D4 à N4, je récupère des valeurs de calcul des cellules Q4
à AA4
Le probleme est que lorsque j'ecris le code suivant, les valeurs sont bien
récupérées mais sous la forme d'un nombre à plusieurs chiffres.
Par exemple, ma cellule D4 affiche un commentaire "variation de
7.17409135316152 %"
Alors que je voudrais qu'elle m'affiche "variation de 7.17%".
En spécifiant mes cellules Q4 à AA4 en nombre à 2 décimales ou en
pourcentage, rien n'y fait.
Quelqu'un a t-il la solution a mon probleme ?
Merci
********************
Private Sub Worksheet_Activate()
Dim a As Integer
a = 4
For a = 4 To 14
If Cells(4, a).Value > 0 Then
Cells(4, a).AddComment
Cells(4, a).Comment.Visible = False
Cells(4, a).Comment.Text Text:="Variation de " & Cells(4, a + 13).Value
* 100 & " %"
Else
Exit Sub
End If
Next a
End Sub
*************************




Avatar
Deedooz
Effectivement, c'etait vraiment bete comme chou :)
Merci beaucoup

"Deedooz" a écrit dans le message de
news:%
Bonjour,

Une question qui me trotte depuis un temps déjà :
Est-il possible de "formater" la valeur d'un nombre inséré dans un
commentaire ?

Je m'explique :
Dans mes cellules D4 à N4, je récupère des valeurs de calcul des cellules
Q4

à AA4
Le probleme est que lorsque j'ecris le code suivant, les valeurs sont bien
récupérées mais sous la forme d'un nombre à plusieurs chiffres.
Par exemple, ma cellule D4 affiche un commentaire "variation de
7.17409135316152 %"
Alors que je voudrais qu'elle m'affiche "variation de 7.17%".
En spécifiant mes cellules Q4 à AA4 en nombre à 2 décimales ou en
pourcentage, rien n'y fait.
Quelqu'un a t-il la solution a mon probleme ?
Merci
********************
Private Sub Worksheet_Activate()
Dim a As Integer
a = 4
For a = 4 To 14
If Cells(4, a).Value > 0 Then
Cells(4, a).AddComment
Cells(4, a).Comment.Visible = False
Cells(4, a).Comment.Text Text:="Variation de " & Cells(4, a +
13).Value

* 100 & " %"
Else
Exit Sub
End If
Next a
End Sub
*************************




Avatar
Modeste
Bonsour®
Deedooz wrote:
Effectivement, c'etait vraiment bete comme chou :)


est-ce dire que tu dévalues le niveau de compétence de ton répondeur ????
;o)))
--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042

Avatar
Deedooz
pas le moins du monde :)
...ce dernier a d'ailleurs répondu a plusieurs de mes interrogations par le
passé et je l'en remercie!
C'est plutôt qu'on se trouve bête après avoir lu la réponse c'est tout ^_^



"Modeste" a écrit dans le message de
news:%23S6Jh$

Bonsour®
Deedooz wrote:
Effectivement, c'etait vraiment bete comme chou :)


est-ce dire que tu dévalues le niveau de compétence de ton répondeur ????
;o)))
--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042






Avatar
Modeste
Ce n'était qu'un clin d'oeil ;o)))
pour rappeler que parfois la communication écrite peut etre interprétée
selon l'humeur de celui qui la lit
;o)))
--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr