Fonction VBA :Range et plage de donnée

[Klorane]

Bonjour à tous,

j'ai besoin de faire rechercher sur une plage dans une colonne s'il exite une valeur négative.

j'ai tenter d'essayer la fonction range comme si dessous :

If Range('aq7:aq17') < 0 Then macro12

quand je lance la macro j'ai un message d'erreur :
Erreur d'execution '13'
incompatibilité de type

comment faut il le presenter pour que ceci puisse fonctionner?

Merci
sylvain

 

[Domic]

Bonsoir Sylvain,

Tu peux utiliser une boucle for each par exemple :

Private Sub CommandButton1_Click()

For Each Cellules In Feuil1.Range('B12:H14')
    If Cellules.Value < 0 Then MsgBox 'Négatif!'
Next

End Sub

A+

Domic