用於連接列中字符串的Excel宏

Question

對於列A中的第一個唯一名稱，在C列中創建一個字符串，由列B中由字符「〜」分隔的字符串組成。列C中第一組字符串下的單元格應該是空白的。該表顯示了字符串應該如何看起來的前兩種，寫一個簡單的宏來創建剩餘的。這是一個壓縮的表，你可以用數據在其下載：

http://ibird.com/hub/Elance_Job.xls.zip

這裏是片的外觀的情況下，你不能下載：

Col A   Col B    
Clark's Grebe Clarke's Grebe_040514_LE_01 
Clark's Grebe Clarke's Grebe_040514_LE_02 
Clark's Grebe Clarke's Grebe_040514_LE_03 
Clark's Grebe Clarke's Grebe_040514_LE_04          

Col C (what I need to create) 
Clarke's Grebe_040514_LE_01~Clarke's~Grebe_040514_LE_02~Clarke's Grebe_040514_LE_03~Clarke's Grebe_040514_LE_04 

Col A   Col B 
Common Loon Common Loon_040514_LE_01 
Common Loon Common Loon_040514_LE_02 
Common Loon Common Loon_040514_LE_03 
Common Loon Common Loon_040514_LE_04 
Common Loon Common Loon_040514_LE_05 
Common Loon Common Loon_040514_LE_06 
Common Loon Common Loon_040514_LE_07 

Col C (what I need to create) 
Common Loon_040514_LE_01~Common Loon_040514_LE_02~Common Loon_040514_LE_03~Common Loon_040514_LE_04~Common Loon_040514_LE_05~Common Loon_040514_LE_06~Common Loon_040514_LE_07 

Answer 1

我需要一個額外的列：

在D2把下面的公式，並把它複製下來

=IF(A2=A3,B2&"~"&E3,B2) 

在C2把下面的公式，並將其複製下來

=IF(A2<>A1,D2,"") 

編輯 對不起...剛纔注意到你實際上是在尋找一個宏。

如果您不想使用額外的列，則可以使用D2中的公式，然後在當前行A單元格與先前的A行單元格匹配時，將條件格式化爲白色白色。