bonjour,
j'ai parcouru tout le forum est n'est pas réussi à me débloquer malgré vos conseils avisés.
voila, c'est tout simple mais je suis un pur débutant en VBA.
je dois pour un stage copier coller la derniere ligne non vide d'une feuille " nomenclature" et la coller dans l'onglet "bibliothèque" du même classeur et que celle ci vienne s'ajouter à la suite pour me creer une base de donnée
j'ai donc écrit ce code :
Sub macro1()
With Worksheets("nomenclature")
Dim DernLigne As Long
DernLigne = Range("A" & Rows.Count).End(xlUp).Row
DernLigne.Select
Selection.Copy
Cells(.Rows.Count, "A").End (xlUp)
End With
End Sub
mais il me dit qualificateur incorrect, cela fait mainteannt deux jours que j'ai essayer toutes les techniques et à chaques fois j'ai une érreur soit d'objet , soit de syntaxe.
Merci de votre aide.
cordialement
j'ai parcouru tout le forum est n'est pas réussi à me débloquer malgré vos conseils avisés.
voila, c'est tout simple mais je suis un pur débutant en VBA.
je dois pour un stage copier coller la derniere ligne non vide d'une feuille " nomenclature" et la coller dans l'onglet "bibliothèque" du même classeur et que celle ci vienne s'ajouter à la suite pour me creer une base de donnée
j'ai donc écrit ce code :
Sub macro1()
With Worksheets("nomenclature")
Dim DernLigne As Long
DernLigne = Range("A" & Rows.Count).End(xlUp).Row
DernLigne.Select
Selection.Copy
Cells(.Rows.Count, "A").End (xlUp)
End With
End Sub
mais il me dit qualificateur incorrect, cela fait mainteannt deux jours que j'ai essayer toutes les techniques et à chaques fois j'ai une érreur soit d'objet , soit de syntaxe.
Merci de votre aide.
cordialement