【发布时间】:2017-05-24 21:13:25
【问题描述】:
我想将单元格的值和格式(文本颜色、字体大小、粗体等)从一个工作簿拉入/复制到另一个工作簿。
据我了解,使用标准单元格引用不起作用,您需要 vba。
这是一些 vba 代码,可将同一工作表中的格式从 a3 复制到 a10:
Dim ping As Boolean
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A3")) Is Nothing Then
If ping = False Then
Range("A3").Copy
Range("C10").PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _
, SkipBlanks:=False, Transpose:=False
End If
ping = True
Exit Sub
Else
ping = False
End If
End Sub
如何更改此代码以从名为“mybook”的不同工作簿复制 A3?
【问题讨论】:
-
是的,如果您不想手动操作,则需要 VBA。公式仅用于计算,因此它们仅引用单元格的值,因为您无法使用边框和文本颜色进行计算。