Dim sh as worksheet for each sh in Workbooks("ClasseurB.xls").sheets with Activeworkbook.sheets(1) .[a65536].end(xlup) (2)=sh.name end with next sh
'lSteph
On 5 juil, 19:55, jeje02 wrote:
Bonjour, comment inserrer dans plusieurs cellules le nom des feuilles d'un autre f ichier xls merci
SALUT Steph j'ai pas trop saisi ce code et où le mettre. désolé je suis pas trop calé Salutation
LSteph
Bonjour,
selon ta demande tu es sur le classeur où tu veux voir dans les cellules de la colonneA de la première feuille les noms des onglets de l'autre Classeur Ouvert qu' ici j'ai nommé ClasseurB dans l'exemple après à toi d'adapter donc pour le code.
'à mettre dans un module standard
Sub masub() Dim sh as worksheet for each sh in Workbooks("ClasseurB.xls").sheets with Activeworkbook.sheets(1) .[a65536].end(xlup) (2)=sh.name end with next sh end sub
'LSteph
On 7 juil, 12:41, LSteph wrote:
Bonjour,
soit à la main, soit par VBA
Dim sh as worksheet for each sh in Workbooks("ClasseurB.xls").sheets with Activeworkbook.sheets(1) .[a65536].end(xlup) (2)=sh.name end with next sh
'lSteph
On 5 juil, 19:55, jeje02 wrote:
> Bonjour, > comment inserrer dans plusieurs cellules le nom des feuilles d'un autre fichier > xls > merci- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Bonjour,
selon ta demande tu es sur le classeur
où tu veux voir dans les cellules de la colonneA de la première
feuille
les noms des onglets de l'autre Classeur Ouvert qu' ici j'ai nommé
ClasseurB
dans l'exemple après à toi d'adapter donc pour le code.
'à mettre dans un module standard
Sub masub()
Dim sh as worksheet
for each sh in Workbooks("ClasseurB.xls").sheets
with Activeworkbook.sheets(1)
.[a65536].end(xlup) (2)=sh.name
end with
next sh
end sub
'LSteph
On 7 juil, 12:41, LSteph <gmlst...@gmail.com> wrote:
Bonjour,
soit à la main, soit par VBA
Dim sh as worksheet
for each sh in Workbooks("ClasseurB.xls").sheets
with Activeworkbook.sheets(1)
.[a65536].end(xlup) (2)=sh.name
end with
next sh
'lSteph
On 5 juil, 19:55, jeje02 <jej...@domain-xyz.in> wrote:
> Bonjour,
> comment inserrer dans plusieurs cellules le nom des feuilles d'un autre fichier
> xls
> merci- Masquer le texte des messages précédents -
selon ta demande tu es sur le classeur où tu veux voir dans les cellules de la colonneA de la première feuille les noms des onglets de l'autre Classeur Ouvert qu' ici j'ai nommé ClasseurB dans l'exemple après à toi d'adapter donc pour le code.
'à mettre dans un module standard
Sub masub() Dim sh as worksheet for each sh in Workbooks("ClasseurB.xls").sheets with Activeworkbook.sheets(1) .[a65536].end(xlup) (2)=sh.name end with next sh end sub
'LSteph
On 7 juil, 12:41, LSteph wrote:
Bonjour,
soit à la main, soit par VBA
Dim sh as worksheet for each sh in Workbooks("ClasseurB.xls").sheets with Activeworkbook.sheets(1) .[a65536].end(xlup) (2)=sh.name end with next sh
'lSteph
On 5 juil, 19:55, jeje02 wrote:
> Bonjour, > comment inserrer dans plusieurs cellules le nom des feuilles d'un autre fichier > xls > merci- Masquer le texte des messages précédents -