Bonjour à tous
Je suis en cours de développement d'une macro afin de faire un fichier de collecte
je m'explique, j'ai des données des puissances de 66 Turbines qui sont stockées individuellement dans une fichier .xls soit 66 fichiers.. La je dois donc collecter les données des la dernières lignes de chaque fichiers sur une range définies par exemple ("AI:AO").
Le problème c'est que j'arrive pas a aller chercher chacune de ses lignes sans avoir à rentrer manuellement
Si vous regardez la colonne J du LOG qui est l'index d'écriture, il va de 1 à 30 puis de 1 à 30 .....
Donc on écrit et ré écrit que les 30 premières lignes.
Il va falloir que je trouve pourquoi. BUG chez moi. Je regarde.
Si vous regardez la colonne J du LOG qui est l'index d'écriture, il va de 1 à 30 puis de 1 à 30 .....
Donc on écrit et ré écrit que les 30 premières lignes.
Il va falloir que je trouve pourquoi. BUG chez moi. Je regarde.
2- J'avais émis l'hypothèse que le N° turbine pouvais être MO01 ou MO1 pour les 9 premières.
J'isolais les 2 derniers caractères et si ce n'était pas numérique je ne prenais que le dernier. Et ça c'était buggé. Je prenais toujours que le dernier d'où les 30 lignes : turbines de 1 à 9 en permanence.
3- Dans le module LireCellules je trouve la dernière ligne avec : DerLig = .Range("K65500").End(xlUp).Row
Si c'est la première, il suffit de faire : DerLig=3 ( en conservant la variable DerLig ça évite de tout changer ) Pour moi la première ligne de données est en ligne 3.
4- Si tout baigne, je vous referais une version "propre" sans la feuille LOG sauf si vous voulez la conserver.
2- J'avais émis l'hypothèse que le N° turbine pouvais être MO01 ou MO1 pour les 9 premières.
J'isolais les 2 derniers caractères et si ce n'était pas numérique je ne prenais que le dernier. Et ça c'était buggé. Je prenais toujours que le dernier d'où les 30 lignes : turbines de 1 à 9 en permanence.
3- Dans le module LireCellules je trouve la dernière ligne avec : DerLig = .Range("K65500").End(xlUp).Row
Si c'est la première, il suffit de faire : DerLig=3 ( en conservant la variable DerLig ça évite de tout changer ) Pour moi la première ligne de données est en ligne 3.
4- Si tout baigne, je vous referais une version "propre" sans la feuille LOG sauf si vous voulez la conserver.