EXCEL中判断Shape图形对象的类型

最新推荐文章于 2025-08-13 09:59:36 发布

原创最新推荐文章于 2025-08-13 09:59:36 发布 · 1k 阅读

3 ·

CC 4.0 BY-SA版权

文章标签：

#python #excel #java #css #mybatis

本文介绍了如何通过VBA在Excel中判断Shape对象类型并将其图片（msoPicture）调整到单元格左上角。使用DimSpAsShape和DimRngAsRange变量，设置TopLeftCell并调整位置。

Shape对象的Type属性有如下这些类型，当对单元格中的图形对象进行操作前，可以先判断类型，例如将单元格中的图片位置放置于左上角：

    Dim Sp As Shape
    Dim Rng As Range

    If Sp.Type = msoPicture Then  '判断shape的类型是否图片，可以用值13代替msoPicture
            Set Rng = Sp.TopLeftCell
            '靠左上角
            Sp.Top = Rng.Top
            Sp.Left = Rng.Left
    End if