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

我有一个文档，它将各种信息收集到特定的单元格中。VBA - 检查输入其他值时是否存在某个值

从事一个已经创建的宏，我需要一个检查一个单元格来查看某个条目是否存在的可能性（让我们说“Dave”）。在输入“Dave”的情况下，需要检查“Norman”是否被输入到不同的单元格中。如果没有，msg框需要出现并退出子程序。如果输入了“诺曼”，则允许子例程完成。如果输入了“Dave”以外的内容，则代码将退出并继续使用原始宏。

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

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

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

任何帮助表示赞赏！

来源

2014-02-12 user3301338

为什么不直接使用'如果instform.Range（ “Claim_Sol”）值= “戴夫” 和床单（ “诉讼”）范围（ “Sol_Co_UF”）值=。 “Norman”然后'删除'Sheets（“Proceedings”）。Range（“Sol_Co_UF”）。Value =“Norman”'？ –

试试这个：

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

来源

2014-02-12 12:14:09

谢谢你。 – user3301338

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

回答

相关问题