Enregistrer les donnees d'une ligne avant de la supprimer

Eric -  
Eric_3280 Messages postés 22 Date d'inscription   Statut Membre Dernière intervention   -
https://www.cjoint.com/c/IGthaIusINq

Bonjour à tous.
J’ai un classeur qui contient 3 feuilles: « sources », « agents » et « archives ». Voir pièce jointe
Dans la feuille « agent » j’ai 3 boutons qui me donnent la possibilité de modifier ma base de données, d’ajouter dans la base, et de supprimer dans ma base. Comme vous le remarquerez, à chaque fois que je supprime un numéro de matricule de la feuille « sources », le même numéro est supprimée automatiquement dans la feuille « agents ». (Donc c’est la ligne entière qui est supprimée)
Alors voici ma préoccupation: j’aimerais qu’à chaque fois que je supprime un certain numéro de matricule, ses données de la feuille « agents », (donc la ligne entière du matricule de la feuilles « agents ») sont automatiquement copiées et collées dans la feuille archives)
Quelqu’un peut-il m’aider svp?
A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Fichier modifie pour suppression: https://mon-partage.fr/f/W8dBFeJh/
Ai un peu repris votre code, vous aurez une autre facon de faire….
Quand vous faites un ajout, la formule de la cellule colonne A feuille Source est ecrasee par votre mise a jour!!!!!!!!!!!!
1
Eric_3280 Messages postés 22 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup de m'avoir aidé. Je vois que je suis en voie de trouver solution à mon probleme grâce à vous. Le code fonctionne bien. Mais la difficulté c'est que, le code copie dans la feuille source au lieu de copier dans la feuille agent. Y a-il moyen de refaire le code en copiant dans la feuille agent et coller dans la feuille archive?? Svp ne vous fatiguez pas de m'aider car je suis un vrai débutant. (Même si les deux feuilles agents et source sont presque identique, moi j'aimerais que le code copie dans la feuille agent)

Cordialement
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

le code copie dans la feuille source au lieu de copier dans la feuille agent
Faux, si vous utilisez le code que j'ai modifie celui-ci correspond exactement a ce que vous avez demande au depart
0
Eric_3280 Messages postés 22 Date d'inscription   Statut Membre Dernière intervention  
 
C'est bon. Mais moi j'aurais besoin d'ajouter deux colonnes dans la feuille "agents ". Et les éléments de ces deux colonnes doivent être copier dans la feuille archives. Mais si on copie dans la feuille source, mes deux colonnes ne seront pas copiées.
Cordialement.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

C'est cette ligne qu'il faut adapter au nombre de colonne
.Range("A" & PCV).Resize(, 7) = Ligne

7 pour A a G, a vous de trouver pour vos deux colonnes supplementaires
0
Eric_3280 Messages postés 22 Date d'inscription   Statut Membre Dernière intervention  
 
https://www.cjoint.com/c/IGvqgXAaiNw

Bonjour et de sole de t’avoir dérangé aujourd’hui.
Voici en pièce jointe le classeur en question.
Svp j’ai modifié la formule telle que tu m’as suggéré. Mais il copie toujours dans feuille « source ». Dans ce classeur joint, j’ai ajouté deux colonnes dans la feuille « agents », pour bien voir s’il copie dans la feuille « agents ».
Au secours svp.
Cordialement
0