Mouvements dans une cellule reportés sur une colonne
Le
martin
Bonjour le Forum,
Comment reporter dans une colonne d'une autre feuille, tous les mouvements
qui sont intervenus dans une cellule située dans une autre feuille ?
En feuille A mes cellules de la colonnes B (B1;B2500) "quantité restante"
sont constament mises a jour automatiquement par un lecteur de code barre,
j'aurais voulu avoir un historique des mouvements (ajout ou retrait) qui sont
intervenus pour chaque cellules !
C'est possible ? comment y arriver simplement avec des formules ?
merci de votre aide
Bon WE
Comment reporter dans une colonne d'une autre feuille, tous les mouvements
qui sont intervenus dans une cellule située dans une autre feuille ?
En feuille A mes cellules de la colonnes B (B1;B2500) "quantité restante"
sont constament mises a jour automatiquement par un lecteur de code barre,
j'aurais voulu avoir un historique des mouvements (ajout ou retrait) qui sont
intervenus pour chaque cellules !
C'est possible ? comment y arriver simplement avec des formules ?
merci de votre aide
Bon WE
Poser une question
Par formule, je ne vois pas, mais avec un peu de VBA et notamment, dans un module ordinaire :
Public R As Integer, laVal
Sub historise()
'MPFE le 16/04/2005
R = ActiveCell.Row
laVal = Cells(R, 2).Value
Sheets("Histo").Select 'la feuille contennat l'historique
lacol = Range("IV" & R).End(xlToLeft).Column
If lacol = 255 Then
MsgBox "L'historique de cette référence est trop important" & _
vbNewLine & "il doit être réduit",vbcritical,"MPFE"
Exit Sub
Else
Cells(R, lacol + 1).Value = laVal
End If
Sheets("A").Select
'Philippe.R
End Sub
et dans le module de la feuille A
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [laplage]) Is Nothing Then Exit Sub
If Selection.Cells.Count > 1 Then Exit Sub
historise
End Sub
Tu noteras que je te propose un stockage en ligne, du fait que tu as plus de 250 références à traiter ;
sinon il faudrait prévoir 10 feuilles pour répartir l'historique de tes 2500 références
--
Amicales Salutations
XL 97 / 2000 / 2002
Préférez suivre facilement sur le forum :
news://msnews.microsoft.com/microso...c.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"martin"