récupérer le "nom" de la feuille

[casimir]

Bonjour à tous,

Je travaille sur une macro qui insére une feuille avec des boutons et à ses boutons sont rattachées des macros. Or quand je remets à jour les liens du fichier, le bouton pointe sur une macro avec 'nom du fichier + nom de la macro' et ne trouve donc pas la macro.

Une solution pour moi est de re-assigner la bonne macro au bon bouton, mais pour cela, VBA me demande (??) de donner le numero de la feuille (genre 'sheet 12') et non pas le nom (par exemple, ma 'sheet 12' a pour nom 'parametre'). Comment puis je récupérer ce numéro de feuille quand celle ci correspond à 'parametre'?

Peut-^tre n'ais je pas pris le pb par le bon bout aussi?

Merci à vous

Casimir

 

[Marc_du_78]

Bonjour casimir, le Forum,

Sub NomFeuille()
On Error GoTo erreur
ActiveSheet.Name = Range('A1')
Exit Sub
erreur:
MsgBox 'La cellule [ A1 ] ne doit pas être vide où contenir des caractères interdits.'
End Sub

Par VBA
Dès un double clic dans une cellule, une fenetre apparait avec la liste des onglets.

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Cancel = True
Application.CommandBars('Workbook tabs').ShowPopup
End Sub

Mes salutations