A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Excel » Links and Linking
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

Inserting a Picture using Cell as picture name.



 
 
Thread Tools Display Modes
  #11  
Old November 5th, 2008, 11:32 AM posted to microsoft.public.excel.links
the-jackal[_8_]
external usenet poster
 
Posts: 1
Default Inserting a Picture using Cell as picture name.


Bill Manville;729438 Wrote:
The-jackal wrote:--
EDIT: Ok I deleted that line and it seems to be working fine now.
Thanks again for your help.-

-


Having deleted that line you will end up with every picture you have
asked for sitting on top of the others. That's why the line was there,

to delete the last one when it adds a new one.
Put the line back.
And delete all the pictures except the most recent one.
-
Ok just 1 more thing. The picture is really small. Same width as A
column. Can I set it to make the picture width 4 columns eg A16 to

D16
-

You can make the picture whatever size you like.
Just set its Width and Height properties - either in the line that adds

it or subsequently.

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - respond to newsgroup


Ok been using this but was wondering if I can get it to display the
picture at say 20% of its original size.

Thanks again for all the help.




--
the-jackal
  #12  
Old November 6th, 2008, 04:09 PM posted to microsoft.public.excel.links
Bill Manville
external usenet poster
 
Posts: 258
Default Inserting a Picture using Cell as picture name.

The-jackal wrote:
Ok been using this but was wondering if I can get it to display the
picture at say 20% of its original size.


With Me.Shapes.AddPicture(stFile, True, True, Range("A16").Left, _
Range("A16").Top, Range("A16").Width, Range("A16").Width * 3 / 4)
.Name = "NewPic"
' the next 3 lines are new:
.LockAspectRatio = False
.ScaleHeight 0.2, True
.ScaleWidth 0.2, True
End With

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - respond to newsgroup

  #13  
Old November 10th, 2008, 10:21 AM posted to microsoft.public.excel.links
the-jackal[_10_]
external usenet poster
 
Posts: 1
Default Inserting a Picture using Cell as picture name.


Bill Manville;751350 Wrote:
The-jackal wrote:-
Ok been using this but was wondering if I can get it to display the
picture at say 20% of its original size.
-


With Me.Shapes.AddPicture(stFile, True, True, Range("A16").Left, _
Range("A16").Top, Range("A16").Width, Range("A16").Width * 3 /
4)
.Name = "NewPic"
' the next 3 lines are new:
.LockAspectRatio = False
.ScaleHeight 0.2, True
.ScaleWidth 0.2, True
End With

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - respond to newsgroup


Worked great. Thanks again.




--
the-jackal
 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump


All times are GMT +1. The time now is 11:51 PM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 OfficeFrustration.
The comments are property of their posters.