OVH Cloud OVH Cloud

Private Sub Worksheet_SelectionChange

2 réponses
Avatar
Steve
Bonjours
Je n'arrive pas à faire une macro simple.
Lorsque je change la valeur dans une cellule (A1)
j'aimerai effacer le contenue de la cellule (B1)

J'ai essayé

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.adress = "$A$1" Then
Range("B1").Select
Selection.ClearContents
End If
End Sub

Mais que neni

Merci pour votre aide

2 réponses

Avatar
JLuc
Steve avait soumis l'idée :
Bonjours
Je n'arrive pas à faire une macro simple.
Lorsque je change la valeur dans une cellule (A1)
j'aimerai effacer le contenue de la cellule (B1)

J'ai essayé

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$A$1" Then
Range("B1").ClearContents
End If
End Sub

Mais que neni

Merci pour votre aide


--
JLuc

Avatar
Steve
Merci JLuc pour ton aide

"JLuc" a écrit dans le message de news:

Steve avait soumis l'idée :
Bonjours
Je n'arrive pas à faire une macro simple.
Lorsque je change la valeur dans une cellule (A1)
j'aimerai effacer le contenue de la cellule (B1)

J'ai essayé

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$A$1" Then
Range("B1").ClearContents
End If
End Sub

Mais que neni

Merci pour votre aide


--
JLuc