Bonjour,
je me permets de vous solliciter. J'arrive à la fin de ma création d'une base de données de gestion de stock et je n'arrive pas a trouver la façon dont je pourrais faire en sorte que lorsque je valide mon entrée en stock par le biais de mon formulaire (userform) celui_ci se vide afin que je puisse faire une nouvelle entrée sans quittez le formulaire.
voici ma macro pour l'entrée en stock
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 Private Sub valide_entree_Click() 'recopie les données de Acceuil vers stock ' Dim derligne As Integer derligne = Sheets("Stock").Range("A10000").End(xlUp).Row + 1 Sheets("Stock").Cells(derligne, 1) = Sheets("Accueil").Range("E27") 'produit Sheets("Stock").Cells(derligne, 2) = Sheets("Accueil").Range("E25") 'catégorie Sheets("Stock").Cells(derligne, 3) = Sheets("Accueil").Range("E29") 'qté Sheets("Stock").Cells(derligne, 4) = Sheets("Accueil").Range("k29") 'colisage Sheets("Stock").Cells(derligne, 5) = Sheets("Accueil").Range("k23") 'date entrée Sheets("Stock").Cells(derligne, 6) = Sheets("Accueil").Range("E31") 'DLC Sheets("Stock").Cells(derligne, 7) = Sheets("Accueil").Range("k25") 'stockage Sheets("Stock").Cells(derligne, 8) = Sheets("Accueil").Range("k31") 'Prix Sheets("Stock").Cells(derligne, 9) = Sheets("Accueil").Range("E23") 'personnel 'selectionne le bouton fermer Me.fermer.SetFocus End Sub
merci a ceux qui pourront m'aider.
Partager