"데이터가 없음"프로그래밍

VBA의 새로운 기능. 해당 번호의 텍스트 상자 및 검색 스프레드 시트에 숫자를 입력 한 다음 발견 된 숫자 옆에있는 열의 데이터를 양식의 텍스트 상자에 반환해야합니다. 나는이 일을했지만 문제는 숫자가 발견되지 않으면 예외를 작성하는 방법이다."데이터가 없음"프로그래밍

출처

2012-12-10 user1892360

메모리가 작동하면 Excel은 자동으로이를 나타내는 셀에 무엇인가 붙입니다. –

일부 코드를 표시하면 누군가가 원하는 결과를 얻기 위해 코드를 수정하는 방법을 알려줄 수 있습니다. –

이렇게. 설명 목적으로 만 수행 등 시트 이름, 범위 이름, 텍스트 상자에 이름을 위해 만든 가정은 어떻게 대해 이동하는 방법을 표시하려면 수식이 작업을 수행 할 수 있습니다

Sub FindNumber() 

Dim myNum 

myNum = TextBox1.Value 

Dim rng as Range 

Set rng = Sheets(1).Range("A1:A100").Find(myNum,lookat:xlWhole) 

If Not rng is Nothing Then 

    '[Rest of Code] 

Else 

    Msgbox myNum & "not found in Range" 

End If 

End Sub

출처

2012-12-10 19:34:54

. 숫자가 A1이고 숫자 목록이 D 열에 있다고 가정 해 보겠습니다. 열 D의 목록에서 A1의 숫자를 찾으면 E 열에 텍스트를 넣을 수 있습니다.

일반적으로 VLOOKUP() 만 사용하면됩니다. 이 수를 찾는 여부에 성공했을 경우 문과 ISERROR() 확인할 경우

=VLOOKUP(A1,D:E,2,FALSE)

당신은 간단하게 추가 할 수 있습니다. 일반적으로 Excel은 오류 일 경우 "# N/A"를 반환하지만 메시지를 원한다고 가정합시다.

=IF(ISERROR(VLOOKUP(A1,D:E,2,FALSE)),"ERROR",VLOOKUP(A1,D:E,2,FALSE))

출처

2012-12-13 08:03:30 aevanko

"데이터가 없음"프로그래밍

답변

관련 문제