Question

我正在努力使我的代码正常工作。尝试评估我的Index(Match())找到的值是否是IsNumeric的数字时，我每隔一次会收到“不匹配错误13”。当我没有收到错误消息时，代码似乎可以正常工作。
我想知道如何通过将Index(Match())在IsNumeric函数中找到的值存储在变量中或以任何其他方式来使用它。

Dim i     As integer
Dim pay   As Variant

For i = 0 To rowz - 1

    pay = Application.Index(target.Sheets("Countries").Range("G3:G" & lastRow), Application.Match(target.Sheets("TEST").Range("D" & 7 + i), target.Sheets("Countries").Range("D3:D" & lastRow), 0))

    If IsNumeric(pay) And pay = "00" Then 'Error appears here
        target.Sheets("TEST").Range("F" & 7 + i).Value = 1
        ElseIf IsNumeric(pay) Then
            target.Sheets("TEST").Range("F" & 7 + i).Value = pay
        ElseIf Left(pay, Len(pay) - 1) = "00" Then
            target.Sheets("TEST").Range("F" & 7 + i).Value = 1
        Else: target.Sheets("TEST").Range("F" & 7 + i).Value = Left(pay, Len(pay) - 1)
    End If

    Next i

Answer 1

这可能是因为您返回了一个错误值。尝试使用以下方法对此进行测试。另外，如果pay不是字符串，即不是0，不是"00"是If Not IsError(pay) Then If IsNumeric(pay) And pay = 0 Then 'Other code End If吗？尽管隐式转换可能会将其隐藏，但不能两者兼有。

<div id="myModal" class="modal">
    <div class="modal-content">
        <div class="modal-header">
            <span class="close">&times;</span>
            <form >
            <input class="button btn-red" type="button" name="btn" value="random" onclick="myFunction()">
            </form>
        </div>
        <div class="modal-body">
            <a id "test">...</a>
            <p>Some other text...</p>
        </div>
        <div class="modal-footer">
            <h3>Modal Footer</h3>
        </div>
    </div>

</div>

如何在索引匹配中使用IsNumeric？

1 个答案: