Excel-VBA-公式错误1004-

Excel-VBA-公式错误1004-,vba,excel,Vba,Excel,使用以下vba代码时,我遇到运行时错误“1004”应用程序定义错误或对象定义错误: Private Sub CommandButton1_Click() Dim formul as String 'Run Tercih14 formul = "=vlookup($c$15;'Şube Listesi'!$B:$J;9;FALSE)" Sheet35.Range("F12").Formula = formul End Sub 我可以更改F12单元格的值。分配不同的公式,如=sum(A

使用以下vba代码时,我遇到运行时错误“1004”应用程序定义错误或对象定义错误:

Private Sub CommandButton1_Click()

Dim formul as String

'Run Tercih14

formul = "=vlookup($c$15;'Şube Listesi'!$B:$J;9;FALSE)"


Sheet35.Range("F12").Formula = formul

End Sub
我可以更改
F12单元格的值。分配
不同的公式,如
=sum(A1:A2)
等。如果我创建一个新工作表并编辑新工作表的代码,它可以与
vlookup
公式配合使用。 我检查过了,床单没有保护。我很难弄清楚这里有什么问题。希望你们能帮我找到解决办法。

改变

"=vlookup($c$15;'Şube Listesi'!$B:$J;9;FALSE)"


您正在使用;'s而不是,

我对包含变量的公式也有同样的问题

        Dim Instruc As String
        Instruc = "=MAX(R" & CStr(suiv) & ";S" & CStr(suiv) & " )"
        MAIN.Cells(suiv, 20).Formula = CStr(Instruc)
当我使用caracter在公式中,我总是得到运行时错误“1004”应用程序定义的错误或对象定义的错误 我使用了公式的一个变体:caracter

        Dim Instruc As String
        Instruc = "=MAX(R" & CStr(suiv) & ";S" & CStr(suiv) & " )"
        MAIN.Cells(suiv, 20).Formula = CStr(Instruc)

在sheet35单元格F12中手动键入上述公式是否可以正常工作?非常感谢,我原以为工作表名称不会影响它,但它的效果似乎是工作表名称不是问题所在。仅仅是用于Vlookup的不正确的分隔符@ozgurMy代码已将Şube更改为Sube。我已经纠正了worksmarter中的ozgur和clarity。当我将formul定义为字符串时,我认为它必须与excel相同,现在我明白VBA替换了“,”;“:)。再次感谢guysIt和excel一样,vba不能代替任何东西。您在OP中的代码有“;”in not“,”in
        Dim Instruc As String
        Instruc = "=MAX(R" & CStr(suiv) & ";S" & CStr(suiv) & " )"
        MAIN.Cells(suiv, 20).Formula = CStr(Instruc)