返回列表 上一主題 發帖

[發問] 重複資料，如何使用VBA方式，指定特定字串製作成清單(已解決)

register313
　頭銜: 麻辣 路人甲

大學生Rank: 4

帖子
967 
主題
0 
精華
0 
積分
1001 
點名
0  
作業系統
WIN XP 
軟體版本
OFFICE 2003 
閱讀權限
50 
性別
男 
來自
台北 
註冊時間
2010-11-29 
最後登錄
2022-5-17 

2012龍年全勤獎章熱烈參與勳章
1# 跳轉到 »
發表於 2011-12-18 13:33 | 顯示全部帖子
回復 1# totes
   初學者VBA
  1. Sub xx()

  3.     Range("G:G") = ""
  4.     I = 2
  5.     X = 1
  6.     Do While Cells(I, 5) <> ""
  7.        If (Cells(I, 5) Like "TC*") And (Range("G:G").Find(WHAT:=Cells(I, 5)) Is Nothing) Then
  8.           Cells(X, 7) = Cells(I, 5)
  9.           X = X + 1
  10.        End If
  11.        I = I + 1
  12.     Loop
  13.     End Sub
複製代碼
重複資料，如何使用VBA方式，指定特定字串製作成清單.zip (92.93 KB)

TOP

        靜思自在 : 一個人不怕錯，就怕不改過，改過並不難。
返回列表 上一主題