读书人

急Excel有关问题关于替换。

发布时间: 2012-01-24 23:11:55 作者: rapoo

急求助,Excel问题,关于替换。。。
比如现在有一张表如下:

AAA 1
BBB 2
CCC 3
DDD 4
EEE 5

请问,我想实现在这张表内在某一单元格内输入 "1 "时,这个单元格内会自动替换成 "AAA ";或者某一单元格内输入 "3 "时,单元格内会自动替换成 "CCC "……这样的对应。
谢谢大家了

[解决办法]
假定是在C1里输入1, =LOOKUP(2,1/(B1:B5=C1),A1:A5)
[解决办法]
例如你要求是Sheet1表内容变化,你的数据放在A1:B5单元格,那么在VBA编辑器里的Sheet1里输入以下代码,即可实现!
Private Sub Worksheet_Change(ByVal Target As Range)
If IsNull(Target) < 1 Then Exit Sub
For i = 1 To 5
If Target = i Then
Range(Target.Address) = Range( "a " & i)
End If
Next
End Sub

读书人网 >OFFICE教程

热点推荐