Créer un historique lorsqu'une cellule est modifiée.

  • Initiateur de la discussion Willy
  • Date de début
W

Willy

Guest
Bonsoir à toutes et à tous,

Je souhaiterai créer un historique, c'est à dire que chaque fois que le contenu d'une cellule de la colonne C est modifiée ( si bien sur celle-ci contient une valeur ), sauvegarder les données des cellules des colonnes A à F de la ligne identique à la cellule (C) modifiée et coller cela dans une autre page masquée.

Pour être plus clair :
Mon tableau comprend les colonnes A à F dans la feuil1
Je modifie le contenu de la cellule C3.
Dès que je clique sur la touche ENTREE, le contenu des cellules A3,B3,C3,D3,E3 et F3 est copié et collé dans la feuil2 en A1.
Si je modifie une autre cellule, par exemple la C4 le contenu est collé dans la feuil2 à la suite soit la ligne A2. et ainsi de suite.

Pour l'heure, j'ai un début de procédure qui permet seulement de copier la ligne entière, la colle dans la feuil2, seulement :
Elle copie également la mise en forme des cellules ( couleur de fond, bordures), ce que je ne souhaite pas;
Je n'arrive pas à coller dans la feuil2 sur la ligne vierge suivante automatiquement;
et pour finir la ligne entière est copiée et non pas uniquement les colonnes A à F

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Application.CutCopyMode = False
'Après la modif de la cellule dans la colonne 3
'Sélectionne et copy la ligne complete de la cellule
If ActiveCell.Column = 3 Then
Rows(ActiveCell.Row - 1).Select
Selection.Copy
ActiveSheet.Paste Destination:=Worksheets("Feuil2").Range("A1")
Application.CutCopyMode = False
End If
End Sub

J'ai essayé plusieurs modifications mais sans résultat.

Merci de votre aide
bonne soirée
Willy
 
S

steplof

Guest
Salut à tous,

Willy, regarde le fichier joint a priori il semble faire ce que tu veux,

j'ai juste ajouté
la détection de la ligne à utiliser en feuille2
un paste special valeurs only pour résoudre ton 1er problème et
une variable lignesource pour sélectionner ta plage Alignesource:Flignesource

ça me semble répondre à ta question.Confirme moi le.

@+
Steplof
 

Pièces jointes

  • Willy2.xls
    26 KB · Affichages: 703

Discussions similaires

Réponses
5
Affichages
345

Statistiques des forums

Discussions
312 338
Messages
2 087 397
Membres
103 536
dernier inscrit
komivi