VBA在复制粘贴过程中保持格式

我有一个macros启用工作簿(受保护的工作表)。 用户可以将input提供给解锁的单元格。

这里的问题是当用户复制粘贴其他应用程序的数据时,它将覆盖现有工作表上使用的格式,这就造成了一个麻烦。

即使用户复制/粘贴,是否可以保持格式?

1)为工作表上使用的各种格式创build自定义样式,(如果可能)为“样式”

 Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("STYLE")).Count = Target.Count Then Target.Style = "STYLE" End If End Sub 

此代码将检查,如果更改的单元格是“风格化的范围内”。 如果所有更改的单元格在样式范围内 – 应用样式。 如果保持范围命名与样式命名一致,则可以使用循环来完成。