해당 이미지 선택 후 함수 실행하면 리사이즈, 위치 이동
Sub first()
ActiveWindow.Selection.ShapeRange.LockAspectRatio = msoFalse
ActiveWindow.Selection.ShapeRange.Height = 193.3228
ActiveWindow.Selection.ShapeRange.Width = 337.8898
ActiveWindow.Selection.ShapeRange.Left = 406.7717
ActiveWindow.Selection.ShapeRange.Top = 121.8898
End Sub
Sub second()
ActiveWindow.Selection.ShapeRange.LockAspectRatio = msoFalse
ActiveWindow.Selection.ShapeRange.Height = 175.748
ActiveWindow.Selection.ShapeRange.Width = 337.8898
ActiveWindow.Selection.ShapeRange.Left = 406.7717
ActiveWindow.Selection.ShapeRange.Top = 321
End Sub