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.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Ma question est sans doute très bête, mais j'aimerais savoir que si je clique sur une ligne queconque dans un range de cellules, de quelle façon en VBA je peux savoir sur quelle ligne du Range1 ou du Range2 que j'ai cliqué.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("D7:D16")) Is Nothing Then
MsgBox "Ligne " & Target.Row - 6 & " de la plage 1 sélectionnée"
ElseIf Not Intersect(Target, Range("F7:F16")) Is Nothing Then
MsgBox "Ligne " & Target.Row - 6 & " de la plage 2 sélectionnée"
End If
End Sub
Question: Vous avez excel 2016, pourquoi enregistrez-vous votre fichier en Xls au lieu de Xlsm?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("D7:D16")) Is Nothing Then
MsgBox "Ligne " & Target.Row - 6 & " de la plage 1 sélectionnée"
ElseIf Not Intersect(Target, Range("F7:F16")) Is Nothing Then
MsgBox "Ligne " & Target.Row - 6 & " de la plage 2 sélectionnée"
End If
End Sub
Question: Vous avez excel 2016, pourquoi enregistrez-vous votre fichier en Xls au lieu de Xlsm?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim OuSuisJe As Range
Set OuSuisJe = Selection
With OuSuisJe
MsgBox "J'ai cliqué sur la cellule " & .Address(0, 0), , "Ou suis je ?"
End With
End Sub
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD