Question

我有一份文档，可以将各种信息收集到特定的单元格中。

在使用已经创建的宏时，我需要一个子来检查一个单元格以查看是否存在某个条目（比如说“Dave”）。在输入“Dave”的地方，需要检查“Norman”是否已进入不同的单元格。如果没有，则需要出现一个msg框并退出子程序。在输入“Norman”的情况下，允许子程序完成。如果输入“Dave”以外的其他内容，则代码将退出sub并继续使用原始宏。

我不希望例程更改“Norman”需要去的当前条目。

希望这是有道理的 - 到目前为止，我的代码非常不完整，如下所示：

Sub SIFSOLCHECK()

    If instform.Range("Claim_Sol").Value = "Dave" Then
        Sheets("Proceedings").Range("Sol_Co_UF").Value = "Norman"
        MsgBox "Only Norman can assist with Dave"
        Range("Solicitor").Select
        Exit Sub
    Else
    End If
End Sub

感谢任何帮助！

Answer 1

试试这个：

Sub SIFSOLCHECK()

    If instform.Range("Claim_Sol").Value = "Dave" Then
        If Sheets("Proceedings").Range("Sol_Co_UF").Value = "Norman" Then
            'some code
        End If
    Else
        MsgBox "Something"
    End If

End Sub

VBA - 输入其他值时检查是否存在某些值

1 个答案: