读书人

请教怎么在EXCEL中实现这样的动态刷新

发布时间: 2012-01-20 18:53:53 作者: rapoo

请问如何在EXCEL中实现这样的动态刷新呢?
例如表格的A列的每个单元格的数据有效性是设置了以G列为数据源的序列,并提供下拉箭头。加入A列现在已经输入了很多项目。

例如G列的元素是:手机,电脑,汽车,工具箱。

我现在希望实现的功能是,假如我在G列中,把“汽车”的那个单元格改成“小汽车”,然后A列中所有内容为“汽车”的单元格全部自动更改成“小汽车”。

小弟是菜菜菜鸟。请指教!!

[解决办法]
懂VBA就看看这个吧, 在VBA中双击sheet1,添加下面的代码即可!


Public t1, r1

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox "t1=" & t1 & vbCrLf & "r1=" & r1 & vbCrLf & "range(r1).Text =" & Range(r1).Text
If Left(r1, 2) <> "$G" Then Exit Sub
Range("A:A").Replace What:=t1, Replacement:=Range(r1).Text, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
t1 = ActiveCell.Text
r1 = ActiveCell.Address
End Sub

[解决办法]
查找替换一下就行了,10秒钟都不要的

读书人网 >OFFICE教程

热点推荐