469,125 Members | 1,639 Online
Bytes | Developer Community
New Post

Home Posts Topics Members FAQ

Post your question to a community of 469,125 developers. It's quick & easy.

Error in loading image in excel at a runtime from vb 6

i have problem when i have pass image path
i have mention code bellow pls help me


Private Sub ExcelReport()
Dim ObjExl As Object
Set ObjExl = Nothing
Set ObjExl = CreateObject("Excel.application")
Dim img As Excel.Application
Dim Pic As Excel.PictureFormat
ObjExl.Workbooks.Add
With ObjExl
.Cells(I, 1) = App.Path & "\Photographs\003.JPEG"
'.Picture = LoadPicture(App.Path & "\Photographs\003.JPEG")
'Set Pic = img.p
ActiveSheet.Value = 1
ActiveSheet.Image1.Picture = LoadPicture("E:\Softwares\GviCipla_Goa\Photographs \003.jpg")
.ActiveCell.Value = 5 '"E:\Softwares\GviCipla_Goa\Photographs\003.jpe g"
End With
ObjExl.Visible = True



End Sub
Sep 19 '07 #1
0 894

Post your reply

Sign in to post your reply or Sign up for a free account.

Similar topics

2 posts views Thread by Wayne | last post: by
reply views Thread by zfraile | last post: by
10 posts views Thread by Patrick Schmid [MVP] | last post: by
6 posts views Thread by Cruithne3753 | last post: by
reply views Thread by zhoujie | last post: by
reply views Thread by Mortomer39 | last post: by
By using this site, you agree to our Privacy Policy and Terms of Use.