Bonjour à tous,

Je débute le VBA et c'est mon premier langage de programmation . Je suis sur VBA pour les nuls et je me fixe quelques exercices.

Le premier étant de copier une colonne ou un tableau d'une feuille A vers la première ligne vide d'une feuille B. J'ai commencé avec l'enregistreur puis récupéré un code me permettant de trouver la dernière cellule vide mais je ne sais pas "l'activer".

Ci-dessous le code enregistré

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub Exo1()
 
    Range("A1:A6").Select
    Selection.Copy
    Windows("Test dernière ligne.xlsx").Activate
    ActiveSheet.Paste
 
End Sub
Maintenant j'essaie de lui dire de d'abord choisir la première ligne vide avec

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim Dlig As Long
Dlig = Range("C1").End(xlDown).Row + 1
 
Sub Exo1()
 
    Dim Dlig As Long ' Je déclare la variable pour cette procédure en entête
    Range("A1:A6").Select
    Selection.Copy
    Windows("Test dernière ligne.xlsx").Activate
    Dlig = Range("C1").End(xlDown).Row + 1
    ActiveSheet.Paste
 
End Sub
J'ai essayé de mettre Dlig dans un Range, ça ne marche pas. Je me doute qu'il manque une instruction select mais à part Dlig je mets ?

J'espère avoir été clair, merci pour votre aide

Bonne journée.