visio中，插入了一个本地图片，通过vba编程重新设置其位置，怎么设啊
怎么通过vba实现重新固定图片的位置？shpObjID=ActiveWindow.Selection(1).IDApplication.ActiveWindow.Page...
怎么通过vba实现重新固定图片的位置？
shpObjID = ActiveWindow.Selection(1).ID Application.ActiveWindow.Page.Shapes.ItemFromID(shpObjID).CellsSRC(visSectionObject, visRowXFormOut, visAlignLeft).FormulaU = "10"
上面代码可以设置其距离左边的位置，Y坐标如何确定？ 展开
shpObjID = ActiveWindow.Selection(1).ID Application.ActiveWindow.Page.Shapes.ItemFromID(shpObjID).CellsSRC(visSectionObject, visRowXFormOut, visAlignLeft).FormulaU = "10"
上面代码可以设置其距离左边的位置，Y坐标如何确定？ 展开
若以下回答无法解决问题，邀请你更新回答
1个回答
展开全部
X坐标
Application.ActiveWindow.Page.Shapes.ItemFromID(1).CellsSRC(visSectionObject,visRowXFormOut, visXFormPinX).FormulaU = "110 mm"
y坐标 Application.ActiveWindow.Page.Shapes.ItemFromID(1).CellsSRC(visSectionObject,visRowXFormOut, visXFormPinY).FormulaU = "100 mm"
Application.ActiveWindow.Page.Shapes.ItemFromID(1).CellsSRC(visSectionObject,visRowXFormOut, visXFormPinX).FormulaU = "110 mm"
y坐标 Application.ActiveWindow.Page.Shapes.ItemFromID(1).CellsSRC(visSectionObject,visRowXFormOut, visXFormPinY).FormulaU = "100 mm"
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
