A
aurelienpagrica
Guest
Bonjour,
J'essaye de créer une procédure qui copie une ligne d'un classeur vers une ligne d'un autre classeur --> Les lignes, classeurs et feuilles sont des arguments d'une procédure.
Si j'éxécute l'instruction en dehors d'une procédure avec arguments, ça marche. SInon, il affiche à message d'erreur:
erreur d'éxécution '438': Propriété ou méthode non gérée par cet objet
Merci d'avance
Aurélien
J'essaye de créer une procédure qui copie une ligne d'un classeur vers une ligne d'un autre classeur --> Les lignes, classeurs et feuilles sont des arguments d'une procédure.
Si j'éxécute l'instruction en dehors d'une procédure avec arguments, ça marche. SInon, il affiche à message d'erreur:
erreur d'éxécution '438': Propriété ou méthode non gérée par cet objet
Merci d'avance
Aurélien
Code:
Public Sub Copie(ligne_d_origine As Integer, feuille_d_origine As Worksheet, ligne_de_destination As Integer, feuille_de_destination As Worksheet, classeur_de_destination As Workbook)
Workbooks("1- Données à exploiter").feuille_d_origine.Rows(ligne_d_origine).Copy classeur_de_destination.feuille_de_destination.Cells(ligne_de_destination, 1)
End Sub
Sub essai()
'
' essai Macro
' Macro enregistrée le 06/08/2010 par modele
Call Copie(1, Sheets("INC_N"), 3, Sheets("INC_N"), Workbooks("1- Données à exploiter.xls"))
End Sub