Vba 将单元格值存储在变量中

Vba 将单元格值存储在变量中,vba,excel,excel-2013,Vba,Excel,Excel 2013,我试图使用vba将单元格的值存储在变量中。我的代码抛出了一个错误,我应该更改什么以便将单元格的值存储在我的变量中 Dim total As Long total = ActiveSheet.Cells(Rows.Count, "D").End(xlUp).End.Value Debug.Print (total) 我得到的错误是 参数数量错误或分配的属性无效 Dim total As Long Dim wk as worksheet Set wk = activesheet total =

我试图使用vba将单元格的值存储在变量中。我的代码抛出了一个错误,我应该更改什么以便将单元格的值存储在我的变量中

Dim total As Long
total = ActiveSheet.Cells(Rows.Count, "D").End(xlUp).End.Value
Debug.Print (total)
我得到的错误是

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

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)