如果区域中只有一个单元格具有值，则将单元格区域中的值复制到另一个单元格

Question

我有一系列单元格 M4:M18。 在该单元格区域中是引用另一个表格的公式，在该单元格区域中将只有一个日期。 我试图让那个日期填充到单元格 H12 中。 这是我在 H12 中的公式：

=IF(COUNTA(M4:M18)=1,INDEX(M4:M18,MATCH("*",M4:M18,0)),"")

我也试过：

=IF(COUNTIF(M4:M18,"?")=1,INDEX(M4:M18,MATCH("?",M4:M18,0)),"")

此公式返回 H12 中的黑色单元格。 我阅读了关于同一问题的先前帖子，但我似乎无法使其正常工作。 此范围内的第一个单元格可能为空。

任何帮助将不胜感激。

谢谢

M4:M18 ='Step 2 Triage_Tbl';$Q3 并被格式化为 m/d/yy;;""

和

Answer 1

OneDate UDF

在 VBE (ALT+F11) 中将模块插入工作表并将代码复制到其中。

在单元格H12中的 Excel 中输入=OneDate(M4:M18) 。 如果尚未格式化，您可能需要将H12格式化为日期。

Option Explicit

Function OneDate(CheckRange As Range) As Date
    Dim rng As Range
    For Each rng In CheckRange
        If IsDate(rng.Value) Then OneDate = rng.Value: Exit For
    Next
End Function

您可能需要调整宏设置才能使其正常工作：

File > Options > Trust Center > Trust Center Settings > Macro Settings

Answer 2

要仅返回M4:M18范围内的一 (1) 个日期，请尝试.....

在N2中，输入公式：

=IF(COUNT(M4:M18)=1,INDEX(M4:M18,MATCH(1,INDEX(0+ISNUMBER(M4:M18),0),0)),"")

Answer 3

假设M4:M18完全用公式填充，但只有一个公式给出数据，其他公式为 null。 这将找到数据：

=MATCH(TRUE,M4:M18<>"",0)

这将检索数据：

=INDEX(M4:M18,MATCH(TRUE,M4:M18<>"",0))

这适用于文本或数字或日期。