excel vba取得某列最后一个非空单元格的值，程序怎么编？

如题所述

举报该问题

第1个回答 2020-04-30

A列
Range("a" & Rows.Count).End(xlUp).Value追问

把这个值复制、粘帖怎么编

谢谢你，但是显示"属性的使用无效"

追答

复制到B2
Range("a" & Rows.Count).End(xlUp).copy range("b2")

本回答被网友采纳

第2个回答 2020-05-01

Arr =Cells(.Rows.Count, "").End(xlUp))

相似回答

excel vba 最后一个非空单元格答：l=range("IV1").end(xlToLeft).column 'l等于第一行最后一个非空单元格的列号（即从IV1单元格开始往左找第一个有内容的单元格的列号）用for i=1 to range("A65536").end(xlup).row即可

如何用excel vba查找某一行最后一个非空单元格答：最后一个值 = Sheets("sheet1").Range("A65535").End(xlUp).Value 用 col=range("C1").end(xltoright).column '找到最后非空一列语句可能存在问题：当A1至A5数据连续时，该语句能返回正确的结果，但当不连续时，将得不到最后一个非空结果如 1 2 4 5 将只得到2，而不是5（其中3是...

Excel中如何获取某列(行)最后一个非空单元格的值答：1、接下来的公式和上面取得非空行的公式原理是一样的，它可以返回第一行中最后一个非空单元格的列号：=MAX((1：1<>"")*(COLUMN(1：1)))2、同理通过这个列号我们就可以使用ADDRESS函数来获取到此单元格的地址：=ADDRESS(1，MAX((1：1<>"")*COLUMN(1：1))，1)3、最后我们以此获取到的地...

excel vba获取一个表中最后一个非空单元格,并对下一行插入数据_百度...答：假设当前活动页为sheet1 你要在sheet2的A列最后一行输入"Next"Sheets(2).Range("A65536").End(xlUp).Offset(1) = "Next"

wps利用VB代码定位到A列最后一个不等于空的单元格上,怎么写代码?答：如果你不记得函数的话, 可以用如下代码解决 sub test()ri = 1 do while cells(ri,1).value <>""ri = ri +1 loop ri = iif(ri=1,1,ri-1)end sub 当然用更方便的方法 rn = Sheet1.Range("A" & Rows.Count).End(xlUp).Row ...

excel查找并返回最近的一个非空单元格的值答：=VLOOKUP(B2,A2:A366,1,TRUE)即可。如图：以下是我帮你写一个VBA的程序完全实现你的要求，担心你不会执行宏指令，特设置了一个按键点击即可执行。源程序：Private Sub CommandButton1_Click()Dim i As IntegerDim a As Datei = 2Do While Cells(i + 1, 1) <= Cells(2, 2) i = i ...

大家正在搜

Excel中如何获取某列（行）最后一个非空单元格的值

表格excel如何获取某行最后一个非空单元格的值

Excel VBA 找到某一行的最后一个非空单元格用VBA...

如何用excel vba查找某一行最后一个非空单元格

EXCEL如何获取某列中的最后一个非空的数值

EXCEL如何获取某列中的最后一个非空的数值？

Excel vba如何取得最后一个非空列的列标

excel vba查询定位某列最后一个非空单元格下一格并在其...