IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Probleme - données filtrées VBA


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Mai 2018
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2018
    Messages : 2
    Par défaut Probleme - données filtrées VBA
    Bonjour les amis,

    J'ai un réel problème aujourd'hui, et j'ai besoin de votre aide.
    Je cherche à créer un programme qui calculerait automatiquement un taux de réussite basé sur un score (100) basé sur plusieurs critères.

    Mais le problème, c'est que mes données sont filtrées avec une dizaine de colonnes dans Excel et du coup, mon programme sur VBA prend en compte toute les données, et pas seulement les données filtrées comme je le souhaiterez.
    Il sélectionne la totalité, c'est a dire environ 300 données au lieu d'une centaine ou vingtaine qui sont filtrées.

    Quelqu'un aurait une solution s'il vous plait ?
    En vous remerciant d'avance.

    Voici ma macro :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    Sub liste1()
     
    Dim L As Variant
     Dim compteur As Variant
     Dim Total As Variant
     Dim Bon As Variant
     
    compteur = 0
     L = 1
     
    While Cells(L, 12).Value <> ""
     
     If Subtotal(Cells(L, 12) = 100) Then
     compteur = compteur + 1
     Else
     compteur = compteur
     
     End If
     
     L = L + 1
     
    Wend
     
    Cells(2, 16).Value = compteur
     Bon = Cells(2, 16).Value
     
    compteur = 0
     L = 2
     
    While Cells(L, 12).Value <> ""
     
     compteur = compteur + 1
     L = L + 1
     
    Wend
     
    Cells(4, 16).Value = compteur
     Total = Cells(4, 16).Value
     
    Cells(1, 16).Value = Bon / Total
     
     
    End Sub

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Il suffit de vérifier la propriété Hidden de la ligne :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If Not Rows(L).Hidden Then
    https://msdn.microsoft.com/fr-fr/VBA...property-excel

  3. #3
    Nouveau candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    Mai 2018
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2018
    Messages : 2
    Par défaut
    Bonjour,
    A quel moment dans ma macro je dois introduire cela ?

Discussions similaires

  1. Probleme de mise en relations données excel / VBA
    Par folledebrune dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 07/09/2012, 10h48
  2. [AC-2000] Probleme d'insertion de données en VBA
    Par Tydher dans le forum VBA Access
    Réponses: 8
    Dernier message: 25/05/2011, 11h09
  3. probleme copier coller de cellules filtrées vba
    Par nicola13 dans le forum Excel
    Réponses: 1
    Dernier message: 06/04/2009, 14h36
  4. [VBA-E] Probleme avec filtre
    Par ekynoxx dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 26/04/2007, 10h32
  5. Probleme de filtre dans bdd
    Par scorpiwolf dans le forum C++Builder
    Réponses: 2
    Dernier message: 04/06/2002, 10h43

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo