从锁定工作表复制图表 [英] Copying chart from locked sheet

问题描述

下面的宏

'Copy the chart and paste it into the PowerPoint as a Metafile Picture
        cht.Select
        ActiveChart.ChartArea.Copy
        activeSlide.Shapes.PasteSpecial(DataType:=ppPasteMetafilePicture).Select

在 cht.Select 处失败，因为工作表已锁定.我如何对其进行更改才能使其正常工作?

is failing at cht.Select because the sheet is locked. How do I change it to make it work?

推荐答案

将代码更改为

ActiveSheet.Unprotect "password"
cht.Select
ActiveChart.ChartArea.Copy
activeSlide.Shapes.PasteSpecial(DataType:=ppPasteMetafilePicture).Select
ActiveSheet.Protect "password"

解决了问题.

这篇关于从锁定工作表复制图表的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！