自动填写Excel

Question

我有一个数据集，如下所示：

我想用相应国家的名称填充A列中的空白单元格。

我可以在Excel中自动完成吗？

Answer 1

  

在推定下，单元格A1始终以国家/地区开头，并且B列中的数据始终完整（最后一个单元格始终具有值）

Private Sub fill_countries()
    Dim tmp as Variant
    Dim lr as Long
    lr = Cells(Rows.Count, "B").End(xlUp).Row

    For each cell in Columns(1).Cells
       If Not IsEmpty(cell) Then
           tmp = cell.Value
       End If
       cell.Value = tmp

       If cell.Row = lr Then 'safety measure so we don't end up with endless loops _
                              after going through last data item
          Exit For
       End If

    Next cell
End Sub

数据：

宏之后的输出（按预期）：

Answer 2

您可以参考此答案。完全符合您的需求。

https://superuser.com/questions/603318/in-excel-how-do-you-auto-fill-until-next-value/603329。

为方便起见，下面列出了这些步骤。

在假定单元格A1中始终以国家/地区开头

1. Ctrl + A（全选）
2. 按F5
3. 选择特殊
4. 选择空白
5. 按=键，然后按向上箭头键，然后按Enter键