Bonjour à tous,
Je suis un ptit nouveau dans le VBA, depuis 3 ou 4 mois et je plane vraiment, mais quand j'ai découvert les possibilités de cette outil, il y a de quoi réver son potentiel!
Et puis un petit mot à vous tous qui à travers ce site contribuez à nous former en apportant votre petite goutte de savoir dans cette océan de gentillesse qu’est ce forum, un belle exemple de modestie, CHAPEAU A TOUS !
Ma question :
Voilà, j'ai téléchargé un USF de Thierry, mais j'ai un probléme avec le code qui suit :
Private Sub TextBoxQuantite_Change()
Dim Chiffre As Integer
If TextBoxQuantite = '' Then Exit Sub
On Error GoTo Sortie
Chiffre = TextBoxQuantite
LabelPrixTotal = Format(LabelPrixUnit * TextBoxQuantite, 0#)
CommandButton1.Visible = True
Exit Sub
Sortie:
MsgBox 'Saisir Uniquement un Entier Numérique'
End Sub
Le résultat que j'aimerai avoir est sans nombre entier, alors comment je doit transformer le code pour cela?
Merci d'avance pour votre aide,
A+ Dur