返回列表 上一主題 發帖

[發問] 相同資料之特定欄位第二筆資料用他值取代

b9208

帖子
182 
主題
34 
精華
0 
積分
316 
點名
0  
作業系統
Win 7 
軟體版本
Office 2010 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-5-2 
最後登錄
2023-6-24 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-4-14 15:25 | 顯示全部帖子

[發問] 相同資料之特定欄位第二筆資料用他值取代

先進您好
資料排序後，幾個特定欄位之資料相同者，只保留固定欄位第一筆資料，第二筆以後用0值取代。
將固定欄位等於0者，整列填滿黃色。
如附檔內說明
謝謝指導

B1.rar (8.73 KB)
收藏 分享
100 字節以內
不支持自定義 Discuz! 代碼

b9208

帖子
182 
主題
34 
精華
0 
積分
316 
點名
0  
作業系統
Win 7 
軟體版本
Office 2010 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-5-2 
最後登錄
2023-6-24 
2#
發表於 2013-4-14 22:30 | 顯示全部帖子
回復 2# GBKEE
謝謝版主
執行ok
不了解Exists & Phonetic 函數，上網查也不解。
不知道下面句子含義
If Not D.EXISTS(Application.Phonetic(.Rows(I))) Then
     Set D(Application.Phonetic(.Rows(I))) = .Rows(I)
  Else
     Set D(Application.Phonetic(.Rows(I))) = Union(D(Application.Phonetic(.Rows(I))), .Rows(I))
End If
以上謝謝
100 字節以內
不支持自定義 Discuz! 代碼

TOP

b9208

帖子
182 
主題
34 
精華
0 
積分
316 
點名
0  
作業系統
Win 7 
軟體版本
Office 2010 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-5-2 
最後登錄
2023-6-24 
3#
發表於 2013-4-14 23:02 | 顯示全部帖子
回復 3# b9208
排序範圍：
左上角[A6]，右下角為不定算，依照資料而定( 可能包含空白列或欄）
100 字節以內
不支持自定義 Discuz! 代碼

TOP

        靜思自在 : 我們最大的敵人不是別人．可能是自己。
返回列表 上一主題