如何在 activex 框架上置于最前面

How to bring to front on activex frame

我在 excel sheet 中插入了一些框架(Microsoft Forms 2.0 框架)。我希望我可以单击一个然后将它带到所有其他框架的前面。但它不工作。使用以下代码。 frame1 仍在 frame2,3,4... msobringtofront 适用于正常插入的形状,但不适用于 frame

Private Sub Frame1_Click()
ActiveSheet.Shapes("frame1").ZOrder msoBringtofront
End Sub

试试这个

Sub Sample()
    Dim oleObj As OLEObject

    Set oleObj = ActiveSheet.OLEObjects("frame1")

    oleObj.BringToFront
End Sub