excel中不同列比较相同的行值解决办法

excel中不同列比较相同的行值
名称 数值        名称     数值   以此表名称为准,放入前面表对应的数值
 a    4         a        3       4
 b    5         df       0        1
 df   1         k        1        0
 k    0
vba编程怎么去实现.excel-2003
请网友给予解答 
------解决方案--------------------
啥意思?excel中不同列比较相同的行值解决办法
------解决方案--------------------
求公式还是求宏呢?
------解决方案--------------------
用公式即可:
A列   B列
a     4
b     5
df    1
k     0
...
在C1输入df
在D1中输入公式:=LOOKUP(C1,A1:A4,B1:B4)
------解决方案--------------------
引用:
A列   B列   c列
a     4    df
b     5      a
df    1      k  
k     0
输入您的公式,这样a 就不准了


A列B列不要动,你换个地方输入不就行啦吗。

你自己看看LOOKUP的公式说明吧
------解决方案--------------------
本帖最后由 bcrun 于 2013-12-26 09:14:33 编辑
不知楼主有没有VBA基础?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If bb = 1 Then
     If Cells(aa, bb) <> "" Then
        cc = Cells(aa, 1)
        Call Macro1
     End If
  End If
  aa = Selection.Row                      '选区左上角行号
  bb = Selection.Column                   '选区左上角列号
End Sub

把以上代码粘贴到工作表Sheets("Sheet2")的代码区

建一个模块 粘贴上以下代码

Public aa As Long, bb As Long, cc As String

Sub Macro1()
    Sheets("Sheet1").Select   '激活工作表Sheet1
    If Not [A:A].Find(cc, , , 1) Is Nothing Then  '在工作表Sheet2(A列)中找到了工作表Sheet2(A列)活动单元格改变之前单元格的值
       bb = [A:A].Find(cc, , , 1).Row
       Sheets("Sheet2").Range("C" & aa) = Range("B" & [A:A].Find(cc, , , 1).Row)
    End If
    Sheets("Sheet2").Select   '激活工作表Sheet2
End Sub


运行方式:当工作表Sheet2的A列录入的值在工作表Sheet1(A列)找到,工作表Sheet2的C列就会撮提取到对应的值。OK
------解决方案--------------------
 宏的优点是工作表上没有任何公式,但安全等级得设为中级,打开工作表时会提示是否起用宏,不了解VBA的朋友会把宏与病毒划等号,excel中不同列比较相同的行值解决办法都是那些混蛋坏了宏的名声。
------解决方案--------------------
Macro1模if 判断中 bb = [A:A].Find(cc, , , 1).Row 句是多余 的 
------解决方案--------------------
引用:
我C列是固定的

公式想放在哪儿,你自己定,只要没冲突即可excel中不同列比较相同的行值解决办法
------解决方案--------------------
引用:
qq聊吧 给我qq
 回我的吗? 994686064 这是工作日上班时间一般都 在线,但不能多聊,只能联系一下,晚上一般不上,如果需要的话可预约excel中不同列比较相同的行值解决办法助人为乐