OVH Cloud OVH Cloud

12 fichiers en 12 feuilles ?

1 réponse
Avatar
d
Bonjour,
j'ai 12 classeurs excel
je voudrais créer un nouveau classeur qui comporterait 12 feuilles dont la
première serait le classeur 1, la seconde le classeur 2, etc...
autrement dit : comment transformer des classeurs en feuille ???
merci d'avance
d@n

1 réponse

Avatar
anonymousA
bonjour,

transformer des classeurs en feuilles , ce n'est pas possible. En revanche,
ce qui est possible c'est copier des feuilles d'un classeur vers un autre
classeur.
Il y a bien sur comme d'hab plusieurs solutions. En voici une

ouvir le classeur réception, puis ouvir chaque classeur source dont une
feuille est à copier, copier celle-ci dans le classeur destination , fermer
le classeur source.
Attention, si les feuilles des classeurs sources portent le même nom, la
copie renommera les feuilles considérées avec un indice croissant porté entre
parenthèses après le nom de base

Imaginons donc que tes classeurs s'appellent toto1.xls à toto12.xls et que
les feuilles s'appellent tata.
On suppose que le classeur destination est ouvert et qu'il s'appelle tutu

On pourrait écrire

set wdest=workbooks("tutu.xls")
for I=1 to 12
workbooks.open "C:DONNEEStoto" & I & ".xls"
with wdest
Sheets("tata").Copy after:=.sheets(.sheets.count)
end with
workbooks("C:DONNEEStoto" & I & ".xls").close
next

A+


Bonjour,
j'ai 12 classeurs excel
je voudrais créer un nouveau classeur qui comporterait 12 feuilles dont la
première serait le classeur 1, la seconde le classeur 2, etc...
autrement dit : comment transformer des classeurs en feuille ???
merci d'avance