hello !
je vais essayer d'être clair ...
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:
Code :
- 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
|
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 LE DEUXIEME PAGE
J'ai essayer :
Code :
- Sheets("ma feuille 2" ).Cells(L1, C1).FormulaR1C1 = "=COUNTIF('ma feuille 1'!RC:RC30,""popo"" )"
|
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:
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
Merci Beucoup pour celui ou celle qui m'aideras !!!
j'espere avoir été clair