Application.WorksheetFunction.Match 메서드

user3035828

"Worksheetfunction 클래스의 일치 속성을 가져올 수 없습니다"문제에 대한 많은 주제를 보았습니다. 하지만 내 코드를 수정할 수 없습니다.

이 코드가 작동하지 않는 이유는 무엇입니까?

rowNum = Application.WorksheetFunction.Match(aNumber, Sheet5.Range("B16:B615"), 0)

그러나이 코드가 몇 행 더 높으면 작동합니다.

rowNum2 = Application.WorksheetFunction.Match(originCode, Sheet7.Range("B10:B17"), 0)

내 두 줄의 유일한 차이점은 rowNum2에서 조회를 위해 String을 사용하고 rowNum에서 정수를 사용했다는 것입니다. 조회 값이 문자열이어야 할 수 있습니까?

내 문제에 @ 업데이트

Select Case service
Case "Low Cost"
MsgBox Sheet5.Cells(16, "B") 'Gets value 0.5
Set Rng = Sheet5.Range("B16:B615")

   If Not IsError(Application.Match("0.5", Rng, 0)) Then 'But jumps to Else
    rowNum = Application.Match(Weight, Rng, 0) 'Weight = 0.5
    MsgBox rowNum
Else
    MsgBox "error"
End If

Case "Standard"

Case "Express"

Case Else

End Select

@ 업데이트 2

!!! "0.5"는 0.5가 아닌 문자열이므로 0.5는 "0.5"가 아닙니다 (코드에서 내 오류였습니다).

범위에서 값을 찾을 수 없기 때문에이 오류가 발생합니다. 문자열이나 정수는 중요하지 않습니다. 내 경험상 가장 좋은 방법은 값이 존재하는지 먼저 확인하는 것입니다.

아래에서 CountIf를 사용했지만 범위에 값이 있는지 확인하는 방법에는 여러 가지가 있습니다.

Public Sub test()

Dim rng As Range
Dim aNumber As Long

aNumber = 666

Set rng = Sheet5.Range("B16:B615")

    If Application.WorksheetFunction.CountIf(rng, aNumber) > 0 Then

        rowNum = Application.WorksheetFunction.Match(aNumber, rng, 0)

    Else
        MsgBox aNumber & " does not exist in range " & rng.Address
    End If

End Sub

대체 방법

Public Sub test()
    Dim rng As Range
    Dim aNumber As Variant
    Dim rowNum As Long

    aNumber = "2gg"

    Set rng = Sheet5.Range("B1:B20")

    If Not IsError(Application.Match(aNumber, rng, 0)) Then
        rowNum = Application.Match(aNumber, rng, 0)
        MsgBox rowNum
    Else
        MsgBox "error"
    End If
End Sub

또는

Public Sub test()
    Dim rng As Range
    Dim aNumber As Variant
    Dim rowNum As Variant

    aNumber = "2gg"

    Set rng = Sheet5.Range("B1:B20")

    rowNum = Application.Match(aNumber, rng, 0)

    If Not IsError(rowNum) Then
        MsgBox rowNum
    Else
        MsgBox "error"
    End If
End Sub

이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.

침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제

에서 수정
0

몇 마디 만하겠습니다

0리뷰
로그인참여 후 검토

관련 기사

분류에서Dev

Application.WorksheetFunction 대 WorksheetFunction

분류에서Dev

Application.worksheetFunction.match가 올바르게 작동하지 않음 VBA Excel

분류에서Dev

What does Application.WorksheetFunction.Find do?

분류에서Dev

String match () 메서드

분류에서Dev

Application.WorksheetFunction.VLookup 일치 없음 오류

분류에서Dev

WorksheetFunction.Match가 작동하지 않습니다.

분류에서Dev

WorksheetFunction의 MATCH 속성을 가져올 수 없습니다.

분류에서Dev

Application.WorksheetFunction.Find의 기능은 무엇입니까?

분류에서Dev

목록 개체가있는 Application.WorksheetFunction.SumIfs

분류에서Dev

vba의 application.worksheetfunction.vlookup이 반복되지 않습니다.

분류에서Dev

Match 메서드 용 Karate Java API

분류에서Dev

C #에서 WorksheetFunction.CountIf를 사용하는 방법?

분류에서Dev

EXCEL VBA-Application.WorksheetFunction.CountA를 사용하여 사용자 지정 범위 내에서 채워진 셀 수를 "i"변수로 전달하는 방법은 무엇입니까?

분류에서Dev

VBScript에서 Excel WorksheetFunction.CountA를 사용하는 방법은 무엇입니까?

분류에서Dev

Master-Detail-Application에서 hasPendingChanges 메서드 사용

분류에서Dev

worksheetfunction.median issue with range

분류에서Dev

Shutdownhook에서 JavaFX Application.stop () 메소드 사용

분류에서Dev

"Application.Wait"메서드가 있습니까?

분류에서Dev

Sinatra :: Application : Class에 대한 정의되지 않은 메서드`desc '

분류에서Dev

contentType : POST 메서드가있는 'application / json'(JavaScript)

분류에서Dev

Application.Ontime Cancel이 'Application'개체의 'ONTIME'메서드에 실패합니다.

분류에서Dev

-match ...와 | 여기서 {$ _ -match ...}

분류에서Dev

NodeJS 13 assert 모듈에 match와 같은 메서드가 없습니다.

분류에서Dev

모호한 메서드 호출. Patchingchain의 add (Unit)와 AbstractCollection match의 add (Unit) 모두 "

분류에서Dev

VBA 대소 문자 구분 Application.Match

분류에서Dev

Excel VBA에서 WorksheetFunction.Trim을 사용하면 셀의 색상이 제거됩니다.

분류에서Dev

VBA에서 JavaScript의 "Application.Match"에 해당하는 코드를 어떻게 코딩합니까? --수치 보간 기능에 사용

분류에서Dev

WorksheetFunction.Sum returning zero for numbers

분류에서Dev

Excel VBA의 WorksheetFunction 문제

Related 관련 기사

  1. 1

    Application.WorksheetFunction 대 WorksheetFunction

  2. 2

    Application.worksheetFunction.match가 올바르게 작동하지 않음 VBA Excel

  3. 3

    What does Application.WorksheetFunction.Find do?

  4. 4

    String match () 메서드

  5. 5

    Application.WorksheetFunction.VLookup 일치 없음 오류

  6. 6

    WorksheetFunction.Match가 작동하지 않습니다.

  7. 7

    WorksheetFunction의 MATCH 속성을 가져올 수 없습니다.

  8. 8

    Application.WorksheetFunction.Find의 기능은 무엇입니까?

  9. 9

    목록 개체가있는 Application.WorksheetFunction.SumIfs

  10. 10

    vba의 application.worksheetfunction.vlookup이 반복되지 않습니다.

  11. 11

    Match 메서드 용 Karate Java API

  12. 12

    C #에서 WorksheetFunction.CountIf를 사용하는 방법?

  13. 13

    EXCEL VBA-Application.WorksheetFunction.CountA를 사용하여 사용자 지정 범위 내에서 채워진 셀 수를 "i"변수로 전달하는 방법은 무엇입니까?

  14. 14

    VBScript에서 Excel WorksheetFunction.CountA를 사용하는 방법은 무엇입니까?

  15. 15

    Master-Detail-Application에서 hasPendingChanges 메서드 사용

  16. 16

    worksheetfunction.median issue with range

  17. 17

    Shutdownhook에서 JavaFX Application.stop () 메소드 사용

  18. 18

    "Application.Wait"메서드가 있습니까?

  19. 19

    Sinatra :: Application : Class에 대한 정의되지 않은 메서드`desc '

  20. 20

    contentType : POST 메서드가있는 'application / json'(JavaScript)

  21. 21

    Application.Ontime Cancel이 'Application'개체의 'ONTIME'메서드에 실패합니다.

  22. 22

    -match ...와 | 여기서 {$ _ -match ...}

  23. 23

    NodeJS 13 assert 모듈에 match와 같은 메서드가 없습니다.

  24. 24

    모호한 메서드 호출. Patchingchain의 add (Unit)와 AbstractCollection match의 add (Unit) 모두 "

  25. 25

    VBA 대소 문자 구분 Application.Match

  26. 26

    Excel VBA에서 WorksheetFunction.Trim을 사용하면 셀의 색상이 제거됩니다.

  27. 27

    VBA에서 JavaScript의 "Application.Match"에 해당하는 코드를 어떻게 코딩합니까? --수치 보간 기능에 사용

  28. 28

    WorksheetFunction.Sum returning zero for numbers

  29. 29

    Excel VBA의 WorksheetFunction 문제

뜨겁다태그

보관