Selection plage, si selection < ou égale à 9 alors

Bonjour

Je cherche la fonction pour tester la plage F11:H13 et J11:L13

si la somme est inférieure ou égale à 9 alors je vais en cellule A14

J'ai essayé avec:

Range("F11:H13,J11:L13").Select

If sélection <= 9 then

Range ("A14").select

J'ai essayé avec:

    Set maplage = Range("F11:H13,J11:L13")
    If maplage <= 9 Then

Mais rien n'est concluant ormis erreur d'exécution

En vous remerciant.

Cordialement.

Peut-être avec ça?

Set maplage = Range("F11:H13,J11:L13")

MaSomme = Application.WorksheetFunction.Sum(maplage)

If MaSomme <= 9 Then

Bonsoir bejouette, le forum,

A tester:

Sub test()
 Dim maplage As Range
  Set maplage = ActiveSheet.Range("F11:H13,J11:L13")
    If Application.WorksheetFunction.Sum(maplage) <= 9 Then ActiveSheet.Range("A14").Select
End Sub

Cordialement,

Bonsoir fcyspm30, bonsoir xorsankukai.

En vous remerciant tous les deux pour avoir répondu à ma demande.

Que ce soit l'une ou l'autre, vos deux propositions fonctionnent à merveille.

Un grand merci à tous les deux pour votre aide. C'est sympa.

Bien cordialement.