VBA绝对路径改成相对路径 s答:Shape.AddPicture("C:\Users\kaihzhan\Documents\PPT\day4\a.png",0,1,10,120,700,400)改成:Shape.AddPicture(thisworkbook.Path & "\a.png",0,1,10,120,700,400)我靠,我以为在Excel里面,PPT改成 Shape.AddPicture(application.ActivePresentation.Path & "\a.png",0,1,10,120,700,...