Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2613 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA][Excel] Nombre de champs differents dans une colonne

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA][Excel] Nombre de champs differents dans une colonne

n°1334352
vinc35
Posté le 29-03-2006 à 09:12:35  profilanswer
 

Bonjour,
 
Pour une application sous Excel, je dois connaitre le nombre de champs differents que comprends une colonne
les données sont sous la forme :
 
Produit 1
Produit 1  
Produit 2
Produit 3
Produit 1
Produit 2
...
 
Il s'agit pour moi de connaitre dans cette colonne le nombre de produits differents.
 
Je sais le faire via une boucle dans laquelle je compare le nom du produit aux produits precedemment trouvés, mais je voulais savoir s'il y avait une fonction plus simple, intégrée a Excel. En gros une fonction qui retourne le nombre de champs differents d'une colonne.
 
Merci

mood
Publicité
Posté le 29-03-2006 à 09:12:35  profilanswer
 

n°1339396
vinc35
Posté le 05-04-2006 à 09:00:55  profilanswer
 

petit up, si quelqu'un a des pistes a ce sujet

n°1339948
juju2k
Posté le 05-04-2006 à 18:51:27  profilanswer
 

Moi ça me dit rien...
 
(up déguisé ;) )

n°1344083
vinc35
Posté le 11-04-2006 à 14:01:39  profilanswer
 

J'ai utilisé une petite fonction :
 
Private Function NbChampsDiff() As Integer
'Recuperation du nombre de ligne dans Nb_lignes
Nb_Lignes = Range("B65536" ).End(xlUp).Row
'Tri selon la colonne
Columns("D:D" ).Select
Selection.Sort Key1:=Range("A:A" ), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
'Compteur
Compar = 0
Count = 0
New_Compar = 0
For i = 1 To Nb_Lignes
    New_Compar = Cells(i, 4)
    If New_Compar <> Compar Then Count = Count + 1
    Compar = New_Compar
Next
NbChampsDiff = Count
End Function
 
Je tri la ligne a traiter, puis je compte les champs differents


Message édité par vinc35 le 11-04-2006 à 14:02:23

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA][Excel] Nombre de champs differents dans une colonne

 

Sujets relatifs
[résolu][VBA]Afficher mon document Word[SQL] récupérer l'intitulé d'un champs
[VBA][Excel][Resolu]Connaitre le nombre de ligne d'une colonne[VBA] [Résolu] Liste de choix
afficher le calendrier pour remplir un champs texte avec une dateTableau a 2 entrées et condition sous excel
Excel gestion stock inventaire 
Plus de sujets relatifs à : [VBA][Excel] Nombre de champs differents dans une colonne


Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)