Sélection automatique d'un tableau de taille variable

Bonjour,

Pour les besoins de mon entreprise, j'essaie de créer une macro VB (je suis débutante) qui me permet de sélectionner un tableau dont le nombre de lignes peut varier (mais pas les colonnes) selon les données. Je voudrais donc sélectionner uniquement les lignes où il y a des données pour faire ensuite un tri sur une des colonnes.

Je n'arrive pas à trouver le code adéquat pour sélectionner tout le tableau sans prendre les lignes sans valeur (mais qui contiennent des formules).
Quelqu'un peut-il m'aider ?

Merci d'avance.

Melhiril

Bonjour,
Le plus simple est de nommer l'aire du tableau + 1 ligne dans le fichier initiale.
Cette ligne supplémentaire sert à étendre automatiquement l'aire nommée quand l'utilisateur insère une ligne.

Pour le copier dans le nouveau fichier il suffit ensuite de faire :
fichier 1 : Range("MonTableauNommé").copy et
fichier 2 : Cellulechoisie. Paste

et c'est tout ! :lol:

bien Cordialement

Merci JOHN14 pour ta réponse.
J'ai bien compris ton idée, mais si justement il y a moins de données dans mon tableau ? Le fait de nommer l'aire va tout sélectionner même les lignes vides non ? Je précise que les utilisateurs n'ajouteront ni ne supprimeront de lignes, c'est pour ça que j'ai mis des formules prédéfinies sur un certain nombre de lignes pour anticiper.

J'ai l'impression que je me suis un peu compliquée :?

Bonjour,

Je ne suis pas certain d'avoir bien compris votre problème, mais est-ce que cela ne suffirait pas :

Code:

---

1 2	dl = Range("A2").CurrentRegion.End(xlDown).Row Range("A2:F" & dl).Select

---

Ce code fonctionne très bien sur mon fichier d'exemple.
Par contre, lorsque je l'applique sur mon vrai fichier, la sélection ne se fait pas, il ne prend que la première ligne :? Je ne comprends pas d'où vient le problème...

Merci pour votre aide, je ne suis pas très douée!

Il faudrait préciser :

1) quelle est la différence entre votre fichier exemple et votre fichier réel ?

2) avez-vous par exemple une ligne vide entre la ligne de titre et la première ligne de données (et peut-être d'autres lignes vides) ?

Quand je parle de lignes vides, elles peuvent contenir des formules, mais pas de données en colonne "A".

Pour voir la différence, si votre fichier réel a la même structure au niveau des colonnes que le fichier exemple, essayez :

DerniereLigne = Range("A1").End(xlDown).Row

Merci jacques_jean, je vais essayer ça.
Le code précédent fonctionne sur d'autre fichier mais pas celui que je souhaite. Il n'y a pourtant pas de ligne ou colonne vide. Ce n'est pas grave, je vais revoir tout ça.

Merci en tout cas, ce code me sera très utile même pour la suite!