如何用另一种语言评估公式?

如何用另一种语言评估公式?

我遇到了一些代码问题,如能得到任何帮助我将非常感激。

我下载了一个代码,该代码使用户能够在下拉列表中使用自动完成功能。该代码评估 Activecell 是否包含列表,然后将列表存储为对象。问题是我的用户使用的是西班牙语版本的 Excel,因此代码不起作用。特别是,我在代码的这一行中遇到了问题:

Set rFormula = Evaluate(ActiveCell.Validation.Formula1)

If rFormula Is Nothing Then 'VBA doesn't recognize the formula so rFormula = Nothing

End 

End If

ActiveCell.Validation.Formula1 =验证公式相同,但使用西班牙语。由于我使用的是英语版本,因此此代码在我的 PC 上完美运行。

相关内容