Menu

Fonction Récupérer le numéro de ligne sélectionnée [Résolu]

- - Dernière réponse : cs_Le Pivert
Messages postés
6003
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 avril 2019
- 16 avril 2019 à 16:01
salut
je suis débutant avec VBA Excel, et j'aimerais savoir comment récupérer le numéro de ligne sélectionnée entièrement, puis le mettre dans une cellule et désactiver un bouton de commande existant sur ma feuille.
merci d'avance.
Afficher la suite 

Votre réponse

1 réponse

Messages postés
6003
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 avril 2019
420
0
Merci
Bonjour,

avec la méthode intersect, a mettre dans le module de la feuille concernée et remplacer Target. Address par Target.Row

https://forum.excel-pratique.com/viewtopic.php?t=1314

le voilà et merci pour votre vite interaction
https://www.cjoint.com/c/ICCkqMioMVb
cs_Le Pivert
Messages postés
6003
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 avril 2019
420 -
Il faut cocher accepter les macros:

https://www.cjoint.com/c/ICCk07M7qDQ

j'ai oublié de mettre les actions a faire suivant les lignes jaunes ou blanches:

Option Explicit
Dim ligne As Integer
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then
On Error Resume Next
ligne = Target.Row
If Rows(ligne & ":" & ligne).Select Then
CommandButton1.Enabled = True
End If
Else
CommandButton1.Enabled = False
End If
End Sub
Private Sub CommandButton1_Click()
If Range("j" & ligne).Value = "" Then
MsgBox "ligne jaune" 'mettre l'action a faire
Else
MsgBox "ligne blanche" 'mettre l'action a faire
End If
End Sub


a mettre à la place du code existant dans le module de la feuille1

@+ Le Pivert
merci encore, mais hune fois cliqué, le msg "erreur de compilation" "variable indefini" s'affiche. comment reglé ça?
cs_Le Pivert
Messages postés
6003
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 avril 2019
420 -
Exemple à télécharger:

https://www.cjoint.com/c/IDqoamumzvQ
Commenter la réponse de cs_Le Pivert