怎么获取excel vba数组内数值的真实地址

怎么获取excel vba数组内数值的真实地址,第1张

获取第一个工作表(表名为AA)中A1的值赋值给X x=sheets(1)[a1] 或者 x=sheets(“AA”)[a1] x=sheets(1)cells(1,1) x=sheets(“AA”)cells(1,1)

dim arr

arr=thisworkbooksheets("sheet1")range("b1:b&thisworkbooksheets("sheet1")range("b65536")end(xlup)row)

通过VBA代码循环。有数据的单元格区域,通过VBA代码循环找到每行每列对应的单元格的值,通过对话框显示出来,这样子就可以vba怎么看数组所对应的单元格。在Excel中想实现什么功能,就可以用VBA语言编写一段程序去完成。

Option Base 1

Sub 数组片段()

Dim i%, arr, arr1(2, 1)         '先定义一个和绿色区域相同大小的数组arr1,2行1列

arr = Range("G2:K6")Value      '把**区域的数据读入数组arr,5行5列

For i = 1 To 2                  '用FOR循环为新数组arr1赋值

    arr1(i, 1) = arr(i + 2, 3)

Next i

Range("A1")Resize(2) = arr1    '将单元格区域A1改变大小为2行1列后输入新数组arr1的值

End Sub

循环,知道不为0,脚本文本:

Sub 宏1()

  Dim arr, x

  arr = Array(10, 90, 3, 56, 0, 32)

  Do

      x = arr(Rnd(UBound(arr) - LBound(arr)))

  Loop Until x <> 0

  DebugPrint x

End Sub

以上就是关于怎么获取excel vba数组内数值的真实地址全部的内容,包括:怎么获取excel vba数组内数值的真实地址、vba 如何获取sheet1中B列所有数据的值存到一个数组中、vba怎么看数组所对应的单元格等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/9665369.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-30
下一篇 2023-04-30

发表评论

登录后才能评论

评论列表(0条)

保存