VBA : étendre une plage Excel

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

garth_algar

XLDnaute Junior
Bonjour à tous,
Voici ma problématique :
J'ai une plage Excel sur une seule colonne (actuellement K4:K30), que j'ai nommée "Liste".
Dans VBA, je dois parcourir un tableau et ajouter à la Liste chaque élément qui n'y figure pas.
Je souhaiterais donc, à chaque fois que c'est nécessaire, augmenter la taille de ma plage "Liste" d'une cellule vers le bas, et là je bloque.
Quelqu'un aurait-il une solution ?
Merci d'avance.
 
Re : VBA : étendre une plage Excel

Salut Pierrot, merci pour ta réponse.

En ouvrant le lien, j'ai tout de suite pensé à la propriété "Offset".
Malheureusement, on ne peut pas spécifier les dimensions comme avec la fonction "Decaler" d'Excel.
En revanche, les exemples mentionnaient la propriété "Resize", qui me semble plus adaptée.
Après, je ne suis pas très serein sur la syntaxe. Sans conviction, j'ai essayé ceci :

Code:
n = Range("Liste").Rows.Count
n = n + 1
Range("Liste") = Range("Liste").Resize(n, 1)

La taille de la plage n'a pas changé, et son contenu a été effacé !
 
Re : VBA : étendre une plage Excel

Bonjour, salut Pierrot,
sans fichier exemple, difficile de t'aider...
non testé mais peut-être quelque chose dans le genre :
Code:
MaPlage = Range("A1").Offset(Nb_ligne,Nb_colonne).Resize(n, 1)
Regarde ici sur le site de JB.
A+
 
Re : VBA : étendre une plage Excel [RESOLU]

Je ne comprends pas bien ce que tu veux dire, mais j'ai trouvé de mon côté :
Code:
Dim PLAGE As Range
Set PLAGE = Range("Liste")
n = PLAGE.Rows.Count
n = n + 1
PLAGE.Resize(n, 1).Name = "Liste"
Merci, tu m'as mis sur la bonne piste !
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
XL 2019 VBA
Réponses
10
Affichages
1 K
  • Question Question
XL 2021 VBA excel
Réponses
4
Affichages
99
Réponses
4
Affichages
379
Retour