問題:http://club.excelhome.net/thread-1397708-1-1.html

主要解法:

文章標籤

chrisovo 發表在 痞客邦 留言(0) 人氣()

問題:http://club.excelhome.net/thread-1395572-1-3.html

文章標籤

chrisovo 發表在 痞客邦 留言(0) 人氣()

問題:http://club.excelhome.net/thread-1394890-1-1.html

chrisovo 發表在 痞客邦 留言(0) 人氣()

問題:http://club.excelhome.net/thread-1394832-1-1.html

文章標籤

chrisovo 發表在 痞客邦 留言(0) 人氣()

網路問題:http://club.excelhome.net/thread-1393985-1-1.html

文章標籤

chrisovo 發表在 痞客邦 留言(0) 人氣()

網路問題:http://club.excelhome.net/thread-1393323-1-1.html

文章標籤

chrisovo 發表在 痞客邦 留言(0) 人氣()

'選取特定儲存格時,會啟動textbox、listbox的功能

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

文章標籤

chrisovo 發表在 痞客邦 留言(0) 人氣()

Sub 資料彙整()
Dim d, arr
Dim i As Long
Set d = CreateObject("scripting.dictionary")
arr = Range("a3:c17908")
For i = 2 To UBound(arr)
If Not d.exists(arr(i, 1)) Then 
d(arr(i, 1)) = arr(i, 2)

'如果Arr(i,1)不存在的話,那麼就將Arr(i,2)的值賦予給Arr(i,1)關鍵字
Else
d(arr(i, 1)) = d(arr(i, 1)) & "、" & arr(i, 2)

chrisovo 發表在 痞客邦 留言(0) 人氣()

Dictionary -  字典对象相当于一种联合数组,它是由具有唯一性的关键字(Key)和它的项(Item)联合组成。

基本寫法:

文章標籤

chrisovo 發表在 痞客邦 留言(0) 人氣()

  • 這是一篇加密文章,請輸入密碼
  • 密碼提示:
  • 請輸入密碼: