OVH Cloud OVH Cloud

copier le nom d'un onglet

6 réponses
Avatar
Nancy
Bonjour,

J'aimerais savoir si il est possible de copier un onglet. =20
Car j'ai 2 feuille de calcule et j'aimerais que sur une=20
des feuilles soit indiquer le nom que j'ai donner a mon=20
premier onglet....exemple =20
premiere feuille l'onglet se nomme Nancy
deuxieme feuille l'onglet se nomme Factures

Je voudrais que dans ma feuille de Facture dans ma cellule=20
A8 je trouve le nom Nancy sans avoir =E0 l'=E9crire.

Merci=20
Nancy

6 réponses

Avatar
Crel
Bonjour Nancy

Sub Nom_dans_cellule()
[A8] = ActiveSheet.Name
End Sub

Cordialement.
Patrick.

"Nancy" a écrit dans le message de news:
018001c356b8$95e219e0$
Bonjour,

J'aimerais savoir si il est possible de copier un onglet.
Car j'ai 2 feuille de calcule et j'aimerais que sur une
des feuilles soit indiquer le nom que j'ai donner a mon
premier onglet....exemple
premiere feuille l'onglet se nomme Nancy
deuxieme feuille l'onglet se nomme Factures

Je voudrais que dans ma feuille de Facture dans ma cellule
A8 je trouve le nom Nancy sans avoir à l'écrire.

Merci
Nancy
Avatar
larbi benmeuraiem
bonjour,

une proposition peut etre mois elegante mais je crois qu'elle fonctionne
nn = Worksheets("facture").Index
Range("a8").Value = Sheets(nn - 1).Name

A +
"Nancy" a écrit dans le message de
news:018001c356b8$95e219e0$
Bonjour,

J'aimerais savoir si il est possible de copier un onglet.
Car j'ai 2 feuille de calcule et j'aimerais que sur une
des feuilles soit indiquer le nom que j'ai donner a mon
premier onglet....exemple
premiere feuille l'onglet se nomme Nancy
deuxieme feuille l'onglet se nomme Factures

Je voudrais que dans ma feuille de Facture dans ma cellule
A8 je trouve le nom Nancy sans avoir à l'écrire.

Merci
Nancy
Avatar
Nancy
Bonjour Patrick,

Merci pour la formule mais je n'y arrive pas....
sub veux dire quoi ?
Merci
Nancy
-----Message d'origine-----
Bonjour Nancy

Sub Nom_dans_cellule()
[A8] = ActiveSheet.Name
End Sub

Cordialement.
Patrick.

"Nancy" a écrit dans le
message de news:

018001c356b8$95e219e0$
Bonjour,

J'aimerais savoir si il est possible de copier un onglet.
Car j'ai 2 feuille de calcule et j'aimerais que sur une
des feuilles soit indiquer le nom que j'ai donner a mon
premier onglet....exemple
premiere feuille l'onglet se nomme Nancy
deuxieme feuille l'onglet se nomme Factures

Je voudrais que dans ma feuille de Facture dans ma cellule
A8 je trouve le nom Nancy sans avoir à l'écrire.

Merci
Nancy


.



Avatar
Crel
Salut Nancy, je pensais que tu voulais le faire par VBA, en fait, si j'ai
compris, tu as une feuille de calcul dans laquelle il y a une cellule A8. Tu
souhaites que le nom de l'onglet aille s'inscrire dans la cellule A8
Le nom change t-il à chaque fois ?
Patrick.


cy" a écrit dans le message de news:
03c101c356bd$03a1d110$
Bonjour Patrick,

Merci pour la formule mais je n'y arrive pas....
sub veux dire quoi ?
Merci
Nancy
-----Message d'origine-----
Bonjour Nancy

Sub Nom_dans_cellule()
[A8] = ActiveSheet.Name
End Sub

Cordialement.
Patrick.

"Nancy" a écrit dans le
message de news:

018001c356b8$95e219e0$
Bonjour,

J'aimerais savoir si il est possible de copier un onglet.
Car j'ai 2 feuille de calcule et j'aimerais que sur une
des feuilles soit indiquer le nom que j'ai donner a mon
premier onglet....exemple
premiere feuille l'onglet se nomme Nancy
deuxieme feuille l'onglet se nomme Factures

Je voudrais que dans ma feuille de Facture dans ma cellule
A8 je trouve le nom Nancy sans avoir à l'écrire.

Merci
Nancy


.



Avatar
Nancy
Re Patrick,
Exacte et non le nom ne change pas.
Nancy
-----Message d'origine-----
Salut Nancy, je pensais que tu voulais le faire par VBA,
en fait, si j'ai

compris, tu as une feuille de calcul dans laquelle il y a
une cellule A8. Tu

souhaites que le nom de l'onglet aille s'inscrire dans la
cellule A8

Le nom change t-il à chaque fois ?
Patrick.


cy" a écrit dans le message
de news:

03c101c356bd$03a1d110$
Bonjour Patrick,

Merci pour la formule mais je n'y arrive pas....
sub veux dire quoi ?
Merci
Nancy
-----Message d'origine-----
Bonjour Nancy

Sub Nom_dans_cellule()
[A8] = ActiveSheet.Name
End Sub

Cordialement.
Patrick.

"Nancy" a écrit dans le
message de news:

018001c356b8$95e219e0$
Bonjour,

J'aimerais savoir si il est possible de copier un onglet.
Car j'ai 2 feuille de calcule et j'aimerais que sur une
des feuilles soit indiquer le nom que j'ai donner a mon
premier onglet....exemple
premiere feuille l'onglet se nomme Nancy
deuxieme feuille l'onglet se nomme Factures

Je voudrais que dans ma feuille de Facture dans ma
cellule


A8 je trouve le nom Nancy sans avoir à l'écrire.

Merci
Nancy


.




.




Avatar
Crel
Ok Nancy, je t'envoie dans ta bal, un fichier.
Tu saisis le nom de l'onglet, tu enregistres, puis tu fermes ton fichier.
Lorsque tu ouvriras ton fichier, dans la cellule A8, il y aura le nom de
l'onglet.
J'ai mis la macro dans Workbook_open. C'est à dire qu'à chaque ouverture de
ton fichier, il mettra le nom de l'onglet en A8.
Cordialement.
Patrick.


"Nancy" a écrit dans le message de news:
01e201c356c0$88880130$
Re Patrick,
Exacte et non le nom ne change pas.
Nancy
-----Message d'origine-----
Salut Nancy, je pensais que tu voulais le faire par VBA,
en fait, si j'ai

compris, tu as une feuille de calcul dans laquelle il y a
une cellule A8. Tu

souhaites que le nom de l'onglet aille s'inscrire dans la
cellule A8

Le nom change t-il à chaque fois ?
Patrick.


cy" a écrit dans le message
de news:

03c101c356bd$03a1d110$
Bonjour Patrick,

Merci pour la formule mais je n'y arrive pas....
sub veux dire quoi ?
Merci
Nancy
-----Message d'origine-----
Bonjour Nancy

Sub Nom_dans_cellule()
[A8] = ActiveSheet.Name
End Sub

Cordialement.
Patrick.

"Nancy" a écrit dans le
message de news:

018001c356b8$95e219e0$
Bonjour,

J'aimerais savoir si il est possible de copier un onglet.
Car j'ai 2 feuille de calcule et j'aimerais que sur une
des feuilles soit indiquer le nom que j'ai donner a mon
premier onglet....exemple
premiere feuille l'onglet se nomme Nancy
deuxieme feuille l'onglet se nomme Factures

Je voudrais que dans ma feuille de Facture dans ma
cellule


A8 je trouve le nom Nancy sans avoir à l'écrire.

Merci
Nancy


.




.