Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Fonction VBA utilisant Countif sur un tableau structuré

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
V

Villard17

XLDnaute Nouveau
Bonjour
J'essaie de créer une fonction personnalisée qui utilise Countif sur un tableau structuré, mais je n'arrive pas à trouver la bonne syntaxe
J'ai d'abord écrit
VB: 
Function Occupation(Colonne As Range , Nom as String)
       Occupation = Application.WorksheetFunction.CountIf(Colonne, Nom)
End Function

je veux l'appliquer à une colonne d'un tableau structuré Tableau1 une cellule A1 contenant le nom "DUPONT"
=Occupation(Tableau1[Nom];A1)
Le résultat est #VALEUR

Dans une macro, le code suivant fonctionne mais je n'arrive pas à le mettre dans une Function !
VB: 
[CODE]Sub Macrotest()
Range("G29").Select
Colonne = "Tableau1[Nom]"
 ActiveCell.Value = Application.WorksheetFunction.CountIf(Range(Colonne), "DUPONT")
End Sub
[/CODE]


Merci pour votre aide
 
Trier par date Trier par votes
Bonsoir.
Je ne perçoit pas l'intérêt de cette fonction par rapport à =NB.SI(Tableau1[Nom];A1)
et je ne vois néanmoins par pourquoi elle ne fonctionne pas.
Joignez un fichier peut être ?
 
Vote positif 0 Vote négatif
Bonsoir à tous,

Sans parler de l’intérêt que je ne vois pas trop non plus, une fonction pour le F U N.

NBSI(UneCellTablo, NomOuNumCol, Valeur) où :
  1. UneCellTablo est une référence à une cellule du tableau structuré (n'importe laquelle)
  2. NomOuNumCol est soit le nom de la colonne (en-tête) soit son numéro
  3. Valeur est la valeur dont on compte les occurrences
Le code est dans module1 :
VB: 
Function NBSI(UneCellTablo As Range, NomOuNumCol, Valeur)
   On Error Resume Next
   NBSI = CVErr(xlErrRef)
   NBSI = Application.CountIf(UneCellTablo.ListObject.ListColumns(NomOuNumCol).Range, Valeur)
End Function

On peut utiliser la fonction soit dans une feuille excel soit en VBA.
 

Pièces jointes

Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Résolu(e)
XL 2010 Lire total colonne Tb structuré
Réponses
5
Affichages
324
cathodique
I
  • Résolu(e)
Microsoft 365 Redimensionner un tableau structuré Excel en VBA
Réponses
11
Affichages
860
iliess
I
I
  • Résolu(e)
Microsoft 365 Placer un tableau VBA dans un tableau structuré Excel
Réponses
14
Affichages
553
mapomme
  • Question Question
Microsoft 365 Tester l'existence d'un filtre dans un tableau structuré
2
Réponses
19
Affichages
1 K
TooFatBoy
EXCEL :: VBA :: Activer - Désactiver les filtres dans un tableau en plage d'adresses ou dans un tableau structuré
Réponses
0
Affichages
204
oguruma
N
  • Résolu(e)
Microsoft 365 Supprimer de la liste d'une Combo les données déjà présentes dans une colonne d'un TS
2
Réponses
18
Affichages
737
NONO14
N
C
  • Résolu(e)
XL 2016 VBA : inversion de Date sur Range.Resize ... = Tableau après Transpose du Tableau
Réponses
2
Affichages
247
crocrocro
C
Y
  • Question Question
Microsoft 365 récupérer données de tableau structuré sur une plage
Réponses
2
Affichages
586
jpb388
T
  • Résolu(e)
XL 2019 Filtrer certains champs au démarrage avec vba
2
Réponses
15
Affichages
488
telemarrk
T
  • Question Question
XL 2016 XLS - Comment déterminer les zones présentent au niveau d'une cellule ?
Réponses
2
Affichages
202
Lu76Fer
A
  • Question Question
VBA qui fonctionnait avant, mais ne fonctionne plus avec le 64 bits
Réponses
2
Affichages
347
patricktoulon
B
  • Question Question
XL 2021 Transfert tableau structuré EXCEL à un endroit précis de WORD
Réponses
8
Affichages
1 K
job75
EXCEL :: Les Tableaux Structurés :: Une classe VBA - V1.05 - Evolutions majeures exports CSV, XML, XML UTF-8, JSON, HTML, PDF, JPG, JPEG, BMP, EXCEL
Réponses
10
Affichages
418
oguruma
EXCEL :: VBA :: Barre de progression via un graphique cylindrique, cubique, aquarium, donuts et shape
Réponses
0
Affichages
312
oguruma
S
  • Résolu(e)
XL 2016 Comment faire ressortir la ligne sélectionnée dans un tableau
Réponses
2
Affichages
564
Stéphane_1
S
R
  • Résolu(e)
XL 2016 Supprimer une ligne d'un tableau structuré
Réponses
2
Affichages
1 K
ReneDav14000
R
Office XLS : Fonction simplifiant l'utilisation de la fenêtre FileDialog
Réponses
6
Affichages
328
Lu76Fer
S
  • Question Question
XL 2019 fonctions COUNTIF and COUNTIFS sur une plage de données filtrée en vba
Réponses
2
Affichages
1 K
Hasco
T
  • Résolu(e)
Microsoft 365 Insérer une image DANS une cellule
Réponses
12
Affichages
1 K
Thomi
T
D
  • Question Question
XL 2013 envoie tableau dans corp du mail vba
2
Réponses
26
Affichages
2 K
David62800
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…