A voir également:
- [Excel VBA] paramétrer selection cellules
- Formule excel pour additionner plusieurs cellules - Guide
- Liste déroulante excel - Guide
- Verrouiller cellules excel - Guide
- Excel compter cellule couleur sans vba - Guide
- Word et excel gratuit - Guide
1 réponse
Bonjour,
Exemple :
Lupin
Exemple :
Sub Cherche_Valeur() Dim Plage As Range, Cellule As Range Dim MaValeur As String MaValeur = "Fin" Set Plage = Range("A1:E1") For Each Cellule In Plage If (Cellule.Value = MaValeur) Then Range(Cells(12, Cellule.Column), Cells(18, Cellule.Column)).Select End If Next Cellule End Sub '
Lupin