pb avec fonction Ccur
Publié: 25 Nov 2003 à 17:38la conversion d'une chaine en currency ne fonctionne pasavez-vous une idée?extrait de la doc lotus 
im bulkPrice As Double Dim labelPrice As String Dim unitsSold As Integer Dim paymentDue As Currency bulkPrice# = 11.400556 unitsSold% = 57 paymentDue@ = Ccur(bulkPrice# * unitsSold%) Print paymentDue@ ' Prints 649.8317 labelPrice$ = "12.99" paymentDue@ = Ccur(labelPrice$) * unitsSold% Print paymentDue@ ' Prints 740.43
im bulkPrice As Double Dim labelPrice As String Dim unitsSold As Integer Dim paymentDue As Currency bulkPrice# = 11.400556 unitsSold% = 57 paymentDue@ = Ccur(bulkPrice# * unitsSold%) Print paymentDue@ ' Prints 649.8317 labelPrice$ = "12.99" paymentDue@ = Ccur(labelPrice$) * unitsSold% Print paymentDue@ ' Prints 740.43