EXCEL IF声明?

时间:2017-11-11 10:53:05

标签: excel excel-vba vba

我在excel中创建了一个订单列表,其中f.e。支付日期,订单日期,发货日期,价格,交货日期等。我想做一个专栏"完成"自动获取值" 1"或"是"当物品到达并且付款等完成时,所以当一切都被填写时。这可能吗?

谢谢!

2 个答案:

答案 0 :(得分:0)

根据 A M 列中的数据,在 N1 中输入:

=IF(COUNTA(A1:M1)=COLUMNS(A1:M1),1,0)

此类公式的优点是,如果添加/删除列,它将自动调整。

答案 1 :(得分:0)

你可以使用这样的东西,它会自动进入"是"如果B列中的值符合您的条件,则在目标偏移列中。根据您的要求进行调整。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Cells.Count > 1 Then Exit Sub

    If Not Intersect(Target, Range("B2:B305")) Is Nothing Then

           If Target = vbNullString Then

                Target = "payment made"   'or whatever you want to use
                Target.Offset(0, 12) = "Yes"   'which would be column N
            Else

                Target = vbNullString    'if the value in column B is removed
                Target.Offset(0, 12) = vbNullString   'column N is reutrned to blank

            End If

    End If
End Sub