作者azuel (Observer)
看板Visual_Basic
標題Re: [VBA] Excel VBA巨集數量加總比對
時間Thu Mar 14 14:34:14 2019
※ 引述《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://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1552545257.A.5C8.html
1F:→ darklimit: 謝謝大大的說明,我在想想看 03/14 21:20
2F:→ MOONRAKER: join這招不錯 03/15 09:52