如何用VBA在Excel 2016中更改插入图片(图标)的填充颜色

在Excel 2016中使用VBA更改插入图片（图标）的填充颜色，可以通过以下步骤实现：

1. 打开Excel 2016，并按下Alt+F11进入VBA编辑器界面。
2. 在VBA编辑器中，选择插入模块（Insert -> Module）。
3. 在模块中编写以下VBA代码：

Sub ChangePictureFillColor()
    Dim pic As Picture
    Dim fillColor As Long
    
    ' 设置填充颜色为红色（可以根据需要修改为其他颜色）
    fillColor = RGB(255, 0, 0)
    
    ' 遍历所有图片对象
    For Each pic In ActiveSheet.Pictures
        ' 判断是否为插入的图片（图标）
        If pic.Type = 13 Then
            ' 更改填充颜色
            pic.ShapeRange.Fill.ForeColor.RGB = fillColor
        End If
    Next pic
End Sub

1. 关闭VBA编辑器界面。
2. 在Excel 2016中，按下Alt+F8打开宏对话框。
3. 选择刚才创建的宏（ChangePictureFillColor），并点击运行。

以上VBA代码会遍历当前活动工作表中的所有图片对象，并将插入的图片（图标）的填充颜色更改为红色。你可以根据需要修改填充颜色的RGB值。

这种方法适用于Excel 2016中插入的图片（图标），对于通过其他方式插入的图片可能无效。此外，VBA代码也可以根据具体需求进行修改和扩展。

腾讯云相关产品和产品介绍链接地址：

• 腾讯云对象存储（COS）：https://cloud.tencent.com/product/cos
• 腾讯云云服务器（CVM）：https://cloud.tencent.com/product/cvm
• 腾讯云云函数（SCF）：https://cloud.tencent.com/product/scf
• 腾讯云人工智能（AI）：https://cloud.tencent.com/product/ai
• 腾讯云物联网（IoT）：https://cloud.tencent.com/product/iot
• 腾讯云移动开发（Mobile）：https://cloud.tencent.com/product/mobile