macro VBA excel nommer une cellule

[bernard_daniel_1950]

Dans une macro, je veux donner un nom à une cellule donnée, à savoir celle où je suis au lancement de la macro.

si je laisse "range", avec des références absolues, la macro fonctionne, mais une seule fois. Le nom choisi disparait de la liste de la feuille, mais est toujours présent dans les noms de "formule-gestionnaire de noms".

voici ce que j'ai écrit, qui ne fonctionne pas:

ActiveWorkbook.Names.Add Name:="horo4", RefersToR1C1:=ActiveCell.Address

Merci de m'aider!

[#2]

@HansVogelaar 

Bonsoir,

dans la macro suivante:

----------------------

Sub reporcartes()
'
' reporcartes Macro
'

'
Range("AG2").Select
ActiveCell.FormulaR1C1 = _
"='C:\Users\bernd\OneDrive\Desktop\Maison\[acredit m.xlsx]CB 36048 00010074603 # 062024'!R[2]C[-32]"
Selection.Copy
Range("AG4:AI91").Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Range("AG2").Select
Application.CutCopyMode = False
End Sub

------------------

est il possible de donner à la valeur 06024 celle d'une cellule  de la feuille?

D'avance merci!

[#3]

@bernard_daniel_1950 

Bien sûr, par exemple changez

Range("AG2").Select
ActiveCell.FormulaR1C1 = _
"='C:\Users\bernd\OneDrive\Desktop\Maison\[acredit m.xlsx]CB 36048 00010074603 # 062024'!R[2]C[-32]"

à

Range("AG2").FormulaR1C1 = _
"='C:\Users\bernd\OneDrive\Desktop\Maison\[acredit m.xlsx]CB 36048 00010074603 # " & Range("Z50").Value & "'!R[2]C[-32]"

Z50 est la cellule contenant la valeur.

[#4]

Une fois de plus: merci!

[#5]

@HansVogelaar 

Bonsoir,

Me revoilà…

J’ai un souci avec l’instruction : options de sauvegarde.

Elle ouvre une userform dans laquelle il y a une liste déroulante de dates.

Quel que soit le choix, la date retenue est toujours la première dans la macro « recupsauv ».

Où est l’erreur ?

Je vous transmets le fichier (sosdecalogy).

Merci d’avance pour votre aide !

1. DANIEL

[#6]

@bernard_daniel_1950 

Désolé, mais je ne comprends pas recupsauv du tout.