Copy/Paste picture within a XLSM document

[MrBrent]

Thank you in advance.

I've created an order system in EXCEL/VBA - we have a worsheet 'clients' (demographic info - pricing levels - sales tax etc)

When we create an order for a client - we also create/populate LABEL data within the worksheet 'printlabels' (IE 4x6 thermal labels to be placed on the products they purchased).

We are getting requests from our clients to place their logo on the labels...

FYI - each client has a directory on the excel file server (where we copy their XLSM orders to) -

I'm thinking that I simply place a 'logo.jpg' in their directory...

When we populate the 'printlabels' worksheet -- we can then load/import the picture (repeat for all the labels to print).

FYI Our 4x6 labels take up 25 rows each. on the 'printlabels' worksheet

I would like the Picture to be placed in rows 1-4, (then 26-29, 51-54, etc etc THE FIRST 4 ROWS OF EACH LABEL)

Please ask questions if this is not clear enough!

Thanks

 

[V_Malkoti]

You can write something like this to add images as you create each label:

With Sheets("Sheet1").Pictures.Insert("C:\Users\User1\Pictures\download.png")
    .Top = Sheets("Sheet1").Range("A1").Top  ' change cell reference
    .Left = Sheets("Sheet1").Range("A1").Left  ' change cell reference
    .Height = Sheets("Sheet1").Range("A1").RowHeight * 4
End With