Copying images from Excel to Access
I would like to automate the process of copying an image from Excel to
the clipboard, and pasting it into an OLE Object field in an Access
table.
I want to do something like:
Dim MySheet As Worksheet
Set MySheet = appX.Workbooks(Filename).Worksheets("Requirements" )
Dim pic As Shape
rsExcelImport.MoveFirst
For Each pic In MySheet.Shapes
pic.Copy
'Somehow paste to MS Access
rsExcelImport.MoveNext
Next pic
Any advice on how I can accomplish this?
|