派出所的一個朋友在調查一起案件的時候，遇到了一個如題的問題，請我幫忙。由于要保密他不能提供原始數據，只是給我談了一下要求。目前他們通過一個嫌疑犯的通話記錄，從通話記錄中又列入了n個新嫌疑犯，而且也得到每個嫌疑犯的通話記錄。現在就要將這些通話記錄進行統計，即同一個電話號碼，每個嫌疑犯打了多少次，有多少個嫌疑犯同時打過同一個號碼。

　　根據上述總結，Excel表如下：

圖一：原始數據表

圖二：統計結果表

　　上圖說明：

　　圖一：用戶一、用戶二、用戶三、用戶四正面的數字為模擬的電話號碼;方向是指主叫還是被叫，沒有什么意義。

　　圖二：用戶正面的數字是該電話所使用的次數，如果一個電話只被某一用戶打過，這樣就不統計，換句話說就是統計結果表中的電話號碼至少被兩個以上的用戶打過。

　　解決的思路：

　　⒈ 此統計無法使用函數、數據透視表等普通的方法來解決。我采用了VBA編程來實現的統計。

　　⒉ 首先將所有用戶的電話(不重復，重復的只取一次)，提取出來存放到統計結果表中。這樣結果表中的電話是唯一的。

　?、?通過結果表的電話號碼為基礎，統計每個用戶使用該號碼的次數并將統計的結果存放到結果表該用戶下。

　?、?刪除同一個電話號碼被兩個以下用戶使用的行。

　　解決的方法：

　?、?因為用戶的數量是未知的，但從第2列開始是已經的，這樣我們就可以通過循環來進行統計。循環的條件通過第1行從第2列開始，單元格不空。

　　⒉ 每個用戶的電話號碼循環與⒈類似

　　具體的程序源代碼如下：