Discussion :

[statista]

Bonjour,
j'essaye de lancer une macro mais l'erreur renvoyée est "La méhode select de la classe range a échoué", je ne comprends pas pourquoi. Voilà la ligne qui ne passe pas au débogage:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.Sheets("étude").Range("A" & ligne_a_remplir).Select

Pourtant la feuille "étude" existe bien,
en passant la souris sur ligne_a_remplir je constate que c'est bien égal à 3, ce qui correspond à ce que je t'attendais, donc je ne comprends pas le problème. Avez vous une idée?

[delphine35]

Perso ca marche chez moi !!
Ta version Excel ?

[statista]

J'ai Excel 2003, mais le pire c'est que j'avais déjà fait des copier-coller par macro dans le passé...

[delphine35]

Ok je viens de comprendre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
ligne_a_remplir = 3
Worksheets(1).Cells(1, ligne_a_remplir).Copy
Worksheets(2).Select
ActiveSheet.Cells(1, ligne_a_remplir).Select
ActiveSheet.Paste

Il faut d'abord changer de feuille :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets(2).Select

puis selectionner ta cellule :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Cells(1, ligne_a_remplir).Select

puis coller

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Paste

Le paste ne fonctionne que sur le sheet et non sur la cellule

[statista]

Merci beaucoup Delphine, ça marche