Aide sur la Fonction Si

Bonjour,

Je cherche a utiliser la fonction IF

Mon But : Apres avoir activer un filtre avancé, je veux savoir si dans la colonne AB il y a une valeur numérique. pour ce fait j'ai essayé de mettre au point ce code :

    Range("AB1").Select
    Selection.End(xlDown).Select

    If IsNumeric(ActiveCell) Then

    Range("AC1").Value = "toto et tata"

    Else

    MsgBox "Pas d'écart constaté entre les 2 fichiers"

    End If

Là ou je sais que je ne suis pas bon c'est sur "If IsNumeric(ActiveCell) Then" mon idée était de savoir si la cellule où ce situe le curseur est numérique ou pas. si OUI tu vas marquer "toto et tata" en AC1 si NON une boite a message.

Merci de votre aide.

Eddie

Excel 2013

Windows 8 Pro

Bonjour, et bienvenue

Code à tester

Sub Test()

Range("K1").Select

Selection.End(xlDown).Select

If (ActiveCell) = Value Then

Range("C1").Value = "toto et tata"

Else

MsgBox "Pas d'écart constaté entre les 2 fichiers"

End If

End Sub

Amicalement

Pierrot

Super, merci beaucoup ça marche.

Encore Merci

Eddie