Discussion :

[babybell]

Amis du forum bonjour

J’aimerai savoir comment s’il est possible de mettre deux sortes de codes dans la même feuille.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Dans une colonne, j’aimerai que l’action se fasse quand je me positionne dans une cellule et dans une autre, que l’action se fasse quand la cellule est remplie.

Merci de votre aide

[Philippe Tulliez]

Bonjour,
Tu peux bien entendu utiliser plusieurs procédures événementielles sur la même feuille.
Voici un exemple où l'on modifie la mise en forme de la cellule. Mettre la fonte en gras si l'on modifie la valeur de la cellule et mettre l'intérieur de la cellule en jaune quand on la sélectionne.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub Worksheet_Change(ByVal Target As Range)
 With Target
 .Interior.ColorIndex = xlNone
 .Font.Bold = True
 End With
End Sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Target.Interior.ColorIndex = 6
End Sub

[babybell]

Merci corona

bonne journée