Как вставить изображение в 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?