早教吧作业答案频道 -->其他-->
office:2列比较,如何挑出数值相同的,还有不同的?例:A列有500个名字,B列有3000个名字,将B列和A列相同的名字放在C列;将B列和A列不同的名字放在D列.)第一个回答:请教怎么插入宏.第二个回
题目详情
office:2列比较,如何挑出数值相同的,还有不同的?
例:A列有500个名字,B列有3000个名字,将B列和A列相同的名字放在C列;将B列和A列不同的名字放在D列.)
第一个回答:请教怎么插入宏.
第二个回答:好像是错的,相同名字错行的话,结果就不对了.
例:A列有500个名字,B列有3000个名字,将B列和A列相同的名字放在C列;将B列和A列不同的名字放在D列.)
第一个回答:请教怎么插入宏.
第二个回答:好像是错的,相同名字错行的话,结果就不对了.
▼优质解答
答案和解析
Sub aaa()
'先把A读到一个变量里
For i = 1 To 500
nameas = nameas & Range("a" & i).Value & ","
Next
ccount = 1
DCount = 1
For i = 1 To 3000
nameb = Range("B" & i).Value
'MsgBox nameb
If (InStr(nameb,nameas) > 0) Then
Cells(ccount,3) = nameb
ccount = ccount + 1
Else
Cells(DCount,4) = nameb
DCount = DCount + 1
End If
Next
End Sub
把这个加到宏里,执行一下试试.
'先把A读到一个变量里
For i = 1 To 500
nameas = nameas & Range("a" & i).Value & ","
Next
ccount = 1
DCount = 1
For i = 1 To 3000
nameb = Range("B" & i).Value
'MsgBox nameb
If (InStr(nameb,nameas) > 0) Then
Cells(ccount,3) = nameb
ccount = ccount + 1
Else
Cells(DCount,4) = nameb
DCount = DCount + 1
End If
Next
End Sub
把这个加到宏里,执行一下试试.
看了office:2列比较,如何挑...的网友还看了以下:
在列车内的水平桌面上放一杯水,如果水面突然左低右高,则列车的运动状态可能列车突然向左启动或列车向左运 2020-03-31 …
23892U是一种放射性元素,进行一系列放射性衰变,由图可知()A.图中m是82,n是206B.① 2020-04-05 …
(2010•和平区模拟)23892U是一种放射性元素,进行一系列放射性衰变,由图可知()A.表中a 2020-04-05 …
初一暑假科学作业.指出下列各属于什么运动。1.风吹树叶落地:2.上月桂花开放:3.大屏幕彩电上播放 2020-04-11 …
23592U是一种放射性元素,能够自发地进行一系列放射性衰变,如图所示,可以判断下列说法正确的是( 2020-05-02 …
在5*5的棋盘里放入ABCD这4个不同的棋子,要求每行最多放1个,每列最多放3个.那一共有多少种不 2020-05-17 …
将若干只鸡放入若干个笼中.若每个笼中放4只,则有一只鸡无笼可放;若每个笼中放5只,则恰有一笼无鸡可 2020-05-21 …
关于美国门户开放的两个问题1,美国门户开放政策的含义是什么?A.清政府与西方列强相互开放B.西方势 2020-06-08 …
将若干只鸡放入若干个笼,若每个笼里放4只,则有一只鸡无笼可放;若每个笼里放5只,则有一笼无鸡可放, 2020-06-23 …
按时间顺序排列下列事件,正确的排列是1.提出社会主义初级阶段理论2.做出实行改革开放的决策按时间顺 2020-06-23 …