Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Sélectionner des cellules vides dans une colonne par rapport à une autre cellule

Romain31

XLDnaute Occasionnel
Bonjour à tous,

Je cherche à sélectionner toutes les cellules vides de la colonne D par rapport au remplissage de la colonne F (sur la même ligne).

Ce code (en indiquant la plage) prend en compte les trois colonnes.

Range("D2:F15").Select
Selection.SpecialCells(xlCellTypeBlanks).Select

Comment avoir un résultat (cellules sélectionnées) sur la colonne D uniquement

Exemple ci-joint.

Merci pour votre aide et bonne journée à tous
 

Pièces jointes

  • Test.xlsm
    15.2 KB · Affichages: 8

vgendron

XLDnaute Barbatruc
Bonjour

pas compris ce que tu souhaites exactement

voici quelques lignes de code parmi lesquelles tu devrais pouvoir choisir
VB:
Sub Macro1()
    Range("D2:F15").Columns(1).SpecialCells(xlCellTypeBlanks).Select ' cellules vides de la première colonne de la range
    Range("D2:F15").Columns(3).SpecialCells(xlCellTypeBlanks).Select ' cellules vides de la troisième colonne de la range
    Range("D2:F15").SpecialCells(xlCellTypeBlanks).Select ' toutes les cellules vides de la  range
    Range("D2:F15").Columns(3).SpecialCells(xlCellTypeBlanks).Offset(0, -2).Select ' cellules de la 1ere colonne pour lesquelles la colonne 3 est vide
    Range("D2:F15").Columns(3).SpecialCells(xlCellTypeBlanks).EntireRow.Select ' lignes entières pour lesquelles la colonne 3 est vide
End Sub

Edit: Hello @Phil69970
 

job75

XLDnaute Barbatruc
Bonjour Romain31, le fil,

Sélection de l'intersection des SpecialCells :
VB:
Sub Selectionner()
On Error Resume Next
Intersect(Columns("D").SpecialCells(xlCellTypeBlanks), Columns("F").SpecialCells(xlCellTypeConstants).EntireRow).Select
End Sub
A+
 

Pièces jointes

  • Test.xlsm
    17.9 KB · Affichages: 4

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…