Bonjour le forum
La macro ci-dessous me permet de couper la cellule acrtive, d'ouvrir unun classeur d'aller sur une feuille d'aller a la dernier cellule de la colonne M et de coller
Mon problème est que je n'arrive pas a coller
Merci de votre aide
Sub Macro2()
ActiveCell.Select
Selection.Cut
Application.CutCopyMode = False
Workbooks.Open Filename:= _
"C:\Documents and Settings\utilisateur\Bureau\GESTION EQUIPES1\BASE EQUIPES\DOUBLONS.xls"
Sheets("doublons atelier").Select
Columns(13).Find("*", , , , , xlPrevious).Offset(1, 0).Select
ActiveSheet.Paste
End Sub
La macro ci-dessous me permet de couper la cellule acrtive, d'ouvrir unun classeur d'aller sur une feuille d'aller a la dernier cellule de la colonne M et de coller
Mon problème est que je n'arrive pas a coller
Merci de votre aide
Sub Macro2()
ActiveCell.Select
Selection.Cut
Application.CutCopyMode = False
Workbooks.Open Filename:= _
"C:\Documents and Settings\utilisateur\Bureau\GESTION EQUIPES1\BASE EQUIPES\DOUBLONS.xls"
Sheets("doublons atelier").Select
Columns(13).Find("*", , , , , xlPrevious).Offset(1, 0).Select
ActiveSheet.Paste
End Sub