Discussion :

[gm2759]

Bonjour

Dans la cellule B5 de Sheet1, j'ai une formule contenant ([Éle.xls]PN!$C$5).
Comment faire dans une macro pour modifier uniquement $5 et le passer en $6 ou $20 dans la même cellule selon que dans une autre cellule, j'aurais codifié A pour 5, B pour 6..., F pour 10,..., P pour 20 ?
Je débute...!
Merci à tout le monde par avance.

[Gorfael]

Salut gm2759 et le forum
Sous Excel, le $ symbolise l'adressage absolu en n'est intéressant que pour les histoire de recopie. Si c'est dans une seule cellule, l'adressage relatif ou absolu donne la même valeur.
Pour ton instruction, tant que la cellule fournissant la ligne ne comporte qu'une lettre (si elle en comporte plus d'une, seule la première sera utiliser)., on va dire que c'est la cellule A1

Code :

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

1
2
Sheets("Sheet1").Range("B5").FormulaLocal = "=([Éle.xls]PN!$C$" & _
               Asc(UCase(Sheets("Sheet1").Range("A1"))) & ")"

Mais sans plus de précision...
A+