Définir une macro XL4 avec raccourci automatiquement

[MJ13]

Bonjour à tous

Je refais mon planning de l'année mais je veux récupérer des macros de type XL4 qui me servent encore. J'ai une liste et je voudrais les redéfinir avec une macro. J'ai réussi à moitié. Il me manque à intégrer automatiquement la référence(Voir fichier joint).

En fait: c'est comment dans la macro Definir_nom paramétrer "=Macro1!R2C1" car j'en ai plusieurs:

RefersToR1C1:="=Macro1!R2C1"

Merci d'avance 🙂

 

[MJ13]

Re : Définir une macro XL4 avec raccourci automatiquement

Re

Bon, j'ai peut être trouvé: voici la solution sur XL2007 🙂:

Sub definir_nomtest()
        ActiveWorkbook.Names(ActiveCell.Offset(0, -2).Value).Delete
  ActiveWorkbook.Names.Add Name:=ActiveCell.Offset(0, -2), RefersTo:=ActiveCell.Offset(0, -1).Value, _
        Category:="User Defined", MacroType:=xlCommand, ShortcutKey:=ActiveCell
End Sub