小编use*_*562的帖子

Excel VBA宏:找到列中的第一个空单元格并自动填充它

我在电子表格中有两列,列(A)和列(B).

列(A)包含从查询中提取的名称(例如Brian,Bob,Bill等),列(B)包含三种状态之一(已分配,正在进行或待定).

但是,此查询有时会为没有名称的状态提取显示"已分配"的某些行项目,因此表示列(A)中名称的相应单元格为空.所以我用"未知"手动填写那些空单元格.

我想要做的是创建一个宏,找到列(A)中的每个空单元格,如果右边的单元格包含单词"Assinged",则填写单词"Unknown".

所以条件是:

  1. 专栏(A)中的空白单元格

  2. 右侧的Correspoding单元格(B列)包含"assinged"一词

这是我的代码:

Private Sub CommandButton2_Click()

    For Each cell In Columns("A")
        If ActiveCell.Value = Empty And ActiveCell.Offset(0, 1).Value = "Assigned" Then ActiveCell.Value = "Unknown"
    Next cell

End Sub   
Run Code Online (Sandbox Code Playgroud)

excel vba excel-2003 excel-vba

5
推荐指数
2
解决办法
3万
查看次数

标签 统计

excel ×1

excel-2003 ×1

excel-vba ×1

vba ×1