Excel如何实现链接单元格同步内容与格式的双向更新？

Excel默认的Paste Link仅能同步单元格内容，要实现内容与格式的双向自动同步，可通过以下两种方法解决：

方法一：条件格式+自定义名称（无需宏） #

适合仅需同步特定样式（如Styles-Good）的场景：

1. 先通过Paste Link完成内容链接，确保目标单元格内容随原单元格自动更新
2. 点击「公式」→「定义名称」，新建名称OriginalCellStyle，引用位置输入：

   =GET.CELL(53,Sheet1!A1)
   

   （注：将Sheet1!A1替换为你的原单元格地址，参数53用于返回单元格的样式名称）
3. 选中目标单元格，打开「条件格式」→「新建规则」，选择「使用公式确定要设置格式的单元格」，输入公式：

   =OriginalCellStyle="Good"
   

4. 点击「格式」按钮，配置与Styles-Good完全一致的格式（字体、填充色等），确认规则
5. 如需同步其他样式，重复步骤3-4，将公式中的"Good"替换为对应样式名称即可

方法二：VBA宏（自动同步全格式） #

适合需要同步所有格式（样式、字体、边框、填充等）的场景：

1. 按Alt+F11打开VBA编辑器
2. 在左侧工程窗口中找到原工作表（如Sheet1），双击打开其代码窗口
3. 粘贴以下代码（根据实际单元格范围修改）：

   Private Sub Worksheet_Change(ByVal Target As Range)
       Dim sourceRange As Range
       Dim targetRange As Range
       
       ' 设置原单元格范围（Sheet1的Test Data和More Test Data字段）
       Set sourceRange = Me.Range("A1:B1")
       ' 设置目标单元格范围（跨表的对应位置）
       Set targetRange = ThisWorkbook.Sheets("Sheet2").Range("A1:B1")
       
       If Not Intersect(Target, sourceRange) Is Nothing Then
           sourceRange.Copy
           targetRange.PasteSpecial Paste:=xlPasteAll
           Application.CutCopyMode = False
       End If
   End Sub
   

4. 将文件保存为.xlsm格式（启用宏的工作簿），打开时需启用宏

注意事项 #

• 条件格式法无需启用宏，但需针对每个要同步的样式单独配置规则
• VBA宏法可实现全格式自动同步，但依赖宏的启用，且文件需保存为宏兼容格式

内容的提问来源于stack exchange，提问作者Gloria Santin