将单元格值存储在variables中

我正在尝试使用vba将variables的值存储在variables中。 我的代码抛出一个错误，我应该改变什么，以便单元格的值存储在我的variables？

Dim total As Long total = ActiveSheet.Cells(Rows.Count, "D").End(xlUp).End.Value Debug.Print (total) 

我得到的错误是

错误的参数数量或分配的属性无效

Answer 1

 Dim total As Long Dim wk as worksheet Set wk = activesheet total = wk.Range("D" & wk.Cells(wk.Rows.Count, "D").End(xlUp).Row).value Debug.Print (total)