Copie cellule dans première cellule vide d'une colonne dans classeur différent.

Fixounet

XLDnaute Nouveau
Bonjour à tous,

Je cherche et recherche dans mon coin et sur le web solutions à mon souci sans y parvenir.

Je souhaites via macro copier la valeur d'une cellule "A1" de la feuil1 du classeur A ou B ou C ou D...,(selon le classeur ouvert) dans la première cellule vide de la colonne A de la feuil2 du classeur Z.

Pour copier la valeur dans la première cellule vide c'est ok :
Code:
Range(B65536).Select
    Selection.End(xlUp).Offset(1, 0).Select
    Selection = Range("Feuil1!A1")
    Range("Feuil1!A1").Select

Je me demande s'il n'y as pas un moyen pour indiquer le chemin d'un classeur dans la première ligne. J'ai essayé quelques petites choses mais sans résultat certainement une erreur de syntaxe...

Si quelqu'un a une piste, une idée un conseil je suis preneur .

Merci beaucoup.
 

hypo78

XLDnaute Impliqué
Re : Copie cellule dans première cellule vide d'une colonne dans classeur différent.

Bonjour,
en déclarant, tu dis qui est le classeur d'origine et qui est le classeur destinataire.

Code:
Dim Wbk1 As Workbook, Wbk2 As Workbook



Set Wbk1 = ThisWorkbook
Set Wbk2 = Workbooks.Open(ThisWorkbook.Path & "\classeurZ.xls")
Set Ws = Wbk2.Worksheets("feuille1")

Cordialement
 

Discussions similaires

Réponses
2
Affichages
224