Discussion :

[phoon]

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

Code :

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

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

CIF = 123
Test = 23

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

[gFZT82]

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 :

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

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

Cordialement.