Excel vba將圖片順序放入單元格中，且圖片大小隨單元格的變化而變化

在Excel工作錶中，添加瞭多箇圖片，我們希望把圖片逐箇放入到單元格中

可使用下麵VBA代碼循環將圖片順序放入各單元格裡。比如這裡放在A列，併設置大小與位置隨單元格變化

For i = 1 To ActiveSheet.Shapes.Count
With ActiveSheet.Shapes(i)
  .Left = Range("A" & i).Left
  .Top = Range("A" & i).Top
  .Width = Range("A" & i).Width
  .Height = Range("A" & i).Height
  .Placement = xlMoveAndSize
End With
Next i