Déclaration de texte VBA Access

ptitsofi -  
Polux31 Messages postés 7219 Statut Membre -
Bonjour,

j'essaie de convertir un montant (de l'euros au dollard) que je saisie dans une cellule mais dans ma macro je ne sais pas comment déclarer montant. (Le taux est faux c'est juste à titre indicatif pour mes tests)

Dim montant As Integer
Const taux = 2

Private Sub Commande2_Click()
Dim montantdollard As Integer
montantdollard = montant * taux
MsgBox "Votre montant : " & montantdollard

End Sub

Aidez moi svp
Configuration: Windows XP
Access 2003
Firefox 3.5.5

1 réponse

  1. Polux31 Messages postés 7219 Statut Membre 1 204
     
    Bonjour,

    Private montant As Integer
    Const taux = 2
    
    Private Sub Commande2_Click()
    Dim montantdollard As Integer
    
       'TextBox1 est la zone texte où est saisi le montant.
       montant = CInt(TextBox1.Text)
       montantdollard = montant * taux
    
       MsgBox "Votre montant : " & montantdollard
    
    End Sub 


    Ca doit le faire comme ça.

    ;o)
    0