如何将指定工作单元格的引用转换成被引用的值？

作者：绿色风分类：时间：2022-08-18 浏览：129

楼主 omnw	Q：如何将指定工作单元格的引用转换成被引用的值？ A：将单元格的引用转换成被引用单元格的值可以有多种方法，在这里介绍一种使用VBA追踪被引用单元格然后赋值的方法。 Sub tihuan() Dim sht As Worksheet Dim rng As Range Dim rng1 As Range For Each sht In Worksheets If sht.Name <> "Sheet5" Then '仅转换对Sheet5工作表引用 For Each rng In sht.Range("A1:I6") '需要转换的数据区域 On Error Resume Next Set rng1 = Range(rng.Formula) '判断当前单元格是否有引用 If Not rng1 Is Nothing Then If Range(rng.Formula).Parent.Name = "Sheet5" Then '判断被引用单元格是否在指定的工作中 rng.Value = Range(rng.Formula).Value End If End If Next End If Next End Sub 引用问题.rar
2楼無心	来学习一下。
3楼 dgxsdr	建议增加如InputBox语句，使需要数值化的表的链接可选

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表