>oSheet.Range("A3").Select() >* AddPicture(Filename, LinkToFile, SaveWithDocument, Left, Top, Width, Height) >oSheet.Shapes.AddPicture(lcPictureName, .F., .T., 0, 0, 100, 100) >