Utilisation de FormulaR1C1

Bonjour
Je cherche à coller dans une cellule un texte et une formule.
Avec ce code :

Code:

---

ActiveCell.FormulaR1C1 = "=""CIF : "" & COUNTA(R[1]C[-1]:R[999]C[-1])"

---

j'obtient : Cif = 123 qui correspond au nombre qu'il y de la colonne pour les lignes de 1 à 999.

Maintenant j'aimerait rajouter du texte et d'autre formule (par exemple, la valeur de la cellule b23, dans la même cellule, mais à la ligne :

Exemple du contenu de la cellule

Citation:

---

CIF = 123
Test = 23

---

J'y arrive pas.
Si vous avez la solution. merci

Bonjour,

Voici la formule pour placer dans la cellule active D1 la formule qui affiche le nombre de lignes renseignées de la colonne A et celui de la colonne B, suivant la forme demandée.

Code:

---

ActiveCell.FormulaR1C1 = "=""CIF : "" & COUNTA(RC[-3]:R[999]C[-3]) & CHAR(10) & ""Test : "" & COUNTA(RC[-2]:R[999]C[-2])"

---

Cordialement.