How to import multiple image files into spreadsheet

  • Thread starter Thread starter wraithlead
  • Start date Start date
W

wraithlead

Need assistance. I have the file paths. need to import up to 15 photo
saved as jpegs. if i could get them to be a certain size, that would b
a good bonus. Could i use:

object.Picture = LoadPicture( pathname )

?

I'm still kinda new...

Thanks,

Richar
 
Richard,

Got this via the macro recorder and a bit of tweaking

ActiveSheet.Pictures.Insert( _
"C:\Documents and Settings\Bob\My Documents\My
Pictures\classic_beetle.jpg"). _
Select
With Selection.ShapeRange
.ScaleWidth 0.76, msoFalse, msoScaleFromTopLeft
.ScaleHeight 0.77, msoFalse, msoScaleFromTopLeft
.Left = ActiveSheet.Columns("B").Left
.Top = ActiveSheet.Rows(3).Top
End With
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

File size gets huge on photo insert 4
The Last of Us - Part I (PC) 6
Importing JPEG data into spreadsheet 4
Loading Pictures in Image box 5
Command Button to import worksheets 1
Loadpicture - check if file exists 3
How to Export Gmail Emails to PST Format? 6
Multiple Excel File Import 3

Back
Top