Construction d'une adresse

[zazou5908]

Bonjour le forum

J'ai un fichier avec 3 onglets.

Onglet "paramètres"
-------------------
contient en B2 le numéro de ligne de la dernière cellule de l'onglet "TC"

Onglet "TC"
-----------
contient des données exportées par le logiciel comptable (en général plus de 7000)

Onglet "Rapport"
----------------
Ligne 1 à 9 = Entête des colonnes, logo ....
Ligne 10: Les cellules A10 jusque Y10 contiennent des formules qui vont recopier sélectivement des données de l'onglet "TC"

Mon problème
-------------
Sélectionner les cellules A10 => Y10 (pas de problème)
Copier cette sélection de A11 jusqu'à Y et le numéro de la dernière ligne utilisée mémorisé dans l'onglet "Paramètre" en cellule B2

J'espère avoir été clair. J'ai lu différent post trouvé avec la recherche sur les mots clé "Construction adressage" et d'autres variantes, mais je n'ai encore rien trouvé qui fasse mon bonheur (dur dur à comprendre le INDIRECT).

Y aura-t-il quelqu'un qui pourra me donner ou me suggérer la piste à suivre ?

D'avance merci à tous.

Zazou

 

[mutzik]

Re : Construction d'une adresse

Bonjour Zazou,

copier A11:Y (B2) jusque là OK, mais le coller ou ?
sinon, range("A11:Y" & sheets("paramètres").range("B2")).copy destination:= ...

 

[zazou5908]

Re : Construction d'une adresse

Bonjour Mutzik et merci de t'être penché sur mon problème.

Le lieu de destination est l'onglet "Rapport"

Dans l'onglet rapport, les lignes 1 à 9 sont mes entêtes
La ligne 10 de la colonne A à la colonne Y contient des formules qui me permettent de recopier des données contenues dans l'onglet "TC" ou de calculer des pourcentages

Je voudrais donc copier A10 => Y10 dans le range
A11 => Y7904 (par exemple si le contenu de la cellule
B2 de l'onglet "Paramètres" est 7904

Cette macro me permettra donc de constituer les données de bases de mon rapport et peu importe le nombre de lignes générées par le logiciel comptable.

D'autres macro me permettent par la suite d'ajuster les mises en formes ... pour avoir un rapport Nickel !!!

A plus et bonne continuation

 

[mutzik]

Re : Construction d'une adresse

Bonjour Zazou,

je dirai :
sheets("Rapport").range("A11:Y65000").clearcontents 'efface les anciennes données
sheets("TC").range("A11:Y" & sheets("paramètres").range("B2")).copy destination:=sheets("Rapport").range("A11")

devrait être ok