Sélectionner plusieurs cellule contenant nom Résolu

Question

Bonjour, 

Après quelques heures de recherche et de code qui ne marche pas, j'ai besoin de votre aide.
Je voudrais sélectionner toutes les cellules qui contiennent le nom "NEVER" par exemple.

Merci

Configuration: Windows 7 / Chrome 43.0.2357.81

ThauTheme · Answer

Bonjour Dikold, bonjour le forum,

Sans plus de précision, essaie comme ça :
Sub Macro1()
Dim CEL As Range
Dim PL As Range

For Each CEL In Cells.SpecialCells(xlCellTypeConstants)
    If CEL.Value = "NEVER" Then
        If PL Is Nothing Then Set PL = CEL Else Set PL = Application.Union(PL, CEL)
    End If
Next CEL
PL.Select
End Sub

Sélectionner plusieurs cellule contenant nom

1 réponse

Discussions similaires

Newsletters