Récupération de valeur en vba

EliotN à dit:

Bonjour à vous.
En vba Excel, par un double clic en H2, je voudrais y écrire le résultat d'un calcul qui est en H5, avec décimales.
Mon report est systématiquement en nombre entier !
Une idée ?
Merci par avance.
Cordialement.
ps : habituellement le format de cette cellule est personnalisé _ * # ##0,00_) _€_ ;_ * (# ##0,00) _€_ ;_ * "-"??_) _€_ ;_ @_
Eliot

Cliquez pour agrandir...

EliotN à dit:

Merci Staple,
c'est dans le libellé de ma msgbox que je pinaille :
reponse = MsgBox("Le montant de ces achats est de " & CDbl(TabLig) & " €" & vbCrLf & "Voulez-vous reporter ce montant ?", vbYesNo, "Montant"), CDbl(TabLig) affiche les décimales supérieures à zéro !

Cliquez pour agrandir...

Staple1600 à dit:

Re

@EliotN
Chez moi, même avec une MsgBox, j'ai bien mes deux décimales 😉

VB:

Sub Hop()
Dim Brouzouf$, reponse
Brouzouf = Format(CDbl(1600 / 13), "#,##0.00""€""")
reponse = _
MsgBox("Le montant de ces achats est de " & Brouzouf & vbCrLf & "Voulez-vous reporter ce montant ?", 4, "Montant")
Select Case reponse
Case 6
MsgBox "Vous avez cliqué sur Oui"
Case 7
MsgBox "Vous avez cliqué sur Non"
End Select
End Sub

Cliquez pour agrandir...