copie cellule à la suite

JUDOKA

XLDnaute Nouveau
Bonjour,

j'ai besoin de copier automatiquement des cellules d'une feuille dans une autre feuille à la suite de cellules déjà inscrites sans ecraser celles déjà existantes Afin d'établir un fichier archive des écritures

merci de votre réponse
 
J

Jouxte

Guest
Bonjour,

ceci t'aidera peut-être
Cette formule te donne le dernier N° tapé

A
1 Dernier n°
2 96028 (=INDEX(A4:A8;NBVAL(A4:A8);1)
3 N° Facture
4 96024
5 96025
6 96026
7 96027
8 96028



Bon courage

Jouxte
 

bbmarcus

XLDnaute Occasionnel
Bonjour Judoka, Jouxte,

tu peux également utiliser ce code, qui copie une cellule dans une autre feuille, se place automatiquement dans la cellule suivante, puis reviens dans la première feuille et efface les données.
Condition: te placer dans la première cellule de l'historique pour commencer le travail.

Ca te permet de travailler toujours sur la même feuille et d'archiver en même temps.

Petit conseille: créé une autre feuille historique qui sera la copie de l'archive et dans laquelle tu pourra te rendre pour visualiser tes historiques.

Range('C3').Select
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets('Historique').Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets('feuille de travail').Select
Application.CutCopyMode = False
Selection.ClearContents
Sheets('Historique').Select
ActiveCell.Next.Select
Sheets('feuille de travail').Select
Range('C3').Select

Si tu as un exemple, je peux te le mettre en place (et si j'ai le temps ! ;)

bbmarcus
 

Hervé

XLDnaute Barbatruc
Bonjour Judoka, Jouxte,bbmarcus.

Toute petite intervention pour préciser à bbmarcus qu'avec la version 2002 d'excel, on ne peut pas utiliser Historique comme nom de feuille, c'est un nom réservé à excel.

mais je ne sais pas si c'est propre à toutes les versions ????

:)

Salut
 

Discussions similaires

Statistiques des forums

Discussions
312 434
Messages
2 088 380
Membres
103 838
dernier inscrit
noureddine