VBA problème
patouki
-
Polux31 Messages postés 7219 Statut Membre -
Polux31 Messages postés 7219 Statut Membre -
Bonjour,
Je voudrais que l'utilisateur entre une valeur X et que le programme cherche dans une colonne Y si la valeur X existe,
si oui, on se déplace de deux colonnes et on remplace sur la ligne de la valeur, la valeur entrée par l'utilisateur.
J'ai fait une inputbox pour la valeur X
un FOR EACH pour scanner la colonne
suivis d'un SI pour tester la valeur est trouvée.
Après je voudrais récupérer la ligne où la valeur a été trouvé et la colonne
Puis ajouter la valeur X à la cellule voulue.
Merciii !
Je voudrais que l'utilisateur entre une valeur X et que le programme cherche dans une colonne Y si la valeur X existe,
si oui, on se déplace de deux colonnes et on remplace sur la ligne de la valeur, la valeur entrée par l'utilisateur.
J'ai fait une inputbox pour la valeur X
un FOR EACH pour scanner la colonne
suivis d'un SI pour tester la valeur est trouvée.
Après je voudrais récupérer la ligne où la valeur a été trouvé et la colonne
Puis ajouter la valeur X à la cellule voulue.
Merciii !
4 réponses
EXCEL:
PRODUIT | DETAILS | QUANTITE | PRIX
ce code permet d'ajouter une ligne avec les nouvelles données
mais je voudrais que cela soit ajouter une ligne si le produit n'existe pas, soit il met à jour la colonne quantité
PRODUIT | DETAILS | QUANTITE | PRIX
Sub produit()
i = 3
j = 2
10 nom = InputBox("Entrez le nom de votre produit :")
plus = InputBox("Enrez le détail du produit(50 cl, 1L,...)")
quantite = InputBox("Entrez la quantité achetée du produit")
prix= InputBox("Entrez le prix du produit")
Worksheets("data").Cells(i, j) = nom
j = j + 1
Worksheets("data").Cells(i, j) = plus
j = j + 1
Worksheets("data").Cells(i, j) = quantite
j = j + 1
Worksheets("data").Cells(i, j) = prix
j = j - 3
Answer = MsgBox("Recommencer?", vbQuestion + vbYesNo, "???")
If Answer = 6 Then
i = i + 1
GoTo 10
Else
GoTo 11
11 MsgBox ("Merci et aurevoir")
End If
End Sub
ce code permet d'ajouter une ligne avec les nouvelles données
mais je voudrais que cela soit ajouter une ligne si le produit n'existe pas, soit il met à jour la colonne quantité
