Excel公式 - 检查单元格是否具有公式

Question

你用什么公式来检查另一个细胞是否有配方？例如，我有2列，A包含包含公式或值的单元格。

（A列通常包含公式，但其他用户尝试通过直接键入和替换之前的公式来更改其值）

在B列中，我想添加一个公式，如果列A上的单元格具有公式，则表示“HasFormula”，如果它包含值，则表示“PlainValue”。

我想也许使用=ISNUMBER()但这可能不准确。

我正在使用Excel 2010。

Answer 1

Excel实际上有一个内置的qazxsw poi功能。

说ISFORMULA()有一个公式，你想检查。在说A1，您可以使用：

B1

编辑：根据你的评论，你没有=If(ISFORMULA(A1),"HasFormula","PlainValue")。另一种方法是创建一个快速UDF，并使用工作表中的自定义函数。

在工作簿模块中，输入以下代码：

ISFORMULA()

然后你可以这样称呼：

Function isFormula(ByVal target As Range) As Boolean
     isFormula = target.hasFormula
End Function

如果=isFormula(A1)有公式，它将返回TRUE。

如果你不能使用VBA，那么你可以使用这个公式：A1

Answer 2

MrExcel网站（下面的链接）有这种方法，它使用Excel 4中的旧代码（为了向后兼容仍然存在）...

定义一个名称，如“CellToLeftHasFormula”和“引用”框中

=IF(ISERROR(FORMULATEXT(A1)),"PlainText","HasFormula")

然后在B列中使用公式= CellToLeftHasFormula，如果有，则返回TRUE。

请注意，这将意味着您的Excel现在将包含一个宏，因此需要保存（xlsm）。我在Excel 2010中使用它。

有关完整说明（以及其他.CELL选项，除48之外），请参阅MrExcel链接：=GET.CELL(48,OFFSET(INDIRECT("RC",FALSE),0,-1))

Answer 3

您可以使用Range.HasFormula属性。

https://www.mrexcel.com/forum/excel-questions/20611-info-only-get-cell-arguments.html

编辑：

来自以上链接的文字和代码：

“如果范围中的所有单元格都包含公式，则为true;如果范围中的所有单元格都不包含公式，则为false;否则为null。只读变量....”

https://docs.microsoft.com/en-us/office/vba/api/excel.range.hasformula

Answer 4

您可以通过保护列A来限制用户。

您可以使用快捷键Ctrl +`直接检查单元格是否包含公式。

您可以使用vba并编写用户定义的函数：1。按alt + F11 2.在工作簿中插入模块3.粘贴此代码

Worksheets("Sheet1").Activate 
Set rr = Application.InputBox( _ 
    prompt:="Select a range on this worksheet", _ 
    Type:=8) 
If rr.HasFormula = True Then 
    MsgBox "Every cell in the selection contains a formula" 
End If

4.现在，在任何地方使用Isformula。