Compter le nombre de cellules identiques d'une colonne sur un msflexgrid
Bonjours,
je voudrais faire des opérations d'addition sur les colonnes d'un un msflexgrid .pour ce qui est du contenu numérique ça passe bien .
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| 'nombre cellule
Dim kount As Integer
Dim X As Integer
Text5.Text = "0"
For X = 1 To msfg1.Rows - 1
msfg1row = X
msfg1.Col = 0
If Trim(msfg1.Text) <> "" Then kount = kount + 1
Text5.Text = kount
Next X
'ADDITION CONTENU NUMERIQUE
Dim som As Long
Dim i As Integer
For i = 1 To msfg1.Rows - 1
som = som + CStr(msfg1.TextMatrix(i, 6))
Next i
Text6.Text = som |
mais j'ai un problème sur une colonne qui affiche des donnée texte (une seule lettre :A,B,C)
comment additionné les A , les B et les C et afficher leurs nombre sur un textbox.
Merci de votre aide a l'avance.
