Conversion et style de référence

Bonjour,

Savez-vous s'il existe en VBA Excel une fonction qui peut transforme une référence de type L1C1 en A1 ?

Actuellement, pour faire ces conversions, j'utilise dans mon code des jonglages du style :

Code:

---

1 2 3

Range("A1").AddressLocal(True, True, xlR1C1) Range("A1").Address(True, True, xlR1C1) Cells(1, 1).Address(True, True, xlA1)

---

Mais ce serait plus propre s'il était possible de faire ça avec une fonction.
J'ai fouillé dans l'aide VBA (mais elle est moins pratique pour les fonctions que pour les objets) sans succès.

Savez-vous si une telle fonction existe ?

Merci d'avance.

Bonjour Menhir,

Code:

---

1 2 3 4 5 6 7 8 9

Sub Macro1() ' ' Macro1 Macro '   ' Application.ReferenceStyle = xlR1C1 Application.ReferenceStyle = xlA1 End Sub

---

Bonjour rdurupt et merci pour cette réponse.

Mais c'est justement ce que je cherche à éviter.
Mes utilisateurs ont leur petites manies : certains préfèrent les références en A1, d'autres en L1C1. Et pas question de les perturber.
Ou alors, il faudrait, en fin de macro, rétablir l'option d'origine en espérant qu'il n'y ait pas d'intéruption.

J'ai utilisé l'objet ReferenceStyle pour savoir quelle est le mode utilisé par l'utilisateur et je voulais que la macro adapte les formules introduites.

Pour les numéros de ligne, ce n'est pas un problème mais avec les colonnes (surtout si elles dépassent Z, ça devient galère).
D'où ma question.

Mais je me doute bien qu'il y a 90% de chance que ça n'existe pas.

Bonjour,

ça par exemple :

Code:

---

ref = Application.ConvertFormula(Formula:="A1", fromReferenceStyle:=xlA1, toReferenceStyle:=xlR1C1)

---

Bien sur tu peux mettre une formule plus complète comme "=somme(A1:A2)+C3"

eric

C'est exactement ça ! :D

Je me doutais bien que ça pouvait difficilement être une fonction VBA ou une fonction Excel de VBA. Je n'aurais pas imaginé qu'un objet fasse ça.

Merci beaucoup.