【excel怎么复制方框】Excel图表文本框的复制和粘贴方法就是这种方法

在此Excel中，除了使用图形的方法外，还可以生动地显示工作表。这些图形的使用有一些需要操作的代码。

本节介绍如何在工作表中复制和粘贴图形。

如上图所示，简单地复制了几个文本框。和其他图表的道理使用方法一样。

这将使用表示绘图层上的对象(例如选定图形、任意多边形、OLE对象或地物)的对象Shape。

默认方法如下图所示。

代码

Me。Shapes(2)。OnAction='ShowX ' '指定宏

Me。Shapes(2)。复制“拷贝”

Me。粘贴“粘贴”

删除“Selec”

Me。Shapes(2)。“PickUp”复制格式

Me。Shapes(3)。“应用”参考格式

Set xobj=Me。Shapes(2)。' Duplicate '复制并返回Shape引用

With xobj

.Top=20

.Left=20

.Width=200

.Height=200

End With

Me。Shapes(2)。OnAction=' ' '取消宏

解释

1.如果需要特定于Shape的自动化功能，可以执行宏任务。

可以使用OnAction方法设置路径

Me。Shapes(2)。OnAction='ShowX ' '指定宏

Me。Shapes(2)。OnAction=' ' ' '取消宏

2.要将一个Shape的图案应用于另一个Shape，可以使用以下两行代码：

Me。Shapes(2)。“PickUp”复制格式

Me。Shapes(3)。“应用”参考格式

3、如果想复制和返回Shape，可以使用以下代码：

Set xobj=Me。Shapes(2)。' Duplicate '复制并返回Shape引用

对象xobj是复制和返回的对象。

通过熟悉这些点，您可以基本了解如何复制和使用某些Shape对象。

欢迎关注，所长。

-结束-