CellShocked formulated the question :
On Sun, 27 Jan 2013 17:57:20 -0500, GS wrote:
ActiveSheet.Pictures("Picture 56")...
Then you can set it size/position like this...
With ActiveSheet.Pictures("Picture 56")
.Top = TargetCells.Top: .Left = TargetCells.Left
.Width = TargetCells.Offset(0, TargetCells.Columns.Count).Left -
.left
.Height = TargetCells.Offset(TargetCells.Rows.Count, 0).Top - .Top
End With
It's still my opinion to stack in position and toggle visibility!
I haven't got a clue what the heck you're doing with width/height! I'd
use fixed values normally, OR use a fixed size frame so the pics
autofit it. (Just a preference)
The code was originally to paste DVD pics into a set range and it was
for rescaling, I think (it also was borrowed code).
But yeah, I can stack them, I simply want to refrain from making the
external call or being required to provide the externally called files
and their required locations (via the code calls)
so, I will try this out, and if it works, I can stop using the external
files.
On my DVD database, this was not a option, since the image 'database'
would make for a HUGE excel file.
Thanks for your help.
It would serve you well to use something like PaintShop Pro to resize
and convert to GIF so the size of your Excel file isn't humongous.
--
Garry
Free usenet access at
http://www.eternal-september.org
Classic
VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.
vb.general.discussion