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 :

Masquer cellule sans masquer la ligne complète


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau Candidat au Club
    Homme Profil pro
    Apprenti technicien méthodes
    Inscrit en
    mars 2021
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 22
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Apprenti technicien méthodes

    Informations forums :
    Inscription : mars 2021
    Messages : 1
    Points : 1
    Points
    1
    Par défaut Masquer cellule sans masquer la ligne complète
    Bonjour à tous,

    Je suis débutant en VBA, j'aurais besoin de masquer des cellules sans masquer la ligne.
    Pour le moment je n'ai trouvé que la fonction Delete pour répondre à mon besoins, cependant cela n'est pas pratique...
    Je ne peux pas masquer la ligne car sinon les tableaux à coté se masque aussi...

    En espérant que vous aurez une solution à mon problème !

    Voici mon code :
    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
    44
    45
    46
    47
    48
    Sub PasAfficherStock0()
     
    Application.EnableEvents = False 'empêche éxécution exécution change
     
    Application.ScreenUpdating = False 'fige écran paendant macro ne pas oblié de remmetre avec true à la fin
     
    Application.Calculation = xlCalculationManual
     
        'déclaration varriables
        Dim A As Long
        Dim B As Long
        Dim C As Long
     
        'affectation valeur varriables
        A = 8
        B = A + 4
     
        'selcteion cellule pour vérifiaction
        Cells(A, 6).Select
     
     
        'vérification que la cellule n'est pas vide
        Do While Not (IsEmpty(ActiveCell))
     
            'si cellule =0 on séléction sinon on met juste a jour les varriables
            If Cells(A, 6) = 0 Then
                Range(Cells(A, 2), Cells(B, 9)).Select
                Selection.Delete Shift:=xlUp
     
                '***************** ici je voudrais faire en sorte que les cellules sélectionnées disparaissent ***********************            
     
                Cells(A, 6).Select
            Else
     
                A = B + 1
                B = A + 4
                Cells(A, 6).Select
            End If
     
        Loop
     
    Application.Calculation = xlCalculationAutomatic
     
    Application.ScreenUpdating = True
     
    Application.EnableEvents = True
     
    End Sub

  2. #2
    Nouveau membre du Club
    Homme Profil pro
    Développeur informatique
    Inscrit en
    septembre 2019
    Messages
    57
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Aisne (Picardie)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Conseil

    Informations forums :
    Inscription : septembre 2019
    Messages : 57
    Points : 38
    Points
    38
    Par défaut
    Hello,

    Tu peux colorier la couleur de texte de la même couleur que la couleur de fond

  3. #3
    Expert confirmé Avatar de Patrice740
    Homme Profil pro
    Retraité
    Inscrit en
    mars 2007
    Messages
    2 453
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : mars 2007
    Messages : 2 453
    Points : 5 590
    Points
    5 590
    Par défaut
    Bonjour,

    Il n'est pas possible de masquer des cellules isolées, c'est soit la ligne, soit la colonne.

    Il faut toujours analyser le besoin pour réaliser l'architecture qui y correspond avant de construire la feuille.
    Cordialement,
    Patrice
    Personne ne peut détenir tout le savoir, c'est pour ça qu'on le partage.

    Pour dire merci, cliquer sur et quand la discussion est finie, penser à cliquer sur

Discussions similaires

  1. [WD-2013] Masquer une ligne si sa 2ème cellule contient "Non"
    Par Kael_004 dans le forum Word
    Réponses: 1
    Dernier message: 03/07/2017, 12h52
  2. afficher et masquer des lignes en fonction de la valeur d'une cellule
    Par kif550 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 15/05/2017, 07h01
  3. [XL-2010] macro pour masquer des lignes avec cellules verrouillés?
    Par Pascal1970 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 31/10/2016, 01h12
  4. Réponses: 5
    Dernier message: 01/12/2008, 14h20
  5. masquer les lignes dans une zone si une cellule de la ligne est vide
    Par keguira dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 17/11/2006, 18h21

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