Vi ok, mais le pb c'est que les lignes juste avant fonctionnent:
Code:
Sheets("TT").Range("A" & i & ":B" & i).Copy 'copie la cellule D
Sheets("Macro").Range("A" & k & ":B" & k).Select 'selectionne la cellule en C
ActiveSheet.Paste 'colle
Application.CutCopyMode = False '"sort" du coller
et que ceci ne fonctionne pas:
Code:
Sheets("Macro").Range("A" & 12 & ":B" & n).Copy 'selectionne la cellule en C
Sheets("Base").Range("A2").Select 'colle
ActiveSheet.Paste 'colle
Application.CutCopyMode = False '"sort" du coller
Oui tres étrange si, ce que j ai remarqué et que je ne sais expliquer ....
Pour que cette macro ne bug pas il faut que quand tu la lance tu sois dans la feuille Base
Code:
Sheets("Macro").Range("A" & 12 & ":B" & n).Copy 'selectionne la cellule en C
Sheets("[COLOR=Red]Base[/COLOR]").Range("A2").Select 'colle
ActiveSheet.Paste 'colle
Application.CutCopyMode = False '"sort" du coller
idem pour celle la il faut te placer dans la feuille Macro
Code:
Sheets("TT").Range("A" & i & ":B" & i).Copy 'copie la cellule D
Sheets("Macro").Range("A" & k & ":B" & k).Select 'selectionne la cellule en C
ActiveSheet.Paste 'colle
Application.CutCopyMode = False '"sort" du coller
aucun explication par contre sur le pourquoi du comment