Je n'arrive pas =E0 =E9crire correctement des lignes de code=20
pour effectuer l'action suivante :
Sans bouger de la cellule active, copier dans une autre=20
feuille =E0 partir de la ligne (enti=E8re ! ) num=E9ro 2 et=20
jusqu'=E0 la derni=E8re ligne du tableau (la longueur du=20
tableau peut bouger) et coller =E0 partir de la ligne de la=20
cellule active. J'ai essay=E9 de trouver l'=E9quivalent de=20
de "Fin" + "Fl=E8che bas", mais sans succ=E8s !
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Rai
Jeannnot wrote:
Bonjour à tous,
Je n'arrive pas à écrire correctement des lignes de code pour effectuer l'action suivante :
Sans bouger de la cellule active, copier dans une autre feuille à partir de la ligne (entière ! ) numéro 2 et jusqu'à la dernière ligne du tableau (la longueur du tableau peut bouger) et coller à partir de la ligne de la cellule active. J'ai essayé de trouver l'équivalent de de "Fin" + "Flèche bas", mais sans succès !
Merci pour votre aide
Jeannot
Bonjour,
Avec déplacement de la sélection (donc en bougeant de la cellule active) : Selection.End(xlDown).Select
ATTENTION, cette commande ne trouve pas la dernière ligne utilisée, mais la dernière ligne non-vide du bloc (donc si tu as des lignes vides intercalées entre tes lignes pleines ... tu ne trouveras pas le bas de ton tableau) Préférer l'ensemble de commandes suivantes : Range("A65535").End(xlUp).Select
Pour trouver l'adresse de la fin de ton tableau : adr_fin = Range("A65535").End(xlUp).Address
Si tu ne cherches que le N° de ligne : adr_fin = Range("A65535").End(xlUp).Row
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
Jeannnot wrote:
Bonjour à tous,
Je n'arrive pas à écrire correctement des lignes de code
pour effectuer l'action suivante :
Sans bouger de la cellule active, copier dans une autre
feuille à partir de la ligne (entière ! ) numéro 2 et
jusqu'à la dernière ligne du tableau (la longueur du
tableau peut bouger) et coller à partir de la ligne de la
cellule active. J'ai essayé de trouver l'équivalent de
de "Fin" + "Flèche bas", mais sans succès !
Merci pour votre aide
Jeannot
Bonjour,
Avec déplacement de la sélection (donc en bougeant de la cellule active) :
Selection.End(xlDown).Select
ATTENTION, cette commande ne trouve pas la dernière ligne utilisée, mais la dernière ligne non-vide du bloc (donc si tu as des lignes vides intercalées entre tes lignes pleines ... tu ne trouveras pas le bas de ton tableau)
Préférer l'ensemble de commandes suivantes :
Range("A65535").End(xlUp).Select
Pour trouver l'adresse de la fin de ton tableau :
adr_fin = Range("A65535").End(xlUp).Address
Si tu ne cherches que le N° de ligne :
adr_fin = Range("A65535").End(xlUp).Row
--
Cordialement,
Rai
Remplacer point par la ponctuation appropriée pour répondre...
Je n'arrive pas à écrire correctement des lignes de code pour effectuer l'action suivante :
Sans bouger de la cellule active, copier dans une autre feuille à partir de la ligne (entière ! ) numéro 2 et jusqu'à la dernière ligne du tableau (la longueur du tableau peut bouger) et coller à partir de la ligne de la cellule active. J'ai essayé de trouver l'équivalent de de "Fin" + "Flèche bas", mais sans succès !
Merci pour votre aide
Jeannot
Bonjour,
Avec déplacement de la sélection (donc en bougeant de la cellule active) : Selection.End(xlDown).Select
ATTENTION, cette commande ne trouve pas la dernière ligne utilisée, mais la dernière ligne non-vide du bloc (donc si tu as des lignes vides intercalées entre tes lignes pleines ... tu ne trouveras pas le bas de ton tableau) Préférer l'ensemble de commandes suivantes : Range("A65535").End(xlUp).Select
Pour trouver l'adresse de la fin de ton tableau : adr_fin = Range("A65535").End(xlUp).Address
Si tu ne cherches que le N° de ligne : adr_fin = Range("A65535").End(xlUp).Row
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
