Recherche sur excel ac VBA
babeth
-
Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention -
Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je débute avec Visual Basique et j'ai probleme
je ne sais pas comment creer une fonction qui puisse compter combien de fois une valeure revient dans un tableau excel
Je débute avec Visual Basique et j'ai probleme
je ne sais pas comment creer une fonction qui puisse compter combien de fois une valeure revient dans un tableau excel
A voir également:
- Recherche sur excel ac VBA
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Comment trier par ordre alphabétique sur excel - Guide
- Comment calculer la moyenne sur excel - Guide
1 réponse
Salut,
Cidessous une formule à saisir directement dans une cellule dans ta feuille de calcul. Compte tous les 5 dans la plage B1 à E500
=NB.SI(B1:E500;5)
En VBA ici recherche 5 dans plage A1 à B1000
Sub compte_cellule()
Range("A1").Select
Set plage = Range(ActiveCell.Offset(1000, 1), ActiveCell.Offset(0, 0))
n = 0
For Each cel In plage
If cel = 5 Then
n = n + 1 'compteur
End If
Next
If n > 0 Then
MsgBox "Il y a " & n & " cellules contenant 5."
Else
If n = 0 Then
End If
End If
End Sub
A+
__________________________________________________________________________
Vous cherchiez de l’aide. Les membres du forum, bénévolement étaient à vos côtés.
Ayez la gentillesse de nous dire si votre problème est résolu. Afin de classer la
Demande.
Cidessous une formule à saisir directement dans une cellule dans ta feuille de calcul. Compte tous les 5 dans la plage B1 à E500
=NB.SI(B1:E500;5)
En VBA ici recherche 5 dans plage A1 à B1000
Sub compte_cellule()
Range("A1").Select
Set plage = Range(ActiveCell.Offset(1000, 1), ActiveCell.Offset(0, 0))
n = 0
For Each cel In plage
If cel = 5 Then
n = n + 1 'compteur
End If
Next
If n > 0 Then
MsgBox "Il y a " & n & " cellules contenant 5."
Else
If n = 0 Then
End If
End If
End Sub
A+
__________________________________________________________________________
Vous cherchiez de l’aide. Les membres du forum, bénévolement étaient à vos côtés.
Ayez la gentillesse de nous dire si votre problème est résolu. Afin de classer la
Demande.