验证变量是否包含excel VBA中的有效范围地址

Question

我试图将一个值Range地址值输入到变量中。

searchWrd = InputBox("Please enter the column name of first word/token's", "Search String", "J1")

我需要验证变量 searchWrd 是否包含有效地址。此外，变量 searchWrd

的数据类型应该是什么

Answer 1

我和

一起去

searchWrd = Application.InputBox("lease enter the column name of first word/token's", "Search String", ,,,,,8)

欲了解更多信息，请阅读： https://msdn.microsoft.com/en-us/library/office/ff839468.aspx

基本上，最后的8将输入类型设置为范围。请注意，这也可以让您立即Dim searchWrd as Range。

Answer 2

您可以尝试使用普通的If-Then-construct来验证从Inputbox获得的Text。要获得正确的数据类型，我们需要知道在输入框中输入什么是可能的。通常我会尝试获取搜索字符串所在的行/列的行/列号。或者，更好的是，要求自己的字符串并编写代码以查找它所在的位置。所以我只需要检查拼写错误并给出一条消息，表明找不到该字符串。然后，我想要一个范围更好。