作者JimiLin ()
看板Visual_Basic
标题[问题]有关excel的巨集
时间Thu Jun 4 21:50:33 2009
※ [本文转录自 Programming 看板]
作者: JimiLin () 看板: Programming
标题: [问题]有关excel的巨集
时间: Thu Jun 4 21:46:56 2009
各位大哥大姊们
小弟碰到了一个麻烦
就是我在Excel中, 要将一整列的的Email复制起来
Email List
_____________
[email protected]
[email protected]
[email protected]
[email protected]
...
并且变成
[email protected],
[email protected],
[email protected],
[email protected],.....
意思就是 从很多格的资料, 复制到一格里面, 并且都有","(逗点)隔开
那这些动作要如何写在Excel巨集里阿?
跟各位大哥大姊们请益!! 实在感激不尽!! 谢谢!!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 203.70.92.162
※ 编辑: JimiLin 来自: 203.70.92.162 (06/04 21:48)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 203.70.92.162
1F:→ MOONRAKER:for each c in range("a1:100") 06/04 21:53
2F:→ MOONRAKER:cells(1,3).value = cells(1,3).value & "," & c.value 06/04 21:55
3F:→ MOONRAKER:next 06/04 21:55
4F:→ MOONRAKER:最後再自己去掉开头的 , 就完成 06/04 21:55
5F:→ MOONRAKER:哇,写错了,是range("a1:a100")才对 06/04 22:35
6F:→ JimiLin:实在太感谢moonranker的大力指点阿XDDDDDDD 06/04 22:43