[AC-2003] Boucle afin de déterminer la présence d'un élèment dans une colonne

[mploki]

Bonjour,

J'ai deux colonnes,

la première est une colonne contenant des élèments que je doit avoir
La seconde contient les élèments que je possède et donc correspond à certains élèment que je devrais avoir...

Ce que je souhaite faire c'est une boucle qui regarde si j'ai du texte ds la colonne "élèments que j'ai" et qui incremente un conteur à chaque fois qu'il trouve une ligne qui comporte du texte.

A la fin il me sort le rapport: élèment que j'ai / élèment que je dois avoir

Etant une quiche en VBA (voire en prog tout court), je désire un peu d'aide!

Merci

[mploki]

Code :

1
2
3
4
5
6
Dim Cpt as Variant
For i = 0 To 21
If [Forms]![Formulaire_Detail_Fourn]![LDRS_Doc]!Range("i:3") <> "" Then
Cpt = Cpt + 1
End If
Next i

Comment faire pour qu'il parcourt l'ensemble des 21 lignes de la colonne 3 de ma zone de liste?

J'aimerai ensuite pouvoir afficher la valeur "Cpt" dans une zone de texte, du genre:

[Forms]![Formulaire_Detail_Fourn]![Pourcentage_Texte] = Cpt & "/21"

Merci de vos futurs conseils

[marsouin_89]

Bonsoir Mploki,

Je me trompe ou Range (i:3) est du Excel.
Si c'est la cas, je penses que ton code n'est pas bon. Range(i & ":3") ou quleque chose dans le genre (j'utilise rarement Excel en code VBA, désolé).

Si tu es sous access, fais une requête regroupement en définissant Compte comme Opération. Tu auras alors le total de chaque texte de ta colonne.

Cordialement

Christophe

[Philippe JOCHMANS]

Bonjour

Que nommes-tu colonne ? Un formulaire en mode feuille de données ?
Comment est-il alimenté ?

Philippe