XL 2010 worksheets

[kaid]

bonjour;
j'ai mis ce code mais il faut que je click sur la cellule pour qu'il s'execute j'aimerai qu'il s'execute quand je saisi ou je supprime
Private Sub Worksheet_SelectionChange(ByVal target As Range)



If target.Column = 2 And target.Row > 1 Then
If target = nul Then
target.Offset(, 7) = "Egaré"
Else
target.Offset(, 7) = "Archivé"
End If
End If
end sub

 

[cathodique]

Tu mets ton code dans
Private Sub Worksheet_Change(ByVal Target As Range)

Bon week-end

 

[JCGL]

Bonjour à tous,

Je ne suis pas certain que nul soit reconnu en VBA.
vbNull ou "" ou " " serait certainement plus adapté.

A+ à tous

 

[kaid]

Ok merci

 

[kaid]

nb.si (gauche texte,6;"annule")
je convertir cette forume en code vba avec msgbox

 

[cathodique]

Utilise l'enregistreur de macro, tout en écrivant ta formule.

 

[Dranreb]

Bonjour
vbNull est une constante valant 1 de l'énumération VariantType.
C'est la valeur renvoyée par VarType(V) si V contient Null, ce qui peut aussi se tester par IsNull(V)
D'une façon générale Excel n'utilise pas la valeur Null, mais plutôt Empty
Même pour une intersection impossible Excel met CVErr(xlErrNull)
VBA l'utilise déjà un peu plus.
Pour un objet non initialisé c'est Nothing.