帧内容复制到一个表(VBA)
问题描述:
我在用户窗体具有框架,在该帧i有图片和标签。我需要把整个框架完全放在用户窗体中,直接放到表单中。帧内容复制到一个表(VBA)
使用此代码创建一个框到工作表,并接收用户窗体中的图片。但在这种情况下,只有图片会被复制,而不是标签。
Private Sub CommandButton1_Click()
Dim oCheck As OLEObject
For Each oCheck In Plan1.OLEObjects
oCheck.Delete
Next oCheck
With Plan1.OLEObjects.Add(classtype:="Forms.Frame.1", _
Top:=260, Left:=25, Height:=273, Width:=490)
.Object.Caption = ""
.Object.Picture = Me.Frame1.Picture
.Object.BackColor = "&HFFFFFF"
End With
任何建议?
感谢
要给予好评本作的内容,但要downvote,以及它应该是一个评论。现在感觉被撕裂了。 :( –
Abject道歉:-( – mdmackillop