Excel VBA: Copying Pictures from image controls to activeX objects -

-

i have series of images need display multiple times on both forms (via image controls) , on worksheets (via activex image controls). know keep files externally , use loadpicture method; there want avoid if possible.

i know save , load- again rather not use external file write perform task. ideally, stay embedded , hidden within file itself.

i think there maybe solution in using clipboard- couldn't syntax work. object embedded in same location(s); never moves or changes size or other properties (beyond .visible). simple like;

sheet1.oleobjects("toimage").object.picture = frm1.fromimage.picture

**edit: **
think i've found solution this; still have related question.

i worked out want if embed series of activex images on sheet; reference them in actual controls / objects want. so;

sheet1.oleobjects("toimage").object.picture=sheet1.oleobjects("fromimage").object.picture

or 

frm1.controls("toimage").picture = sheet1.oleobjects("fromimage").object.picture

but, below doesn't work when try same using inserted picture (a shape object);

frm1.toimage.picture =  sheet1.shape("fromimage").picture

..isn't valid syntax. seems thing can them copy them- couldn't use them set picture of object without using clipboard.

the solution above works me (using series of activex image objects rather pictures)- curious why can't using standard picture (shape).

if want add picture excel sheet use this:
(you can change activesheet favorite sheet)

dim asheet worksheet dim ashape shape set asheet = activesheet set ashape = asheet.shapes.addpicture("<filename>", msofalse, msotrue, 120, 120, 200, 200)

and more details :

function addpicture(filename string, linktofile msotristate, savewithdocument msotristate, left single, top single, width single, height single) shape

function addpicture2(filename string, linktofile msotristate, savewithdocument msotristate, left single, top single, width single, height single, compress msopicturecompress) shape

and if want load picture image component on form :
(add image component form [: image1])

set image1.picture = loadpicture("<filename>")

Comments

Post a Comment

Popular posts from this blog

objective c - Change font of selected text in UITextView -

-
can suggest me how change font of selected text in uitextview.i cannot use uiwebview since have edit text. have seen pages app.how possible in app. see formatting text within uilabel differently . since need editing, should @ javascript-based editors such ckeditor or tinymce . highly recommend wwdc 2011 video session 511: "rich text editing in safari on ios."
Read more

php - Accessing POST data in Facebook cavas app -

-
so i've got simple form in canvas / iframe facebook app, , i'm trying pass along values post. reading on s.o. , fb's latest docs, understand it, data send via post form can accessed on receiving end $_request object. i read on thread on s.o. in order post forms work need pass along input named "signed_request" value current signed_request (i have signed request working ok otherwise...all login , authentication stuff working fine). isnt mentioned anywhere in official fb docs. so problem comes in $_request object signed request, , bunch of other session stuff. form inputs found. the way can read them set method of form "request" isn't real form method. takes of inputs , sends them args in url. horrible. here's sample page canvas app form i'm using try debug (leaving out authentication stuff): <form enctype="application/x-www-form-urlencoded" method="post" target="_top" id="my_form" action=...
Read more

c# - Getting control value when switching a view as part of a multiview -

-
i have following code in aspx page: <asp:button id="display_button" runat="server" text="display" onclick="button1_click" /> &nbsp; <asp:button id="edit_button" runat="server" text="edit" onclick="button2_click" /> &nbsp; <asp:button id="save_button" runat="server" text="save" onclick="button3_click" visible="false" /> &nbsp; <asp:multiview id="multiview1" runat="server" activeviewindex="0"> <asp:view id="view1" runat="server"> <asp:formview id="view_program" runat="server"> <itemtemplate> <%# eval("status").tostring().trim() %> </itemtemplate> </asp:formview> </asp:view> <asp:view id="view2" runat="server"> ...
Read more