Excel'de iki aralığın çıkarılması VBA

Question

Sevgili stackoverflow topluluğu, diğer programlama dillerindeki birçok sorun için kendimi çözümler buldum, şimdi kendimi yapıyorum ve burada hesap yapıyorum, böylece mücadele ettiğim şeyler hakkında belirli bir soru sorabilirim. Ben excel ve tbh modeli yapıyorum VBA ile daha iyi almak için oldukça zayıf programcıyım. Sorum şu; iki aralığı nasıl çıkartabilirim ve sonra başka bir sütunda sonuçları yazabilirim.

Onları (C2: C4) ile çıkararak ve sonuçları (D2: D4) yazarak iki aralık (B2: B4) var. (D2 = B2 - C2, D3 = B3 - C3 vs.) Şimdiden teşekkürler!

Answer 1

Range ("D2: D4") FormulaR1C1 = "= RC [-2] - RC [-1]"

Answer 2

Sub Demo() 
    Dim lastRow As Long 
    With Worksheets("Sheet1") 
     lastRow = .Range("B" & Rows.Count).End(xlUp).Row 
     Range("D2").Select 
     ActiveCell.FormulaR1C1 = "=RC[-2]-RC[-1]" 
     Range(Cells(2, 4), Cells(lastRow, 4)).Select 
     Selection.FillDown 
    End With 
End Sub 

.