为什么有时需要选择对象以避免“对象不支持此属性或方法”

我注意到有时会出现错误:

运行时错误“ 438”:

对象不支持此属性或方法

在Excel VBA中,但是如果我先调用.select该对象,则该错误消失。

例如,最近我想更改工作表上某些链接图像的大小,并使用宏记录器记录了以下内容:

ActiveSheet.Shapes.Range(Array("Picture 3")).Select
Selection.ShapeRange.Height = 303.12

此代码显然可以正常工作。然后,我将代码更改如下:

Dim sheetReport as Worksheet
Set sheetReport = Worksheets("Report")

With sheetReport
    Dim pictureNumber As Long
    For pictureNumber 1 to 3
        .Shapes.Range("Picture " & pictureNumber).ShapeRange.Height = 303.12
    Next pictureNumber
End With

现在我得到了上面提到的错误,但是如果我随后将此代码更改为

Dim sheetReport as Worksheet
Set sheetReport = Worksheets("Report")

With sheetReport
    Dim pictureNumber As Long
    For pictureNumber 1 to 3
        .Shapes.Range("Picture " & pictureNumber).Select
        Selection.ShapeRange.Height = 303.12
    Next pictureNumber
End With

它再次起作用。但是,我当然不必仅选择每张图片来更改其Height属性吗?

让·皮埃尔·奥斯特惠岑

在我的测试运行中,这可以正常工作。

 Sub PictureResizing()

      Dim sheetReport As Worksheet
      Set sheetReport = ThisWorkbook.Worksheets("Report")

      Dim pictureNumber As Long

      With sheetReport

           For pictureNumber = 1 To 3

           .Shapes("Picture " & pictureNumber).Height = 303.12

           Next pictureNumber

      End With

 End Sub

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

对象不支持此属性或方法

来自分类Dev

对象不支持此属性或方法

来自分类Dev

对象不支持此属性或方法

来自分类Dev

对象不支持此属性或方法

来自分类Dev

为什么出现此错误:对象不支持Internet Explorer的属性或方法“ forEach”?

来自分类Dev

IE为什么会出现此错误:对象不支持属性或方法isNaN

来自分类Dev

为什么出现此错误:对象不支持Internet Explorer的属性或方法“ forEach”?

来自分类Dev

IE为什么会出现此错误:对象不支持属性或方法isNaN

来自分类Dev

对象不支持此属性或方法ActiveWorkbook对象VBA

来自分类Dev

“选择所有形状”给出Excel VBA错误438-“对象不支持此属性或方法”

来自分类Dev

需要解决:“抱歉,发生错误的对象不支持此属性或方法”

来自分类Dev

VBA对象不支持此属性或方法

来自分类Dev

调试-IE对象不支持此属性或方法

来自分类Dev

对象不支持此属性或方法:oFldr.GetFolder

来自分类Dev

对象不支持此属性或方法Chartspace

来自分类Dev

对象在VBA中不支持此属性或方法

来自分类Dev

Rails:类型错误:对象不支持此属性或方法

来自分类Dev

用户定义类 - 对象不支持此属性或方法

来自分类Dev

是什么导致在VBA Excel中出现“对象不支持此属性或方法”的消息?

来自分类Dev

在工作簿之间复制数据时,对象不支持此属性或方法

来自分类Dev

对象不支持属性或方法“有效”

来自分类Dev

对象不支持属性或方法“填充”

来自分类Dev

对象不支持属性或方法“删除”

来自分类Dev

对象不支持属性或方法“ kendoDatePicker”

来自分类Dev

对象不支持“最近”的属性或方法

来自分类Dev

$对象不支持'live'属性或方法

来自分类Dev

对象不支持“前缀”的属性或方法

来自分类Dev

对象不支持“打开”属性或方法

来自分类Dev

对象不支持属性或方法“推”

Related 相关文章

  1. 1

    对象不支持此属性或方法

  2. 2

    对象不支持此属性或方法

  3. 3

    对象不支持此属性或方法

  4. 4

    对象不支持此属性或方法

  5. 5

    为什么出现此错误:对象不支持Internet Explorer的属性或方法“ forEach”?

  6. 6

    IE为什么会出现此错误:对象不支持属性或方法isNaN

  7. 7

    为什么出现此错误:对象不支持Internet Explorer的属性或方法“ forEach”?

  8. 8

    IE为什么会出现此错误:对象不支持属性或方法isNaN

  9. 9

    对象不支持此属性或方法ActiveWorkbook对象VBA

  10. 10

    “选择所有形状”给出Excel VBA错误438-“对象不支持此属性或方法”

  11. 11

    需要解决:“抱歉,发生错误的对象不支持此属性或方法”

  12. 12

    VBA对象不支持此属性或方法

  13. 13

    调试-IE对象不支持此属性或方法

  14. 14

    对象不支持此属性或方法:oFldr.GetFolder

  15. 15

    对象不支持此属性或方法Chartspace

  16. 16

    对象在VBA中不支持此属性或方法

  17. 17

    Rails:类型错误:对象不支持此属性或方法

  18. 18

    用户定义类 - 对象不支持此属性或方法

  19. 19

    是什么导致在VBA Excel中出现“对象不支持此属性或方法”的消息?

  20. 20

    在工作簿之间复制数据时,对象不支持此属性或方法

  21. 21

    对象不支持属性或方法“有效”

  22. 22

    对象不支持属性或方法“填充”

  23. 23

    对象不支持属性或方法“删除”

  24. 24

    对象不支持属性或方法“ kendoDatePicker”

  25. 25

    对象不支持“最近”的属性或方法

  26. 26

    $对象不支持'live'属性或方法

  27. 27

    对象不支持“前缀”的属性或方法

  28. 28

    对象不支持“打开”属性或方法

  29. 29

    对象不支持属性或方法“推”

热门标签

归档