Bonjour le forum,
je me trouve face à un probleme, j'essaye d'adapter une macro que j'utilise déjà, mais pas possible ça bug pourtant c'est simple:
je cherche a copier une ligne donnée de la feuil1 dans la derniere ligne non remplie de la feuille2, le code que j'utilise est le suivant:
#code#: With Workbooks("Déclaration.xls").Sheets("Déclaration")
ThisWorkbook.Sheets("Archive").Cells(.Rows.Count, 1).End(xlUp).Value = .Range("A4").Value
ThisWorkbook.Sheets("Archive").Cells(.Rows.Count, 2).End(xlUp).Value = .Range("B4").Value
Cependant au lieu de me remplir la 1ere ligne non vide, il me remplace les données de la derniere ligne déjà remplie, d'ou probleme.
Merci d'avance pour votre aide.
Amicalement
je me trouve face à un probleme, j'essaye d'adapter une macro que j'utilise déjà, mais pas possible ça bug pourtant c'est simple:
je cherche a copier une ligne donnée de la feuil1 dans la derniere ligne non remplie de la feuille2, le code que j'utilise est le suivant:
#code#: With Workbooks("Déclaration.xls").Sheets("Déclaration")
ThisWorkbook.Sheets("Archive").Cells(.Rows.Count, 1).End(xlUp).Value = .Range("A4").Value
ThisWorkbook.Sheets("Archive").Cells(.Rows.Count, 2).End(xlUp).Value = .Range("B4").Value
Cependant au lieu de me remplir la 1ere ligne non vide, il me remplace les données de la derniere ligne déjà remplie, d'ou probleme.
Merci d'avance pour votre aide.
Amicalement