Как вставить изображение в Excel в указанной ячейке с помощью VBA

Я добавляю файлы ".jpg" в свой лист Excel с кодом ниже:

'Add picture to excel
xlApp.Cells(i, 20).Select
xlApp.ActiveSheet.Pictures.Insert(picPath).Select
'Calgulate new picture size
With xlApp.Selection.ShapeRange
    .LockAspectRatio = msoTrue
    .Width = 75
    .Height = 100
End With
'Resize and make printable
With xlApp.Selection
    .Placement = 1 'xlMoveAndSize
    '.Placement = 2 'xlMove
    '.Placement = 3 'xlFreeFloating
    .PrintObject = True
End With

Я не знаю, что я делаю неправильно, но он не вставляется в нужную ячейку, так что я должен сделать, чтобы поместить это изображение в указанную ячейку в Excel?

Ответы на вопрос(3)

Ваш ответ на вопрос