Discussion :

[Daejung]

Bonjour,

Comment remplacer, pour toute une feuille ou un classeur Excel, les références de type L1C1 par les noms de cellules, quand ils existent?

J'ai nommé des cellules et voudrais mettre à jour les formules des cellules dépendantes sans avoir à les éditer une à une.

Merci

[Didier Gonard]

Bonjour,

Tu donnes trop de détails…heureusement qu'on aime les devinettes

On peut imaginer un truc du genre :

Tu fais une macro équivalente à édition, atteindre, cellules pour déterminer les cellules où formules il y a.
Ensuite dans cette plage, tu fais une autre macro pour chaque cellule du genre édition, atteindre, cellules, antécédents.

Et après c'est du traitement de chaînes de caractère genre :
en D12 , on a = A6*5
A6 a pour nom : Asix

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub StringGame()
   Cells(12, 4).DirectPrecedents.Select
   toto = Selection.Name.Name
   tutu = Selection.Address(RowAbsolute:=False, ColumnAbsolute:=False)
   zozo = Cells(12, 4).FormulaLocal
   Cells(12, 4).FormulaLocal = Replace(zozo, tutu, toto)
End Sub

cordialement,

Didier

[Daejung]

Je me souviens d'avoir acheté il y a de nombreuses années un ouvrage de Microsoft "Les recettes d'Excel" auquel était jointe une disquette de macros dont une qui macro complémentaire qui faisait cela.

Malheureusement je n'ai pas conservé la disquette ni l'ouvrage