如何提取sheet中某一列的数据到数组中

nbvcxz 2006-12-14 09:53:53
如何提取sheet中某一列的数据到数组中
...全文
224 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
nbvcxz 2006-12-14
  • 打赏
  • 举报
回复
谢谢,马上给分
DeRoshia 2006-12-14
  • 打赏
  • 举报
回复
CStr(Index + 7):从第8行开始
可直接用CStr(Index)即可
DeRoshia 2006-12-14
  • 打赏
  • 举报
回复
以D列为例:
Dim Index As Integer
Dim strRangeD As String
Dim strArray(Index) As String

For Index = 1 To 150
strRangeD = "D" + CStr(Index + 7)
Range(strRangeD).Select
strArray(Index) = Range(strRangeD).Value
Next
注:想取多少行,改变150即可

5,139

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧