Bonjour à tous,

J’ai un souci avec une procédure qui me génère une erreur 1004. En revanche au pas à pas ça passe sans problème.

Je souhaite mettre à jour deux champs nommés à la fermeture du fichier.
Pour ce faire, je lance la procédure suivante à la fermeture

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
Public Sub Update()
    	ActiveWorkbook.Names.Add Name:="Liste_1", RefersToR1C1:="='[Macros_Support.xla]Feuil1'!R1C2:R1C5"
   	ActiveWorkbook.Names.Add Name:="Liste_2", RefersToR1C1:="=OFFSET('[Macros_Support.xla]Feuil1!R1C1,1,MATCH(Option!R1C1, Liste_1,0),OFFSET('[Macros_Support.xla]Feuil1!R10C1,0,MATCH(Option!R1C1,Liste_1,0),1,1),1)"
End Sub
A la fermeture, VBA bloque sur le deuxième nom (erreur 1004). Une petite pression sur F8 et ça passe.

J’ai essayé plusieurs modifications qui n’ont rien solutionnées ; j’ai même essayé de mettre une pose de 10sec, juste après l’assignation du premier nom, sans succès.

Es-ce que quelqu’un a des idées sur la cause de cette erreur 1004.
Je sèche complètement

Merci d’avance