Vba / formulaire
guerando
Messages postés
331
Date d'inscription
Statut
Membre
Dernière intervention
-
guerando Messages postés 331 Date d'inscription Statut Membre Dernière intervention -
guerando Messages postés 331 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Sur un formulaire (excel) la vba doit récupérer un montant sur un tableau (par exemple sur le formulaire on choisit le produit et la quantité, sur le tableau qui récupere ces données le montant unitaire x quantité est calculé et ce montant remonte sur le formulaire)
Cela fonctionne bien le montant remonte mais je suis obligée de taper une lettre ou un chiffre dans la zone du montant pour que la somme arrive. Comment faire pour que cela se fasse sans mon intervention ?
Merci d'avance,
voici ma formule :
Private Sub TB8total2_Change()
Me.TB8total2.Value = Feuil6.Range("j8").Value
End Sub
j'ai essayé aussi :
Private Sub TB6total1_AfterUpdate()
'récupérer les informations calculées sur le tableau excel
Me.TB6total1.Value = Feuil6.Range("g8").Value
End Sub
merci de votre aide
Sur un formulaire (excel) la vba doit récupérer un montant sur un tableau (par exemple sur le formulaire on choisit le produit et la quantité, sur le tableau qui récupere ces données le montant unitaire x quantité est calculé et ce montant remonte sur le formulaire)
Cela fonctionne bien le montant remonte mais je suis obligée de taper une lettre ou un chiffre dans la zone du montant pour que la somme arrive. Comment faire pour que cela se fasse sans mon intervention ?
Merci d'avance,
voici ma formule :
Private Sub TB8total2_Change()
Me.TB8total2.Value = Feuil6.Range("j8").Value
End Sub
j'ai essayé aussi :
Private Sub TB6total1_AfterUpdate()
'récupérer les informations calculées sur le tableau excel
Me.TB6total1.Value = Feuil6.Range("g8").Value
End Sub
merci de votre aide
escuse moi pourrais tu etre plus précis svp ? (je ne connais pas trop la vba) de l'endroit ou mettre ce _Exit()
Private Sub TB5Quantite_Exit() 'récupérer les informations calculées sur le tableau excel If TB5Quantite.value <>"" Then TB6total1.Value = Feuil6.Range("g8").Value End Subj'ai mis la formule mais j'ai un message d'erreur en sélectionant la premiere ligne en jaune : private sub tb...exit "()
Microsoft Visual Basic pour Applications
Erreur de compilatio
La déclaration de la procédure ne correspond pas à la description de l’évenement ou de la procédure de même nom
voici les formules :
Private Sub TB2quantité1_Exit()
'récupérer les informations calculées sur le tableau excel
If TB2quantité1.Value <> "" Then TB6total1.Value = Feuil6.Range("g8").Value
End Sub
Private Sub TB2quantité1_Change()
Feuil6.Range("f8").Value = TB2quantité1.Value
End Sub
Private Sub TB6total1_Change()
'récupérer les informations calculées sur le tableau excel
Me.TB6total1.Value = Feuil6.Range("g8").Value
End Sub
vois tu pourquoi ? merci :)