Evenement et 2 condition?

[nicopof]

Bonjour, je souhaiterai savoir si avec la l'évènement Private Sub Worksheet_Change(ByVal Target As Range) ont peut mettre deux condition?

Cultuellement j'ai cette condition là:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
Dim tablCode
tablCode = Array(31, 34, 36, 18, 99)

If Target.Column = 21 Or Target.Column = 24 Or Target.Column = 27 Or Target.Column = 30 Then
For i = 0 To 4
If Target.Value = tablCode(i) Then
.....
la suite est l'envoie d'un mail.
Avant l'envoie du mail j'aimerai qu'une deuxième condition soit mit en place.

If Target.Column = 23 Or Target.Column = 26 Or Target.Column = 29 Or Target.Column = 32 Then
If target.value <>"" then

mail


Est-ce possible? si oui comment l'écrire correctement?
Merci

 

[nicopof]

Re : Evenement et 2 condition?

Oki je te remercie je vais essayer de voir sa