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

Résolu
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.

1 réponse

  1. Contributeur
    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

    0
    1. merci pour votre réponse, mais comment je peux faire ça?
      0
    2. Contributeur
      Mettre un classeur exemple avec les explications des actions a faire sur ce site ensuite coller le lien ici

      https://www.cjoint.com/

      @+
      0
    3. le voilà et merci pour votre vite interaction
      https://www.cjoint.com/c/ICCkqMioMVb
      0
    4. Contributeur
      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
      0
    5. grand merci
      0