使用来自不同工作表的数据设置变量

时间:2017-07-27 02:26:36

标签: excel vba

我在代码的最后一行遇到问题。我认为问题在于我如何设置我的范围,但我还没有设置它的方式。我尝试通过确保填写用户表单中的所有字段,然后继续使用宏来进行错误检查。

Dim emptyRowNumber As Long
emptyRowNumber = Application.WorksheetFunction.CountA(Sheets("Leads").Range("a:a")) + 1
.
.
.
Dim filledCount As Integer
filledCount = Application.WorksheetFunction.CountA(Sheets("Leads").Range(Cells(emptyRowNumber, 1), Cells(emptyRowNumber, 11)))

1 个答案:

答案 0 :(得分:0)

您需要将范围语句中的所有单元格和范围限定为同一工作表。

在此代码示例tabLayout.addTab(tabLayout.newTab().setText("Tab1").setIcon(R.mipmap.ic_launcher)); Cells(emptyRowNumber, 1)中,引用ActiveSheet上的单元格而不是Cells(emptyRowNumber, 11)的单元格。

  

表格(“潜在客户”)。范围(单元格(emptyRowNumber,1),单元格(emptyRowNumber,11))

个人偏好我按照数据类型(数字,字符串,对象等)按字母顺序将所有变量分组到我的程序顶部。我还建议使用Sheets("Leads")语句来缩短代码。

With