maval
XLDnaute Barbatruc
Bonjour,
J'ai un code pour sélectionner dans la colonne "I" qui fonctionne trés bien , mais j'aimerai lui apporter une modification.
Voici mon code:
J'aimerai que l'on puisse sélectionner seulement a partir de la ligne "19"
Un fichier valant mieux qu'un long discours, veuillez voir la pièce jointe.
Par avance merci pour votre aide.
Cordialement
Maval
J'ai un code pour sélectionner dans la colonne "I" qui fonctionne trés bien , mais j'aimerai lui apporter une modification.
Voici mon code:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' Valeur comptabilisé
If Target.Row < 2 Then Exit Sub
'ne fonctionne que sur sélection unique
If Target.Count = 1 Then
Set isect = Application.Intersect(Target, Range("$I:$I"))
If Not isect Is Nothing Then
'If Target.Font.Name = "Wingdings" Then
If Target = "" Then
Target = "ü"
ElseIf Target = "ü" Then
Target = ""
End If
'End If
End If
End If
End Sub
J'aimerai que l'on puisse sélectionner seulement a partir de la ligne "19"
Un fichier valant mieux qu'un long discours, veuillez voir la pièce jointe.
Par avance merci pour votre aide.
Cordialement
Maval