试图填充一个空单元格

Question

我有一张桌子，我需要一个函数来检查一个单元格是否为空，如果是，则在空单元格中写入“ x”，如果不为空，则不会更改它。

Answer 1

使用If语句很简单。我怀疑问题在于如何导航表中的所有单元格以执行检查。如果按表表示实际的Excel表，并假设它称为Table1，则可以使用：

For Each cell In ActiveSheet.ListObjects("Table1").Range   
    If cell.Value = "" Then
      cell.Value = "x"
    End If
Next

否则，请调整“ ActiveSheet.ListObjects（“ Table1”）。Range”部分，以确保它是您需要评估的单元格范围。从技术上讲，由于该函数不返回值，因此在VBA中称为子例程（简称sub），而不是函数。

Answer 2

请注意，您要求的是可更改其所在单元格的Excel公式 这是不可能的... 子例程（手动运行）的解决方案是使用VBA 如果没有VBA，则可以使用简单的excel公式在下一个单元格中写入“ x”，或者在其他电子表格中将其写入并行单元格（具有相同地址）

简单的if公式，假设单元格A1是选中的单元格 如果单元格不为空，则公式将返回实际单元格值：

=IF(ISBLANK(A1),"x",A1)