VBA : Masquer lignes si entièrement vides

Fermé

Pedro2730 - 10 juin 2011 à 16:34
Normad Messages postés 112 Date d'inscription dimanche 6 juin 2010 Statut Membre Dernière intervention 10 juin 2015 - 20 mai 2013 à 14:20

Bonjour,

J'ai essayé beaucoup de code mais aucun de répond à mon problème. Je souhaite écrire une sub qui masquer les lignes entièrement vides d'une plage (A3:M65) Merci de m'aider j'y suis depuis des heures.

A voir également:

VBA : Masquer lignes si entièrement vides
Mkdir vba ✓ - Forum VB / VBA
Vba récupérer valeur cellule ✓ - Forum VB / VBA
Excel compter cellule couleur sans vba - Guide
Vba range avec variable ✓ - Forum VB / VBA
Autofill vba ✓ - Forum Excel

1 réponse

Réponse 1 / 1

Normad Messages postés 112 Date d'inscription dimanche 6 juin 2010 Statut Membre Dernière intervention 10 juin 2015 39
20 mai 2013 à 14:20

Sub MaqueLignes()
    Dim Ligne As Integer, Col As Integer, Contenu As String
    
    For Ligne = 3 To 65
        Contenu = ""
        For Col = 1 To 13
            Contenu = Contenu & Cells(Ligne, Col)
            If Contenu <> "" Then Exit For
        Next Col
        If Contenu = "" Then Rows(Ligne).EntireRow.Hidden = True
        
    Next Ligne
End Sub

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

ouverture d'un fichier excel à partir d'un code VBA

Méthode find dans VBA - Recherche de données sous Excel

appliquer une pause dans une macro vba excel