VBA将“PrintObject”属性设置为false，内联代码

-2

我在我的SourceCode中创建了一个ActiveX按钮并将其置于其中。之后，我改变了标题protery并得到一个点击事件。现在我必须更改我的源代码中的“打印对象”属性。VBA将“PrintObject”属性设置为false，内联代码

但我不知道如何。

我试过一个：

ActiveSheet.OLEObjects((22 + counter)).Object.PrintObject= False

（22从按钮的指数）

和

Dim rangeString As range 
Dim name As String 
name = "J" & verifyRow & ":" & "K" & verifyRow 
Set rangeString = ActiveSheet.range(name) 
Set obj = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False, DisplayAsIcon:=False, Left:=rangeString.Left, Top:=rangeString.Top, Width:=rangeString.Width, Height:=rangeString.Height, PrintObject:=False)

但没有任何工程。

来源

2017-05-09 Nyxero

你的问题很不清楚，你甚至没有问过。另外“*我无法找到任何有关*的信息”意味着你甚至没有使用Google，因为[Button.PrintObject Property]（https://msdn.microsoft.com/en-us/library/microsoft.office。 tools.excel.controls.button.printobject.aspx）是第一个结果，如果你谷歌的“打印对象”。告诉我们你试图做什么（例如你的代码）它实际上做了什么以及你期望它做什么。见[问]如何写出一个好问题。 –

对不起。我知道我可以在PropertyView中从该对象中更改此属性。但是我想在我的SourceCode中设置这个属性。 – Nyxero

您可以使用

ActiveSheet.OLEObjects("CommandButton1").PrintObject = False

其中CommandButton1是你的按钮的名称（不是字幕）。

或者，如果你喜欢用指数

ActiveSheet.OLEObjects(1).PrintObject = False

写在参考文献：Button.PrintObject Property。

而不是ActiveSheet我建议使用ThisWorkbook.Worksheets("Sheet1")完全指定工作表。

来源

2017-05-09 14:28:15

VBA将“PrintObject”属性设置为false，内联代码

回答

相关问题