The images go to the top because you are tellingt them to!
With osld.Shapes.AddPicture(strFolder & strName, msoFalse, msoTrue, -1, -1, -1, -1)
The first two -1s set the left and top to -1 (ie the top) second pair set the height and width to their original size. You might want to try adjusting these figures