formule VBA arrive po :(

[Laguiz]

hello !

je vais essayer d'être clair ... :ange:

je travaille sur 2 feuilles

Premiere Feuille :

Plage defini par une recherche (donc aleatoire) ex : C3:C30 ou F3:F30
J'arrive a selectionner ma plage aleatoire celon ma recherche
j'arrive egalement a definir les coordonnée des 2 cellule extreme en valeur (1,2,3,...)
Ma recherche a partir de ma feuille 2 (pas de prob)

Prob : je cherche a compter le nombre de "popo" de la plage (feuille1) et le resultat s'affiche sur la feuille 2 -> en VBA !

Voici le code ou j'arrive a selectionner ma plage:

[cpp]
L1 = ActiveCell.Row
C1 = ActiveCell.Column

ActiveCell.Offset(0, -2).Activate 'critere de recherche

With Sheets("ma feuille 1").Range("A5:A31")
Set m = .Find(ActiveCell.Value) 'je fait ma recherche
Sheets("ma feuille 1").Select 'je selectionne ma feuille 1 ou se trouve ma plage
m.Select 'je selectionne se que j'ai trouver
End With
Selection.Offset(0, 3).Activate 'active la premiere cellule de ma plage
C2 = ActiveCell.Column 'je prend les reff
L2 = ActiveCell.Row 'idem

Selection.Offset(0, 30).Activate 'active la derniere cellule de ma plage

C3 = ActiveCell.Column 'je prend les reff
L3 = ActiveCell.Row 'idem


Range(Cells(L2, C2), Cells(L3, C3)).Select[/cpp]

Ca sa marche

J'aimerais qu'au lieu de selectionner cette plage je compte le nombre de "popo" qu'elle contient et mettre se nombre SUR [g]LE DEUXIEME PAGE[/g]

J'ai essayer :
[cpp]
Sheets("ma feuille 2").Cells(L1, C1).FormulaR1C1 = "=COUNTIF('ma feuille 1'!RC:RC30,""popo"")"
[/cpp]

Probleme ==> RC:RC30 (le deplacement) part de la cellule de la feuille 2 et non a ma cellule active que j'ai chercher en feuille 1 donc...


Explication simplifier autre exemple:
[g]FEUILLE 1[/g]
Colonne A Colonne B Colonne C Colonne D
david popo popo
marc popo
olivia popo popo popo

[g]FEUILLE 2[/g]
Colonne A Colonne B colonne C
rien marc 1
olivia 3
David 2

Colonne C le resultat

Merci Beucoup pour celui ou celle qui m'aideras !!!
j'espere avoir été clair

 

[Laguiz]

les explication simplifier est pas cool les esapce son suprimer .. lol
je refait ici
Feuille 1 :
Colonne A (Davide;Marc;Olivia)
Colonne B (popo;"";popo)
Colonne C ("";popo;popo)
Colonne D (popo;"";popo)

Feuille 2 :
Colonne A ("")
Colonne B (marc;olivia;david)
Colonne C (1;3;2)

Resultat Colonne C

 

[laguiz]

HELP PLEASE !!

 

[laguiz]

pas tres vivant le forum ... :-/

 

[laguiz]

pas tres vivant le forum ... :-/