Cellule active

Résolu
juer31 -  
Bonjour,

J'ai ce code pour visualiser la valeur des cellule active
Cells(1, 9).Value = ActiveCell.Value
Mais j'aimerais l'activer seulement pour la colonne A de "A9:A1000)

Si quelqu'un peut m'aider!

Merci

1 réponse

  1. ccm81
    Bonjour 

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A9:A1000")) Is Nothing Then
  Cells(1, 9).Value = ActiveCell.Value
End If
End Sub

    Cdlmnt
    0

    Discussions similaires

    Enlever le pass. Telecomm. Active
    Lisa

    3 réponses
    Pass. Télécomm. Active
    Syl20

    8 réponses
    Message ne s'envoie pas données mobiles Redmi
    Eric

    4 réponses