Microsoft 365 Atteindre la première case vide après collage

[Icedarts]

Bonjour a tous,

J'ai automatisé un collage venant d'un autre classeur.
Lorsque je colle mes données dans la feuille de destination je souhaiterai atteindre automatiquement la prochaine case vide en colonne A afin de coller directement dans cette case sans avoir besoin de la sélectionner.

Dans les données que je copie/colle il y a des lignes vides, donc je pense qu'il faut vérifier en remontant.
Mais comment faire, je sèche complétement ^^

Si quelqu'un avait un petit code a partager ça serait top.
Je vous joins un classeur pour que cela soit "plus visuel" j'espère être suffisamment clair. ^^

Merci d'avance.

 

[job75]

Bonjour,

Dans les données que je copie/colle il y a des lignes vides, donc je pense qu'il faut vérifier en remontant.

Pas clair, vous voulez supprimer les lignes vides ?

A+

 

[Icedarts]

Bonjour,

Pas clair, vous voulez supprimer les lignes vides ?

A+

Je veux atteindre la premiere cellule vide de la colonne A après les données collées.
Ce que j'ai voulu dire c'est que c'est bien après toutes les données car dans le lot parfois il y a des lignes vides.

Par exemple je colle des données a partir de A1 jusque A13 mais A7 et A11 sont des lignes vides.
Il faut tout de même se rendre en A14

 

[job75]

Vous ne connaissez pas End(xlUp) ?

Set c = Cells(Rows.Count, 1).End(xlUp)(2)

et collez sur c.

 

[Icedarts]

Vous ne connaissez pas End(xlUp) ?

Set c = Cells(Rows.Count, 1).End(xlUp)(2)

et collez sur c.

Si j'utilise le vba 2 fois dans l'année c'est déjà exceptionnel, donc je ne retiens jamais rien malheureusement.

Je n'ai pas compris "collez sur c"

 

[job75]

Je n'ai pas compris "collez sur c"

Vous avez dit :

je souhaiterai atteindre automatiquement la prochaine case vide en colonne A afin de coller directement dans cette case sans avoir besoin de la sélectionner.