Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel [vba] Selection

[vba] Selection

2 réponses
Avatar
NicolasB
Bonjour =E0 tous

J'aimerais selectionner la derni=E8re ligne =E0 la ligne 8 en=20
vue de coller la selection dans un autre classeur le tout=20
avec du vba

Merci pour l'aide
Signaler un problème avec ce contenu

2 réponses

Supprimer
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
Avatar
Nicolas B.
Salut NicolasB,

Pour sélectionner :

ActiveSheet.UsedRange
Range([A8], [A1].SpecialCells(xlLastCell).EntireRow).Select

Mais évite dans tes macros les sélections qui ralentissent l'exécution.
Par exemple, pour copier le contenu de A1:A5 dans la plage ci-dessus, tu
n'es pas obligé de passer par des sélections :

ActiveSheet.UsedRange
Range("A1:A5").Copy Range([A8], [A1].SpecialCells(xlLastCell).EntireRow)


A+
Nicolas B.

NicolasB wrote:
Bonjour à tous

J'aimerais selectionner la dernière ligne à la ligne 8 en
vue de coller la selection dans un autre classeur le tout
avec du vba

Merci pour l'aide


Avatar
NicolasB
Merci pour l'info et la rapidité de la réponse
-----Message d'origine-----
Salut NicolasB,

Pour sélectionner :

ActiveSheet.UsedRange
Range([A8], [A1].SpecialCells
(xlLastCell).EntireRow).Select


Mais évite dans tes macros les sélections qui
ralentissent l'exécution.

Par exemple, pour copier le contenu de A1:A5 dans la
plage ci-dessus, tu

n'es pas obligé de passer par des sélections :

ActiveSheet.UsedRange
Range("A1:A5").Copy Range([A8], [A1].SpecialCells
(xlLastCell).EntireRow)



A+
Nicolas B.

NicolasB wrote:
Bonjour à tous

J'aimerais selectionner la dernière ligne à la ligne 8
en


vue de coller la selection dans un autre classeur le
tout


avec du vba

Merci pour l'aide
.