Je soutiens Excel Downloads
Connexion
S'inscrire
Effectuez une recherche sur Excel Downloads...
Effectuez une recherche sur Excel Downloads...
Rechercher dans les titres uniquement
Par:
FORUMS
Nouveaux messages
Rechercher dans les forums
TÉLÉCHARGEMENTS
POUR LES PROFESSIONNELS
Gestion commerciale
Gestion de projets
Gestion du personnel
Tableaux de bord
Comptabilité
Immobilier
Bourse
POUR LES PARTICULIERS
Budgets et comptes
Plannings et calendriers
UTILITAIRES
LEÇONS ET TUTORIAUX
Fonctions Excel
Vba
RESSOURCES PEDAGOGIQUES
Rechercher une ressource
ACTUALITÉS
TUTOS
EXCEL
FORMULES ET FONCTIONS
VBA
POWER QUERY
POWER PIVOT
POWER BI
AUTRES APPLICATIONS
Recherche de tutos vidéos
Connexion
S'inscrire
Quoi de neuf
Effectuez une recherche sur Excel Downloads...
Effectuez une recherche sur Excel Downloads...
Rechercher dans les titres uniquement
Par:
Nouveaux messages
Rechercher dans les forums
Menu
Connexion
S'inscrire
Installer l'application
Installer
FORUMS
Questions
Forum Excel
SUPPRIMER LIGNES TABLEAU EN VBA EN PASSANT PAR UN FILTRE
JavaScript est désactivé. Pour une meilleure expérience, veuillez activer JavaScript dans votre navigateur avant de continuer.
Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement.
Vous devez le mettre à jour ou utiliser un
navigateur alternatif
.
Répondre à la discussion
Message
<blockquote data-quote="Staple1600" data-source="post: 20276377" data-attributes="member: 2115"><p>Re</p><p></p><p>Essaies cette macro</p><p>[code=vb]</p><p>Sub Suppr_LignesVides_COLC()</p><p>Dim dl&, f As Worksheet</p><p>Set f = Sheets("PRODUCTION")</p><p>dl = f.Cells(Rows.Count, "F").End(3).Row</p><p>Application.ScreenUpdating = False</p><p>f.Range("C2:C" & dl).SpecialCells(xlCellTypeBlanks).EntireRow.Delete</p><p>End Sub</p><p>[/code]</p></blockquote><p></p>
[QUOTE="Staple1600, post: 20276377, member: 2115"] Re Essaies cette macro [code=vb] Sub Suppr_LignesVides_COLC() Dim dl&, f As Worksheet Set f = Sheets("PRODUCTION") dl = f.Cells(Rows.Count, "F").End(3).Row Application.ScreenUpdating = False f.Range("C2:C" & dl).SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub [/code] [/QUOTE]
Insérer les messages sélectionnés…
Vérification
Répondre
FORUMS
Questions
Forum Excel
SUPPRIMER LIGNES TABLEAU EN VBA EN PASSANT PAR UN FILTRE
Texte copié dans le presse-papier
