为何Excel VBA的FillDown在单单元格范围调用时会使用上方单元格内容？

问题原因 #

这是Excel VBA中FillDown方法的固有行为：

• FillDown的设计逻辑是将指定范围最顶部单元格的内容填充到范围下方的所有单元格。
• 当目标范围仅包含单个单元格时，Excel没有“下方单元格”可填充，会自动将该单元格上方相邻的非空单元格作为填充源，从而覆盖当前单元格的内容。
• 这种特殊处理逻辑在Microsoft 365（包括你使用的2308版本）中是一致的，并非bug，而是方法的默认规则。

解决方案 #

要避免单个单元格场景下的误覆盖，只需在执行FillDown前判断目标范围的行数，仅当行数大于1时才执行操作：

安全填充宏示例 #

Sub SafeFillDown()
    Dim col As Integer, startRow As Integer
    Dim ws As Worksheet
    Dim targetRange As Range
    Dim lastRow As Long
    
    col = 1
    startRow = 2 ' 公式所在的起始行
    Set ws = ThisWorkbook.Sheets("Sheet1")
    
    ' 获取当前列的最后数据行
    lastRow = ws.Cells(ws.Rows.Count, col).End(xlUp).Row
    
    ' 定义要填充的范围：从公式行到最后一行
    Set targetRange = ws.Range(ws.Cells(startRow, col), ws.Cells(lastRow, col))
    
    ' 仅当范围包含多行时执行FillDown
    If targetRange.Rows.Count > 1 Then
        targetRange.FillDown
    End If
End Sub

单个单元格的特殊处理 #

如果需要确保单个单元格的内容（比如公式）不被覆盖，可以直接跳过FillDown，或者重新赋值原内容：

If targetRange.Cells.Count = 1 Then
    ' 可选：重新写入原公式，防止意外修改
    targetRange.Formula = targetRange.Formula
Else
    targetRange.FillDown
End If

验证说明 #

当目标范围是多行（比如第2行到第3行）时，FillDown会正常使用范围顶部（第2行）的内容填充下方单元格，这是因为此时范围明确有“顶部源”和“下方目标”，符合方法的设计预期。

内容的提问来源于stack exchange，提问作者Daniel Wullschleger