作者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