在Excel中怎么提取一列中最后填入单元格的数？

提取一列中最后填入单元格的数方法有很多，函数法、VBA方法。

一、函数法

1、在F20输入公式：=OFFSET(F5,COUNT(F5:F19)-1,0,1)

执行公式后的结果

当然函数法也很简单，也不容易出错。但是我认为VBA处理的方式更好

PS: 其实有函数的函数可以得到这些值

1、=INDEX(B:B,LARGE(IF(B1:B65000='',0,ROW(B1:B65000)),1))，这个也可以得到所需的值

2、=LOOKUP(9E 307,A:A)

3、数组公式 =INDEX(A:A,MATCH(2,1(INDIRECT('A1:A'&'65535')'')))

二、 VBA法

1、打开Excel软件，确定原数据，插入表单控件。

2、ALT F11打开VBA代码编辑器，输入如下的代码。均可得到所需的值

Sub LastCell()

Dim rng As Range

Set rng = Cells(Rows.Count, 1).End(xlUp)

Cells(1, 2).Value = rng.Value

With Range('B1')

.Font.Bold = True

.Interior.ColorIndex = 3

.Select

End With

MsgBox 'A列的最后一个非空单元格是' & rng.Address(0, 0) _

& ',行号' & rng.Row & ',数值' & rng.Value

End Sub

1.从A列的最后的最下面的单元格往上找，直到有数据的单元格，找到的是从下到上第一个有数据的单元格的行号Cells(Rows.Count, 1).End(xlUp)

2.选择有数据的单元格Range('b1')，单元格的表示方式，将最后一个值写入但单元格B1，对单元格字体加粗、底色红色，并选择。

3.弹出提醒窗口，里面有提示内容 MsgBox '列中最后一个数据单元格找到了！'

PS:代码一定要书写正确。

若有需要帮忙设计或者有不同的意见可以在添加关注后，私信我。可以沟通And交流。学无止境，一切都是最好的安排。