Search results

Paul, Everything is working correctly. Thanks again for your help! James

For some reason the code opens the workbook in read only format. So when I do what you suggusted it prompts for a new file name. Is there a way to prevent this? Here's the code I am using. Public Function AddITARPic() Dim xlApp As Object Set xlApp = CreateObject("Excel.Application") With...

One more question, sorry. How would u get this to auto save and close with the same name? I did a google search but haven't found anything concrete.

Thank you for everyone's help! I am new to VBA so you were very helpful. Vote up for everyone here and hopefully this thread will help others! Public Function LoopAddPic() Dim xlApp As Object Set xlApp = CreateObject("Excel.Application") With xlApp Dim wb As Object Dim ws As Object Dim...

Hey Paul, Thanks for the help. How would I incorporate the numerical equivalent? I farily new to the coding process. Lady row? Yeah any solution you can provide I'm all ears. Thanks!

I can't get the code in red below to work. How would I go about coding this section? Is it possible to code this part? " "lastRow = ws.Cells(ws.Rows.Count, "F").End(xlUp).Row 'Error 1004" Errors recieved: "1004" Application-defined or object-defined error The objective is so it will look in...