Makroda dört işlem

[evren_01]

Arkadaşlar takıldığım bir konu var o konu hakkında yardım istiyorum

Workbooks("Deneme").Worksheets("kitap1").Range("D22").Value = Workbooks("Deneme").Worksheets("kitap1").Range("D22").Value + Workbooks("stok").Worksheets("FUEL OIL").Range("B7:B500").Value

bu kodu yazdığımda hata veriyor yardımlarınızı bekliyorum

not :stok çalışma sayfasını öncelikle acıyorum sonra bu makro devreye giriyor bilgilerinize

 

[Levent Menteşoğlu]

Aşağıdaki satırda bir aralık tanımlamışsınız ve bu aralığı toplama işlemine dahil etmişsiniz. Hata burada tek bir alan tanımlamanız gerekir,eğer B7:B500 aralığının toplamını almanız gerekliyle bu satırı bir aşağıdaki satır ile değiştirin.
[vb:1:3be21d8db1]Worksheets("FUEL OIL").Range("B7:B500").Value[/vb:1:3be21d8db1]

[vb:1:3be21d8db1]worksheetfunction.sum(Worksheets("FUEL OIL").Range("B7:B500"))[/vb:1:3be21d8db1]