运行时间错误“1004”应用程序定义或对象定义错误

Question

我正在学习在用户表单中制作图表，但遇到错误消息时遇到问题

"Run time error 1004 Application-defined or Object-defined error"

一开始是成功的，后来我新建了一个宏，复制粘贴出现了'1004'的错误。

我的代码如下：

Private Sub UpdateChart()
    Dim PA_Chart As Object
    Dim NamaFL As String
    Application.ScreenUpdating = False
    Set PA_Chart = Sheets("DummyChart").ChartObjects(ChartKe).Chart
    PA_Chart.Parent.Width = 300
    PA_Chart.Parent.Height = 150
    On Error Resume Next
    'menyimpan Chart sebagai Gif
    NamaFL = ThisWorkbook.Path & "\" & "WPAGraph.gif"
    PA_Chart.Export Filename:=NamaFL, FilterName:="GIF"
    'Menampilkan Chart Pada Image1
    Me.Image1.Picture = LoadPicture(NamaFL)
    Application.ScreenUpdating = True
End Sub

Answer 1

除 .ChartObjects(ChartKe) 外，一切看起来都很好。 ChartKe 在代码中的任何地方都找不到。您可以尝试通过实际名称引用，例如.ChartObjects("Chart 1")

运行时间错误“1004”应用程序定义或对象定义错误

Run time error '1004' Application defined or Object defined error

excel

vba

object

userform

运行 时间错误“1004”应用程序定义或对象定义错误

Run time error '1004' Application defined or Object defined error

excel

vba

object

userform

运行时间错误“1004”应用程序定义或对象定义错误