Hi!
I'm a newby to VBA, but I have to write a macre that will import images from an Excel file to a PowePoint presentation.
Excel 2010, Windows 7
So for now I have:
Sub import()
Dim eXL As Excel.Application
Dim eWB As Excel.Workbook
Dim eSH As Excel.Worksheet
Set eXL = CreateObject("Excel.Application")
eXL.Workbooks.Open "C:\PP\Book1.xlsm"
eXL.Visible = True
eXL.Quit
End Sub
The problem is that I have no idea how to choose the right picture from the right worksheet and paste it to PowePoint.
By deafault all the images are stored in Sheet3, due to other reason it cannot be chaneged.
Regards
Zgryd
I'm a newby to VBA, but I have to write a macre that will import images from an Excel file to a PowePoint presentation.
Excel 2010, Windows 7
So for now I have:
Sub import()
Dim eXL As Excel.Application
Dim eWB As Excel.Workbook
Dim eSH As Excel.Worksheet
Set eXL = CreateObject("Excel.Application")
eXL.Workbooks.Open "C:\PP\Book1.xlsm"
eXL.Visible = True
eXL.Quit
End Sub
The problem is that I have no idea how to choose the right picture from the right worksheet and paste it to PowePoint.
By deafault all the images are stored in Sheet3, due to other reason it cannot be chaneged.
Regards
Zgryd
