显示多列数组中的某一列

pepsi7777 · 发表于 2022-12-3 13:31

本帖最后由 pepsi7777 于 2022-12-3 14:09 编辑

各位老师好，

有一个多列数组，如何只显示其中的一列？感谢

A1:B15是一个数组
希望: D1:D15只显示数组的第2列
感谢

gwjkkkkk · 发表于 2022-12-3 13:42

Option Explicit
Sub 只显示数组的某一列()
Dim arr
arr = Sheet1.Range("A1").CurrentRegion
[D1].Resize(UBound(arr)) = Application.Index(arr, , 2)
End Sub

gwjkkkkk · 发表于 2022-12-3 13:43

通过索引方式 index,请参考附件。。。

于箱长 · 发表于 2022-12-3 13:43

Range("d1").Resize(ubound(arr), 1) = application.index(arr,,2)

于箱长 · 发表于 2022-12-3 13:44

pepsi7777 · 发表于 2022-12-3 14:10

gwjkkkkk 发表于 2022-12-3 13:43
通过索引方式 index,请参考附件。。。

感谢 gwjkkkkk 老师

pepsi7777 · 发表于 2022-12-3 14:10

于箱长发表于 2022-12-3 13:44

感谢于箱长老师

		自动登录	找回密码
密码			免费注册

[已解决] 显示多列数组中的某一列