How to bring to front on activex frame

Question

I insert some frames (microsoft forms 2.0 frame) into the excel sheet. And I wish i could click one then bring it to front of all other frames. but it is not working. with the belowing code. frame1 still under the frame2,3,4... msobringtofront works well on normal inserted shapes, but not with the frame

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

score 4 · Accepted Answer · answered Jun 05 '17 at 16:11

4

Try this

Sub Sample()
    Dim oleObj As OLEObject

    Set oleObj = ActiveSheet.OLEObjects("frame1")

    oleObj.BringToFront
End Sub

answered Jun 05 '17 at 16:11

Siddharth Rout

147,039
17
206
250

score -1 · Answer 2 · answered Jan 05 '23 at 12:21

-1

ZOrder method: Frame1.ZOrder (fmTop)

answered Jan 05 '23 at 12:21

BatMan

1

How to bring to front on activex frame

2 Answers2