[英]Assign the numeric value of a cell to an integer variable
我在特定单元格上有数值,该单元格的行和列是已知的。 我想将这些单元格中的数字值分配给代码中的整数变量,然后可以修改该整数变量并用于更新同一单元格。
我尝试使用以下代码,但是它们不起作用,因为当我添加要监视的变量时,即使单元格具有非零数字,变量的值仍保持为0。
Dim GetTableCount as Integer
GetTableCount = Cells(17, 13).value
GetTableCount = CInt(Cells(17, 13).value)
GetTableCount = Range(M17)
GetTableCount = Range(M17).value
GetTableCount = CInt(Range(M17).value)
GetTableCount = CInt(Range(M17))
我也尝试过使用index函数,但是我在查找正确的语法时失败了。 解决该问题的最后一次尝试是将单元格指定为“数字”格式,而不是“常规”格式,但仍然一无所获。
原来是
anyintvar = Cells(row, column)
可以工作,但是代码正在从另一个工作表中读取它,因此该值保持为0,而从其中读取代码的单元格所在的单元格似乎为空。
即使我有这些行用于工作表选择
Sheets("ADMIN").Visible = True
Sheets("ADMIN").Select
该代码仍然无法从所选工作表中读取。
但是使用这个:
GetTableCount = ActiveWorkbook.Worksheets("ADMIN").Cells(rownumber, columnnumber)
解决了问题。 我什至不必再写以前的两行。 我在 @ jpinto3912 页面找到解决方案的页面
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.