Bonjour la famille quelqu’un peut m’aider car je comprends vraiment rien voici un dossier de gestion de stock pour un garage dans l’ongle entrée sortie mon code VBA ne fonctionne pas quand j’essaye d’ajouter un mouvement de pneus la liste a gauche mets rien j’essaye de enregistre mais le formule ne fonctionne pas c’est vraiment long de ajouter manuellement sinon si quelqu’un peut me faire un macro d’ajouter automatiquement la dimension la date le prix acheter le prix de vente car j’ai aussi pas pu réussi a mettre le tableau de macro car j’ai enregistré il mets fait un copier coller a chaque fois exemple je fait 205 55 16 achat 10 euro + Unité
et de la il mets le stock dans le ongle de Pneus comme ca j’arrive a voir mon stock projet-pneus.xlsm (745,4 Ko)
aprés avoir choisi une dimension la formule me donne cette erreur et elle ajoute pas
Voici le code d’erreur j’ai tout essayé
La sortie ou entree ne fonctionne pas quelqu’un peux trouvé la solution s’il vous plait et m’envoyer la bonne formule avec la bonne fichier mercii
c’est le cas quand votre pneu est numérique et dans la colonne B de « pneu », il est sauvegardé comme numérique. Une possibilité est d’ajouter un ’ en face de chaque pneu numérique, comme ça il devient texte. Autre option est de chercher une 2ième fois (1ière fois était chercher texte) et maintenant chercher numérique (multiplier avec 1 !!!)
iLigne = Application.Match(Me.cbx_pneu, Sheets(2).Columns("B"), 0) 'recherche normal de votre pneu
If Not IsNumeric(iLigne) And IsNumeric(Me.cbx_pneu) Then iLigne = Application.Match(1 * Me.cbx_pneu, Sheets(2).Columns("B"), 0) 'recherche numérique
If IsNumeric(iLigne) Then
Part_name = Sheets(2).Cells(iLigne, 3)
Part_prix = Sheets(2).Cells(iLigne, 12)
Part_mod = Sheets(2).Cells(iLigne, 4)
@Cow18 Coooll !! grand merci et maintenant quand je clique sur Entrée ou Sortie il ne mets pas dans la Cologne si vous pouviez jeter un oil sa sera genial
La sa ressemble a quelque chose waoooo
fraichement un très grand MERCI j’ai chercher j’ai pas pu faire
