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 :

Classer en masquant les lignes vides


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Octobre 2008
    Messages
    211
    Détails du profil
    Informations personnelles :
    Âge : 57
    Localisation : France

    Informations forums :
    Inscription : Octobre 2008
    Messages : 211
    Par défaut Classer en masquant les lignes vides
    bonjour le forum,

    Voila j'ai un tableau qui est commence à la ligne A4 et se fini à la ligne A26.
    Il est rempli de la ligne A4 à la ligne A13 et est classer par macro qui s'appellent CLasserAgilité et ClasserGénéral.
    Ma question est , est-il possible de masquer les lignes non rempli en ajoutant le code à l'une ou l'autre macro ou bien au 2.
    Je vous joins le fichier
    merci
    jacky

  2. #2
    Membre Expert
    Avatar de JackOuYA
    Inscrit en
    Juin 2008
    Messages
    1 040
    Détails du profil
    Informations forums :
    Inscription : Juin 2008
    Messages : 1 040
    Par défaut
    Bonjour

    vu que tu n'as pas beaucoup de cellule, si

    les lignes non rempli
    sont les lignes comprises dans la plage 4:26 et dont la colonne A est vide, tu peu parcourir cette plage et masquer les lignes correspondante :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Sub yaMasque()
      Dim yaC As Range
      For Each yaC In ThisWorkbook.Sheets("Feuil1").Range("A4:A26")
         If IsEmpty(yaC) Then yaC.EntireRow.Hidden = True
      Next
    End Sub
    à toi de voir dans laquelle de tes 2 procédure faire appel à yaMasque, pense à modifier le nom de la feuille "Feuil1" si nécessaire


    tu dis quoi ...

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Octobre 2008
    Messages
    211
    Détails du profil
    Informations personnelles :
    Âge : 57
    Localisation : France

    Informations forums :
    Inscription : Octobre 2008
    Messages : 211
    Par défaut
    re le forum,JackOuYA,

    Ou doit je mettre le code dans ma macro Agilité car j'ai essayé mais ça me met une erreure de compilation.
    merci

  4. #4
    Membre Expert
    Avatar de JackOuYA
    Inscrit en
    Juin 2008
    Messages
    1 040
    Détails du profil
    Informations forums :
    Inscription : Juin 2008
    Messages : 1 040
    Par défaut
    dans ta macro (que j'ai pas vu) tu ne met pas le code tu met juste l'appel :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    sub Agilite
    ....
     
    yaMasque
    End sub
     
    sub yaMasque()
      Dim yaC As Range
      For Each yaC In ThisWorkbook.Sheets("Feuil1").Range("A4:A26")
         If IsEmpty(yaC) Then yaC.EntireRow.Hidden = True
      Next
    End Sub
    si cela ne marche pas montre nous (sur le forum) ta macro agilité et la façon dont elle appelle yaMasque ..

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Octobre 2008
    Messages
    211
    Détails du profil
    Informations personnelles :
    Âge : 57
    Localisation : France

    Informations forums :
    Inscription : Octobre 2008
    Messages : 211
    Par défaut
    re le forum, JackOuYA,

    merci beaucoup JackOuYA, cela fonctionne impeccable.
    jacky

  6. #6
    Membre confirmé
    Profil pro
    Inscrit en
    Octobre 2008
    Messages
    211
    Détails du profil
    Informations personnelles :
    Âge : 57
    Localisation : France

    Informations forums :
    Inscription : Octobre 2008
    Messages : 211
    Par défaut
    re,le forum,

    Donc comme je disais avant , cela fonctionne impeccable, mais Je voulais savoir si il y avait un moyen de contourner le problème qui vient de me survenir.
    Je m'explique, j'ai voulu vérrouillé toutes les cellules ou il y avait des formules pour que personne ne puissent involontairement les supprimer mais la :
    OUPS problème, la macro pour trier fonctionne mais elle bug au momment de masquer les cellules vides.
    je ne sais pas s'il y a une solution mais des fois que !!!
    merci d'avance.
    jacky

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Supprimer les lignes vides d'un document Word
    Par Jerfa dans le forum VBA Word
    Réponses: 4
    Dernier message: 28/08/2006, 16h12
  2. Réponses: 2
    Dernier message: 04/05/2006, 13h10
  3. [Sqlldr] Ignorer les lignes vides
    Par hubsm dans le forum SQL
    Réponses: 1
    Dernier message: 27/02/2006, 15h03
  4. supprimer les lignes vides?
    Par VinnieMc dans le forum Langage
    Réponses: 5
    Dernier message: 27/02/2006, 14h01
  5. effacer les lignes vides
    Par Samanta dans le forum Format d'échange (XML, JSON...)
    Réponses: 12
    Dernier message: 30/06/2005, 17h02

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