首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

有没有一种方法可以更新另一个工作簿中的链接图片,而不必打开它?

是的,可以使用VBA宏来实现更新另一个工作簿中的链接图片而无需打开它。以下是一个示例代码:

代码语言:txt
复制
Sub UpdateLinkedPicture()
    Dim wbSource As Workbook
    Dim wbTarget As Workbook
    Dim wsTarget As Worksheet
    Dim shp As Shape
    
    ' 打开源工作簿
    Set wbSource = Workbooks.Open("源工作簿路径")
    
    ' 打开目标工作簿
    Set wbTarget = Workbooks.Open("目标工作簿路径")
    
    ' 设置目标工作表
    Set wsTarget = wbTarget.Worksheets("目标工作表名称")
    
    ' 遍历目标工作表中的所有形状
    For Each shp In wsTarget.Shapes
        ' 检查形状是否为链接图片
        If shp.Type = msoLinkedPicture Then
            ' 获取链接图片的链接地址
            Dim linkAddress As String
            linkAddress = shp.LinkFormat.SourceFullName
            
            ' 检查链接地址是否与源工作簿相同
            If linkAddress = wbSource.FullName Then
                ' 更新链接图片
                shp.LinkFormat.Update
            End If
        End If
    Next shp
    
    ' 关闭工作簿,保存更改
    wbSource.Close SaveChanges:=True
    wbTarget.Close SaveChanges:=True
End Sub

请注意,上述代码中的"源工作簿路径"和"目标工作簿路径"需要替换为实际的文件路径。此外,"目标工作表名称"也需要替换为要更新链接图片的目标工作表的名称。

这段代码通过遍历目标工作表中的所有形状,检查是否为链接图片,并且链接地址与源工作簿相同。如果是,则使用LinkFormat.Update方法来更新链接图片。

这是一种更新另一个工作簿中链接图片的方法,而无需打开它。

相关搜索:有没有一种方法可以设置多个函数的默认参数,而不必复制粘贴它有没有一种方法可以让光标自动出现在QLineEdit中,而不必先选择它?有没有一种方法可以设置计时器,而不必将其放入Contiki OS的进程中?在VB中,有没有一种方法可以创建当前类型的实例而不命名它?有没有一种方法可以访问本地文件,而不必使用Google Colab中的upload()选项,或者将数据上传到驱动器然后访问它有没有一种方法可以获得与当前布尔值相反的值,而不必在Visual Basic中实现检查?有没有一种方法可以将用户输入附加到Scala中的数组中,而不必在每次调用函数时覆盖我的旧输入?有没有一种方法可以在调试/不调试时反映java项目(在Intellij中)中所做的更改,而不必重新构建项目有没有一种方法可以从程序中打开一个新的控制台,然后进入它?有没有一种方法可以在Google的Materialize CSS中创建一个垂直的旋转木马,而不需要定制它?在Postgres中,有没有一种方法可以让派生列在我更改计算它的原始数据时自动更新?Python: Netcdf:有没有一种方法可以从一个变量中获得总平均值,而另一个变量与唯一的值重叠?有没有一种方法可以基于链接字段在sharepoint列表中设置字段,但使用来自另一个列表的值,类似于JOIN甚至vlookup?有没有一种方法可以让java中的随机数生成器更容易落在一个数上而不是另一个数上?
相关搜索:
页面内容是否对你有帮助?
有帮助
没帮助

相关·内容

领券