Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba 如何从活动单元格数到顶部?_Vba_Excel - Fatal编程技术网

Vba 如何从活动单元格数到顶部?

Vba 如何从活动单元格数到顶部?,vba,excel,Vba,Excel,我基本上有一个地址,我想在其中偏移到顶部单元格(1,1)。在本例中,我的单元格是$A$4,但可以位于A列中的任何位置。我想计算一下$A$4和$A$1之间有多少个单元格,这样我就可以用它来偏移和复制/粘贴某些内容。在这种情况下,我希望计数为3 我目前正在使用 cnt = wb.Sheets(sht.Name).Range("firstAddress", ActiveSheet.Cells(1, 1).End(xlUp)).Rows.Count 在这种情况下,firstAddress是($4),

我基本上有一个地址,我想在其中偏移到顶部单元格(1,1)。在本例中,我的单元格是$A$4,但可以位于A列中的任何位置。我想计算一下$A$4和$A$1之间有多少个单元格,这样我就可以用它来偏移和复制/粘贴某些内容。在这种情况下,我希望计数为3

我目前正在使用

cnt = wb.Sheets(sht.Name).Range("firstAddress", ActiveSheet.Cells(1, 1).End(xlUp)).Rows.Count 

在这种情况下,firstAddress是($4),但我相信我完全错了

我不这么认为,这使得count=26是一个命名范围吗?它总是一个单一的细胞吗?还有,你想在那里做什么?您的主要问题可能是,“firstAddress”是一个命名范围,并且它将始终是第一列(a)中的单个单元格。我对vba excel有点陌生,我想如果我能从下到上数到单元格(1,1)的行数,那么我就能得到所需的数字。