作者f9999 (foo)
看板Visual_Basic
标题Re: [VBA ] 如何在excel里抓取sheet中的最後一笔资 …
时间Wed Aug 9 05:20:11 2006
※ 引述《keria (住左住右超好看)》之铭言：
: ※ 引述《resamond (肥肥的鸵鸟一只)》之铭言：
: : 我需要弄一个巨集
: : 能够自动在excel 中里的sheet里
: : 取每一个sheet的资料
: : 但因为每个sheet的record数不一定
: : 所以不能写死，用自动录的是写死的
: : 如我要抓取A 栏中的记录
: : 本来有找到一个可能函数range("A1",Range("A1").End(exdown))
: : 可是这样它竟然就抓到65536笔记录去了
: : 好像就跑到excel里所能存的最多笔数去了
: : 我要的资料其实才一百多笔而已
: : 所以我想请问有无函数可以抓取最後一笔有资料的record在那一列
: : 如果可以的话最好能够知道列数
: : 这样在设range就很方便了
: ActiveSheet.UsedRange.Select
: ActiveSheet.UsedRange.Address
: 不知道这是不是您想要的功能？
这要先选取65535列
然後再exup 就是最後一笔了
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.64.215.237