[問題] Excel-比對兩欄資料後刪除

看板Office作者 (綠豆)時間14年前 (2012/05/03 11:10), 編輯推噓0(002)
留言2則, 1人參與, 最新討論串1/1
===============後來研究一下,兩個問題都解決了!! 感謝soyoso============= 包含字串就依照s大說的加"*",前後都OK, 可能SQL用慣了...一開始很天真的加"%"... 另外提到巨集沒反應只是因為我後來發現我CSV做分割後, 字串前面多個空白鍵,所以後來我把""裡前後加上*就成功了! thanks~ 軟體: EXCEL 版本: 2010 各位好 最近有個整理報表的問題想解決,碰到一些問題想問一下 表格內容如下(.CSV) A欄 B欄 C欄 A=>B C D 我收到資料後會先將該表整理成 A欄 B欄 C欄 D欄 A B C D 然後我目的是想比對A欄和B欄後,刪掉達到條件的資料 例如當A值為1且B值為5時,刪掉那筆資料 做了點功課有弄個巨集來做,程式如下 For i = Range(ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Address).Row To 1 Step -1 If ActiveSheet.Cells(i, 1).Value = "1" And ActiveSheet.Cells(i, 2).Value = "5" Then Rows(i).Delete Next i 但目前遇到個問題,就是不知道為什麼刪不掉, 我試過自己在一張新的工作表自己key些值就可以, 但在這張自行整理的CSV就無法執行(但把欄位中資料刪掉在key一次就可以...) 我整理方式是將原A欄資料貼到記事本,將 => 取代成 , 再匯回來, 因為本來想使用資料頗析切他只能放一個符號, 不知道是否為欄位格式問題,另外想請問若我比對的資料是想包含某些字要如何寫? 用 value like "XXX" 沒反應 >"< 謝謝~ -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 203.65.71.253

05/03 13:15, , 1F
ActiveSheet.Cells(i, 1).Value Like "1*" And ActiveSheet
05/03 13:15, 1F

05/03 13:15, , 2F
.Cells(i, 2).Value Like "5*"
05/03 13:15, 2F
※ 編輯: inomata 來自: 203.65.71.253 (05/03 15:44)
文章代碼(AID): #1FeVSZUf (Office)
文章代碼(AID): #1FeVSZUf (Office)