是否可以使用 VBA 将一个 Excel 工作表的格式复制到另一个工作表。
就像手动一样,我们可以通过选择整个工作表然后单击格式按钮来完成。然后选择其他工作表,格式将被复制。是否可以通过代码来实现。
感谢和问候
萨希尔·乔杜里
绝对地。下面是示例代码。
see https://msdn.microsoft.com/en-us/library/office/ff837425.aspx https://msdn.microsoft.com/en-us/library/office/ff837425.aspx
Sub Wsh_PasteSpecial()
Dim WshSrc As Worksheet
Dim WshTrg As Worksheet
Rem Set working worksheets
Set WshSrc = ThisWorkbook.Worksheets("Source")
Set WshTrg = ThisWorkbook.Worksheets("Target")
WshSrc.Cells.Copy
With WshTrg.Cells
.PasteSpecial Paste:=xlPasteColumnWidths
.PasteSpecial Paste:=xlPasteFormats
.PasteSpecial Paste:=xlPasteFormulasAndNumberFormats
Application.CutCopyMode = False
End With
End Sub
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)