The simplest way to trim a picture pasted into excel

If I paste picture into a spreadsheet after pressing "print screen", what is the easiest way to crop it by X-amount of pixels from each of the 4 corners corners using VB? I tried recording this, but get a page-full of mambo-jumbo. Thanks.

Try something like this...

Sub Test()

ActiveSheet.Shapes("Picture 1").Select

With Selection
    .ShapeRange.ScaleWidth 0.6116072029, msoFalse, msoScaleFromTopLeft
    .ShapeRange.ScaleHeight 0.6116071429, msoFalse, msoScaleFromTopLeft
End With

End Sub