[算表] excel搜尋特定資料後再做特定運算

看板Office作者healthbuy (健康買開心敗~)時間11年前 (2015/05/13 00:09)推噓0(0推 0噓 5→)

留言5則, 3人參與討論串1/1

軟體:excel 版本:2007 版上前輩好小弟手中資料因為含有不同單位並且沒有依固定格式排列現在想要把它統一轉換成同一種單位刻度，並且只有數字格式例如 208uA -> 0.208 (mA) 123456nA -> 0.123456 (mA) 現在的想法是利用"尋找與取代"的形式來實現但是雖然單位消掉了，可是卻卡在 do while 的迴圈出不來想請各位前輩指導一下如何解決目前程式如下~ Cells.Find(What:="uA", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,MatchCase:=False _ , MatchByte:=False, SearchFormat:=False).Activate Do While ActiveCell <> "" ActiveCell.Replace What:="uA", Replacement:="" ActiveCell = ActiveCell / 1000 Cells.FindNext(After:=ActiveCell).Activate Loop Cells.Find(What:="nA", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,MatchCase:=False _ , MatchByte:=False, SearchFormat:=False).Activate Do While ActiveCell <> "" ActiveCell.Replace What:="nA", Replacement:="" ActiveCell = ActiveCell / 100000 Cells.FindNext(After:=ActiveCell).Activate Loop 現在可以順利將 uA 的單位取代掉並且 /1000 但是卻卡在 "Cells.FindNext(After:=ActiveCell).Activate" 出不來會有"沒有設定變數或 with 區塊變數" 這個錯誤拜託大家幫忙了~謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.251.235.11 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1431446946.A.CF3.html