VBA在Excel文件中replace徽标

我有一个奇怪的问题。 我以前每天都没有几个报告。

所有这些都在Excel中，并在每个文件的所有表中都有公司的标识。

但是，现在公司名称已经改变，因此需要replace现有的新徽标。 想要检查这个replace是否可以用VBA完成。

我尝试了application.shapes方法。 但是，进一步进行混淆。

Answer 1

尝试这个….

Sub ChangePicture(strNewPath As String) Dim oOld As Picture Dim oNew As Picture Set oOld = ActiveSheet.Pictures(1) Set oNew = ActiveSheet.Pictures.Insert(strNewPath) oNew.Left = oOld.Left oNew.Top = oOld.Top oNew.Width = oOld.Width oNew.Height = oOld.Height oOld.Delete End Sub