Erreur 1004 Impossible de lire la propriété Sum

Bonjour,

j'ai besoin de votre aide sur mon code( je suis vraiment débutante) que je crée pour calculer la somme sur deux colonnes différentes, et afficher la valeur dans mon user form.

mon souci c'est quand j'utilise Sum dans le code deux fois ça semble donner cet erreur,
Je vous remets mon code ci-dessous, ( merci d'avance)

Private Sub cmdCalculate_Click()

Dim lastRow As Integer
Dim sh As Worksheet
Dim A As Long
Dim B As Long

Set sh = ThisWorkbook.Sheets("DB")
sh.Activate
A = 0
B = 0

lastRow = sh.Range("A" & Rows.Count).End(xlUp).Row

A = WorksheetFunction.Sum(sh.Range("E2:E" & lastRow))
B = WorksheetFunction.Sum(sh.Range("G2:G" & lastRow))

Me.txtSumquantity.Value = A
Me.txtSumprice.Value = B

End Sub

Bonjour,
Ta procédure est fonctionnelle.
Je l'ai cependant modifié un peu.
Maintenat sans fichier, difficile d'en dire plus.
Cdlt.

27gibena.xlsm (21.50 Ko)

Bonjour

ça marche parfaitement

T'es un ange

Merci énormément

Rechercher des sujets similaires à "erreur 1004 impossible lire propriete sum"