Yes that is pretty much what I am looking for. I have the folowing code:
Private Sub Cbo_PP1_Change()
Range("AK28").Formula = "=VLOOKUP(AG28,Data!O111:Q115,3)"
If Range("AG28") = ("463L Pallet") Then
Sheets("Equipment").Shapes("Pallet").CopyPicture
Sheets("FormF").Range("PalPos1").Select
ActiveSheet.Paste
Selection.ShapeRange.IncrementLeft 7#
Selection.Name = "pos1"
End If
End Sub
The picture "Pallet" is being pasted using cell selection ("PalPos") and then nudged left. This works, but I would like it to run cleaner than this and paste in a specific location that isn't exactly the top left corner of any cells in the area.