作者darklimit (Yu)
看板Visual_Basic
标题[VBA] Excel VBA巨集数量加总比对
时间Wed Mar 13 00:10:27 2019
想写一个不同工作表栏位加总比对
但栏位选取资料的部分不太懂
目前这样的程式码有问题
需要大神协助...
手机排版不好还请见谅
谢谢
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
-----
Sent from JPTT on my iPhone
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 42.73.210.156
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1552407030.A.503.html
1F：→ MOONRAKER: 当然马有问题 03/13 07:13
2F：→ azuel: 因为A1和A2是array，关键字是compare array value 03/13 09:22
3F：→ darklimit: 知道了我在试试看，谢谢 03/13 20:14
4F：→ azuel: 我突然发现你是要加总，不是要比较两个阵列是不是相同 xD 03/17 21:01
5F：→ azuel: 那先sum array再比较就好了呀 03/17 21:01
6F：→ azuel: 不然简单一点另外弄一个储存格，先加总资料，再做比较 03/17 21:02