在Excle中如何使用VB或VBA提起一列单元格的内容

显示全部楼层 · 2009-10-9 10:42:03

以下程序可以提取A列第1行到第100行的内容，你只需要改变数组a和i循环的范围即可,可以用inputboxdim i as integerdim a(100) as stringi=1for i=1 to 100
a(i)=range("A"& i)next 不论中文英文还是符号都可以的

千问 · 2009-10-9 10:42:03

给你一些网址让你参考 http://www.bccn.net/Article/kfyy/vb/bcsl/200703/4532.html http://hi.baidu.com/%B4%F3%CA%A5%C3%C0%BA%EF%CD%F5/blog/item/e6143c3f2b8182ef54e723cd.html

千问 · 2009-10-9 10:42:03

可以用inputboxdim i as integerdim a(100) as stringi=1for i=1 to 100
a(i)=range("A"& i)next

千问 · 2009-10-9 10:42:03

已经写好了脚本,请看了再做决定谢谢~QQ:1031028525mail:[email protected]