[EXCEL 2003] Transfert de tableau à tableau

Résolu/Fermé
Johnny_Walker Messages postés 53 Date d'inscription samedi 14 juillet 2007 Statut Membre Dernière intervention 17 juillet 2007 - 17 juil. 2007 à 11:38
Johnny_Walker Messages postés 53 Date d'inscription samedi 14 juillet 2007 Statut Membre Dernière intervention 17 juillet 2007 - 17 juil. 2007 à 13:22
Bonjour, voila mon problème est le suivant :

j'ai crée une macro qui copie une ligne A1 d'un tableau1 vers la ligne A1 d'un tableau2, tout en activant l'éxécution relative. Or si je lance la macro à partir de la ligne A2 du tba1, elle copie le contenu dans la ligne A1 du tab2!
Voila le code de la macro : ( réalisée avec l'assistant étant donné que je débute avec Excel )
Sub AAA()
'
' AAA Macro
' Macro enregistrée le 17/07/2007 par  ******
'

'
    ActiveCell.Rows("1:1").EntireRow.Select
    Selection.Copy
    Windows("Esclave.xls").Activate
    ActiveCell.Select
    ActiveSheet.Paste Link:=True
    Windows("Maître.xls").Activate
    ActiveCell.Offset(0, 3).Range("A1").Select
End Sub

A voir également:

2 réponses

Johnny_Walker Messages postés 53 Date d'inscription samedi 14 juillet 2007 Statut Membre Dernière intervention 17 juillet 2007 1
17 juil. 2007 à 13:05
UP
0
Johnny_Walker Messages postés 53 Date d'inscription samedi 14 juillet 2007 Statut Membre Dernière intervention 17 juillet 2007 1
17 juil. 2007 à 13:22
Solution ( basique ) :
Sub Enr()
'
' Enr Macro
' Macro enregistrée le 17/07/2007 par  ******
'
' Touche de raccourci du clavier: Ctrl+w
'
    ActiveCell.Rows("1:1").EntireRow.Select
    Selection.Copy
    Windows("Poubelle.xls").Activate
    ActiveCell.Select
    ActiveSheet.Paste
    ActiveCell.Offset(1, 0).Range("A1").Select
    Windows("En cours.xls").Activate
End Sub
0