时间戳

首页 > 解决方案 > 更改部分 excel 论坛以包含来自另一个单元格的数据

excel - 更改部分 excel 论坛以包含来自另一个单元格的数据

问题描述

我正在寻找一种简单的方法来替换 Excel 中的部分公式。

我每年必须为超过 66,000 个公式执行此操作。目前我使用查找和替换来加快工作速度，但仍然需要几个小时才能完成。

='C:\Excel\[File1.xlsm]08-01-20'!V5

我想用08-01-20单元格的值替换上面公式的部分C2

标签： excelvbaexcel-formula

解决方案

以格式创建两个列表"dd-mm-yy",（一个包含不正确的日期，一个包含正确的

然后替换以下脚本中的示例日期并运行。

Sub Multi_FindReplace()

Dim sht As Worksheet
Dim fndList As Variant
Dim rplcList As Variant
Dim x As Long

 fndList = Array("04-01-20", "11-01-20")
 rplcList = Array("05-01-20", "12-01-20")

  For x = LBound(fndList) To UBound(fndList)
      For Each sht In ActiveWorkbook.Worksheets
        sht.Cells.Replace What:=fndList(x), Replacement:=rplcList(x), _
          lookat:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _
          SearchFormat:=False, ReplaceFormat:=False
      Next sht

  Next x

End Sub

推荐阅读