Tag: 透明

如何使Excel ActiveX标签在运行时透明?

我想把一个透明的标签放在Excel表格的顶部,这样我就可以利用鼠标单击/拖动/等等来标记MouseMove事件来“绘制单元格”(也就是改变它们的填充颜色等等)。 – 因为我不能这样做细胞本身。 现在一切正常,除了我不能使标签在运行时透明(又名VBA)…而在devise模式中完全一样的东西按预期工作。 具体来说,我有代码(或多或less): Dim MapLabel As OLEObject On Error Resume Next Sheet2.OLEObjects("MapLabel").Delete Set MapLabel = Sheet2.OLEObjects.Add("Forms.Label.1") MapLabel.name = "MapLabel" MapLabel.Placement = xlMoveAndSize MapLabel.Object.Caption = "" ' Problem line below MapLabel.Object.BackStyle = fmBackStyleTransparent ' Problem line above MapLabel.Left = Sheet2.cells(2, 6).Left MapLabel.Top = Sheet2.cells(2, 6).Top MapLabel.Width = Sheet2.cells(2,6).Width * 10 MapLabel.Height = Sheet2.cells(2,6).Height * […]

在Excel VBA中更改系列的透明度而不影响标记透明度

我在VBA中写了一个excel的macros,我想改变一系列连接标记的连线的透明度,但是保留连续标记的透明度。 要指定:图表是散点图。 我希望一系列的标记是不透明/零透明的,并且系列中的线条是75%透明的。 我通过使用myseries.format.line.transparency = 0.75来myseries.format.line.transparency = 0.75行的透明度,但是这也改变了标记透明度。 有没有人知道一种方法,我可以分别改变两者的透明度? 我想有一个成员/财产去做我想做的事,但我找不到。 在此先感谢您的帮助!

如何使用VBA使Excel 2007中的单元格透明

我目前有: Range("Z1").Interior.Color = RGB(255, 255, 255) 但是这消灭了细胞的边界。 相反,我只想将单元格的透明度设置为1.0。 文档似乎暗示它不存在(?)。 谢谢!