Bonjour,
Je souhaiterais avoir une selection variable de cellule avec comme condition toutes les cellules commencent par A et que cette sélection soit enregistrer dans un nom.
J'ai essayé de réaliser un code mais celui ci ne fonctionne pas, avez vous une idée ?
Merci
Je souhaiterais avoir une selection variable de cellule avec comme condition toutes les cellules commencent par A et que cette sélection soit enregistrer dans un nom.
J'ai essayé de réaliser un code mais celui ci ne fonctionne pas, avez vous une idée ?
VB:
Sub Test()
Dim valeurCherchée As String
Dim champRecherche As Range
Dim résultat As Range
Derniereligne = Range("A3").End(xlDown).Row
valeurCherchée = "A*"
Set champRecherche = Sheets("BDD").Range("A3:A" & Derniereligne)
Set résultat = champRecherche.Find(valeurCherchée, LookIn:=xlValues, LookAt:=xlPart)
If Not résultat Is Nothing Then
Selection.Activate
Selection.Name = "Selection"
End If
End Sub
Merci
Dernière édition: