Sub ou funtion non définie

Bonjour,

J'ai u petit soucis avec ce code

Sheets("Licence").Range("K" & derligne2 + 2).Select
    ActiveCell.Value = Sum("K10:K" & derligne2)

Ca me met : (Sum) "Sub ou funtion non définie"

Auriez-vous une solution? Merci

Bonjour,

Vérifie que le nom de la procédure est correctement orthographié.

Sinon :

https://msdn.microsoft.com/fr-fr/library/s8y42ktc(v=vs.120).aspx

Cordialement,

Vbabeginner

Merci VBABEGGINER, mais si je poste le message c'est que je ne trouve pas la solution.

Ce que j'essaie de faire en VBA c'est que la cellule ("K" & derligne2 + 2) = SOMME("K10:K" & derligne2).

Merci

J'ai remplacer

ActiveCell.Value = Sum("K10:K" & derligne2)

par

ActiveCell.Value = "=Sum(""K10:K"" & derligne2)"

le probléme c'est que le "derligne2" ne prend pas la valeur de la ligne

bonjour,

Sum n'existe pas en VBA : Tu peux l'utiliser en tant que membre de WorksheetFunction :

WorksheetFunction.Sum(Range("A1:B2")) 'par exemple

A+

Merci galopin01, donc commenfaire une somme en VBA avec une dernière ligne variable?

amicalement

Benoist

Je ne sais pas trop....

Essaie :

ActiveCell.Value = WorksheetFunction.Sum("K10:K" & derligne2)

Mébon... C'est un peu à pile ou face : Je n'ai pas de boule de cristal !

A+

Ça me met cette erreur

Bonsoir,

Désolé, mais je ne suis pas devin !

Avec 231 messages postés si vous n'avez pas encore compris qu'il faut joindre un fichier et que les select ne servent à rien, il me semble que c'est sans espoir ?

A+

Bonjour,

Le fait de ne pas être devin ne t’empêches pas de savoir, de plus avec 3393 messages que parfois il n'y a pas d'autre choix que de mettre des .select, sans quoi la macro bug.

Amicalement

Benoist