Re: [VBA] Excel VBA巨集數量加總比對

看板Visual_Basic作者 (Observer)時間5年前 (2019/03/14 14:34), 編輯推噓0(002)
留言2則, 2人參與, 5年前最新討論串2/2 (看更多)
※ 引述《darklimit (Yu)》之銘言: : Sub sum() : Dim A1 as Variant : Dim A2 as Variant : A1 = sheets(“Sheets1”).Range(“A1:C6”).Value : A2 = sheets(“Sheets2”).Range(“A1:C6”).Value : If A1 = A2 Then : MsgBox “沒問題” : Else : MsgBox “有問題,請重新檢查” : End If : End sub 之前忙,沒空回code,我大致講一下怎樣處理,詳細的code你琢磨一下 如果你有要檢查具體是array裡面哪一個value不對,能找出錯誤處的話 要用loop去一個個比對,因為是二維陣列,記得多考慮一層 如果你只是要看兩個陣列是不是完全相同 1. 先用Ubound和Lbound確認兩個陣列是不是一樣大,如果不一樣大就直接完工 2. 用join()把整個陣列串成一個string,看看A1跟A2轉換後是不是相同 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 218.161.27.67 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1552545257.A.5C8.html

03/14 21:20, 5年前 , 1F
謝謝大大的說明,我在想想看
03/14 21:20, 1F

03/15 09:52, 5年前 , 2F
join這招不錯
03/15 09:52, 2F
文章代碼(AID): #1SYVNfN8 (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #1SYVNfN8 (Visual_Basic)