插入图片在活动单元格

Sub InsertLogo1() 
    ActiveCell.Select 
    ActiveSheet.Pictures.Insert("Path").Select 
End Sub

来源

2014-01-22 user3224188

上面的代码activecell不会插入图片不粘贴在刚插入它的左上角或活动工作表。这个问题只发生在Excel 2007上。请告知 – user3224188

Dim Pic As Object 
Set Pic = ActiveSheet.Pictures.Insert(Directory & "\" & filename) 
With Pic 
    .Top = ActiveCell.Top 
    .Left = ActiveCell.Left 
    .LockAspectRatio = msoTrue 
    .Width = 225# 
End With

来源

2014-01-22 16:08:36

它正在我的机器上工作，但仍需要在另一台机器上进行测试。将明天确认。感谢您的提示最初回答 – user3224188

您一直欢迎......我也是堆栈溢出的新手，我喜欢帮助人们：）...祝您有美好的一天！ –

插入图片在活动单元格

回答

相关问题