excel VBA 任意两列数值完全相同比较
excelVBA问题：例如有10列数据：A1：A100，B1：B100，C1：C100，D1：D100.....当A1=B1，A2=B2，A3=B3，A4=B4，A5=B...
excel VBA问题：例如有10列数据：A1：A100，B1：B100，C1：C100，D1：D100... ..
当A1=B1，A2=B2，A3=B3，A4=B4，A5=B5... ...一直到A100=B100。A列完全相同B列时，或C列完全相同A列，或F列完全相同J列。里面只要有任意两列完全相同的数值。返回相同的其中一列
请问用用什么函数比较？ 展开
当A1=B1，A2=B2，A3=B3，A4=B4，A5=B5... ...一直到A100=B100。A列完全相同B列时，或C列完全相同A列，或F列完全相同J列。里面只要有任意两列完全相同的数值。返回相同的其中一列
请问用用什么函数比较？ 展开
2个回答
展开全部
用VBA 随便在一个单元格输入
=SUMPRODUCT((A1:A100=B1:B100)*1)
判断如果这个单元格值=100 就是完全相同，
直接用for循环
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
A101=IFERROR(LEFT(ADDRESS(1,COLUMN()+MATCH(A1,B1:$J1,0),4,1),1),"")
然后复制A101，粘贴到[A101:I200]
然后复制A101，粘贴到[A101:I200]
追问
用VBA代码实现，EXCEL工作表函数我也会的！
追答
Range("A101:I201").ClearContents
Range("A101:I200").FormulaR1C1 = "=IFERROR(LEFT(ADDRESS(1,COLUMN()+MATCH(R[-100]C,R[-100]C[1]:R[-100]C10,0),4,1),1),"""")"
Range("A201:I201").FormulaR1C1 = "=IF(COUNTIF(R[-100]C:R[-1]C,R101C)=100,R101C,"""")"
最终的计算结果在"A201:I201"区域显示。
内置函数运行效率最高
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
