这是一个在 Microsoft Excel 中使用 Visual Basic for Applications (VBA) 程序语言编写的代码示例,用于将图片放置在 A1 单元格中:
Sub InsertPicture()
Dim pic As Picture
Set pic = ActiveSheet.Pictures.Insert("<图片路径>")
With pic
.Left = ActiveSheet.Range("A1").Left
.Top = ActiveSheet.Range("A1").Top