nom de feuille et onglet

[lolo5555fr]

Bonjour ,
Et bravo pour la nouvelle interface du site.

Ensuite comme beaucoup j'ai un prbleme , j'ai cherché sur le forum mais je n'ai pas trouvé ce que je cherchais .
Je veux afficher le nom de ma feuille dans une cellule.
J'ai tenté un truc du genre
range('H11') = ActiveSheet.Name mais ça ne fonctionne pas ...
merci d'avance de pour votre aide .

 

[Temjeh]

Bonjour lolo

Chez moi ca fonctionne très bien

Sub Macro1()
Range('H11') = ActiveSheet.Name
End Sub

Ceci est du VBA pas une formule à mettre dans les cells donc dans un code à exécuté comme macro ou sous bouton

A++

Temjeh

 

[ChTi160]

Salut'lolo5555fr'
je pense qu'en passant par lévênement workbook_open
Private Sub Workbook_Open()[/]
Dim ws As Worksheet ' ws variable qui représente une feuille
Set ws = Worksheets('Feuil1')'je donne à cette variable sa valeur
ws.Range('A1') = ws.Name'dans la cellule A1 de cette feuille je mets le nom de cette feuille
End Sub
une solution
A+++
Jean Marie

 

[ChTi160]

Oups Salut 'Temjeh
je n'ai pas raffraichi
A+++
Jean Marie

 

[lolo5555fr]

Merci à vous tous.....
Je regarde ça de suite....

 

[lolo5555fr]

vous avez raison.........
Je ne sais pas ce que j'ai fait mais
Range('H11') = ActiveSheet.Name
Ca fonctionne.....
Je pense qu'elle provoqué un BUG avec le reste du code
Encore merci
@+
Bruno.......