Discussion :

[kimou75]

Bonjour,

Je déclare dans mon code, des variables en entier pour ensuite les faire apparaitre en commentaire de cellule


Mais comme ces variables sont le résultat de calcul, j'obtiens un chiffre avec plusieurs décimales après la virgule et je souhaiterai en faire apparaître aucune.

J'ai essayé ça mais ca ne fonctionne pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Inv.Sheets(1).Cells(cpt1, cpt2 + 1).AddComment
          Inv.Sheets(1).Cells(cpt1, cpt2 + 1).Comment.Visible = False
          Inv.Sheets(1).Cells(cpt1, cpt2 + 1).Comment.Text Text:="" & Chr(10) & ptr1 & " uvc à risque 240j   " & ptr2 & " uvc à risque 190j   " & ptr3 & " uvc à risque 90"
          Inv.Sheets(1).Cells(cpt1, cpt2 + 1).Comment.Select
          Selection.NumberFormat = "0"

Pourriez-vous m'aider svp.

Merci d'avance.