[原创][数组]补充一些大家不太了解的数组用法

UNARTHUR · 发表于 2005-10-13 10:22

对于数组感兴趣的朋友在您掌握了一些基本的取值、赋值、循环等技巧之后，不妨在了解一些也许你们不太了解的数组用法，这些都会是很有用的数组编程技巧

1，取工作表区域的绝对引用公式到数组：arr=[a1:c5].Formula

2，取工作表区域的相对引用公式到数组：arr=[a1:c5].Formular1c1

3，取工作表区域的转置到数组：arr=Application.Transpose([a1:c5]) 数组间也可以转置：arr1=Application.Transpose(arr)

4，取数组arr的第n列赋值到某列区域：[e1:e5]=Application.Index(arr, , n) 或者赋值产生一个新数组：arr1=Application.Index(arr, , n)

5，同理，取数组arr的第n行赋值到某行区域：[a6:c6]=Application.Index(arr,n , ) 或者赋值产生一个新数组：arr1=Application.Index(arr, n, )

[2005-10-14]感谢山菊花朋友为本贴提供精彩演示附件：

0bK0Oljb.rar (17.16 KB, 下载次数: 3496)

[此贴子已经被作者于2005-10-14 17:14:04编辑过]

foshan · 发表于 2005-10-13 10:26

谢谢!收藏了!

UNARTHUR 兄可以称得上是 “数组大师”!

Long_III · 发表于 2005-10-13 10:27

收藏，学习！谢谢UNARTHUR兄！

cofe2000 · 发表于 2005-10-13 10:29

学习一下，这几天正好在用数组，谢谢

plxmm · 发表于 2005-10-13 10:32

希望看到多多的总结。[em24][em24][em24]

lipton · 发表于 2005-10-13 10:39

"4，取数组arr的第n列赋值到某列区域：[e1:e5]=Application.Index(arr, , n)

5，同理，取数组arr的第n行赋值到某行区域：[a6:c6]=Application.Index(arr,n , )"

以前还不知道可以这样用，一直都是用循环解决，感谢。

cofe2000 · 发表于 2005-10-13 10:45

以下是引用lipton在2005-10-13 10:39:11的发言：
"4，取数组arr的第n列赋值到某列区域：[e1:e5]=Application.Index(arr, , n)

5，同理，取数组arr的第n行赋值到某行区域：[a6:c6]=Application.Index(arr,n , )"

以前还不知道可以这样用，一直都是用循环解决，感谢。

同感

终于搞定了昨天的数组问题了

cofe2000 · 发表于 2005-10-13 10:48

很多数组的用法可能在论坛上还是第一次出现[em17]建议版主加精

yigepure · 发表于 2005-10-13 10:55

厉害.想不到VBA里面的数组也这么精彩呀.有时间多教教我吧:)[em02]

foshan · 发表于 2005-10-13 10:56

强烈请求 UNARTHUR 兄开个数组专题讲座!

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

[原创][数组]补充一些大家不太了解的数组用法

评分