특정 열의 & 1을 Find 하는 방법을 알고 싶습니다!

VBA
작성자
모아
작성일
2021-11-24 19:38
조회
44
엑셀버전 : 엑셀2016

운영체제 : 윈도우10

lStridMatchrow = workWb2.Sheets(strFile2_Sheet).Columns(lStridC2) & 1.Find(What:=workWb1.Sheets(strFile1_Sheet).Cells(j, lStridC1), LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Row

 

위처럼 특정 열의 & 1 값을 찾고 싶은데 위와 같은 방식으론 안될거 같은데 어떻게 하면 가능할지 고수님들에게 조언을 듣고 싶습니다!

 

[예시]

workWb2.Sheets(strFile2_Sheet).Columns(lStridC2) 열엔 아래와 같은 숫자가 있습니다.

101

102

103

104

해당 숫자들을 아래와 같이 & 1 해서 특정 셀과 find하고 싶습니다.

1011

1021

1031

1041

전체 4

  • 2021-11-24 23:02

    질문을 정확히 이해하지 못했습니다..^^;

    범위에 입력된 값들 뒤에 1 을 추가하고 싶으신건가요?


    • 2021-11-26 10:44

      @더블유에이 님 넵넵 맞습니다.

      A:A 범위에 입력된 값들 뒤에 1을 추가해서 B셀 값과 일치하는지 확인하고 싶습니다.

      그렇다고 실제 파일 내 A:A 범위의 수치를 바꾸면 안되고 일치하는지 VBA 상에서만 확인하고 싶습니다.


      • 2021-11-26 20:17

        @모아 님 방법이 여러개가 있겠지만 배열을 사용하면 될 것 같습니다

        아래 예시코드 활용해보세요

        Dim v1, v2, v As Variant
        Dim i, j as Long
        
        v1 = Range("A1:A10")
        v2 = Range("B1:B10")
        
        For i = 1 to 10
        If cStr(v2(i,1)) = cStr(v1(i,1) & "1") Then ...
        '동작
        End If
        Next
        
        

        • 2021-11-29 15:50

          @더블유에이 님 배열을 이용하면 되는군요! 답변 감사합니다!


전체 4,648
번호 카테고리 제목 작성자 작성일 추천 조회
공지사항 공지사항
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (9)
오빠두엑셀 | 2021.10.28 | 추천 15 | 조회 702
트로피 오빠두엑셀 2021.10.28 15 702
24154 피벗테이블
New 설문조사 피벗테이블 구성이 어렵네요 첨부파일
가리 | 12:22 | 추천 0 | 조회 12
가리 12:22 0 12
24153 VBA
New 엑셀 검색 창 첨부파일 (1)
이혜 | 11:59 | 추천 0 | 조회 13
이혜 11:59 0 13
24149 VBA
New 엑셀 메일 보내기 자동화 매크로 관련 (저장경로 변경, 일정한 셀 값의 변화로 매크로 반복) 첨부파일
| 10:48 | 추천 0 | 조회 23
10:48 0 23
24148 피벗테이블
New 피벗테이블 형태의 데이터베이스 변환
이길호 | 10:34 | 추천 0 | 조회 17
이길호 10:34 0 17
24140 VBA
New 특정 시트에 추출되어있는 값을 각각의 시트로 분류하려고합니다. 첨부파일 (1)
이치영 | 01:37 | 추천 0 | 조회 35
이치영 01:37 0 35
24135 VBA
New vlookup #N/A 에러가 나오는 경우 IF문은 어떻게.... (2)
툴잇지 with 우정기기 | 2021.11.29 | 추천 0 | 조회 46
툴잇지 with 우정기기 2021.11.29 0 46
24132 함수/공식
New 동적범위, 셀값을 시트명으로 인식하여 합계를 구하는것 첨부파일 (6) 답변완료
키큰아저씨 | 2021.11.29 | 추천 0 | 조회 48
키큰아저씨 2021.11.29 0 48
24129 VBA
New 직사각형 도형 삭제vba (2) 답변완료
H.B | 2021.11.29 | 추천 1 | 조회 32
H.B 2021.11.29 1 32
24126 VBA
New "요청한 레지스트리에 엑세스할 수 없습니다." 라는 에러때문에 진행이 안됩니다. (3)
볼펜수리공 | 2021.11.29 | 추천 0 | 조회 29
볼펜수리공 2021.11.29 0 29
24120 기능/도구
New 조건부서식으로 찾은 바탕색을 실제 엑셀 바탕색 컬러로 변경하고 싶습니다. 첨부파일 (2) 답변완료
glas**** | 2021.11.29 | 추천 0 | 조회 34
glas**** 2021.11.29 0 34
24117 함수/공식
New 맨 끝자리를 제외한 7자리 추출 첨부파일 (2) 답변완료
감사하모니카 | 2021.11.29 | 추천 0 | 조회 40
감사하모니카 2021.11.29 0 40
24116 VBA
New VBA 2007버전과 2021버전에서의 속도 차이가 많이 납니다. 해결방안이 있을까 해서요? 첨부파일 (2)
한정석 | 2021.11.29 | 추천 0 | 조회 44
한정석 2021.11.29 0 44
24113 함수/공식
New 조건 서식 질문입니다. 첨부파일 (1)
space | 2021.11.29 | 추천 0 | 조회 38
space 2021.11.29 0 38
24111 피벗테이블
New 피벗테이블 DAX함수 관련 문의
T첫 | 2021.11.29 | 추천 0 | 조회 24
T첫 2021.11.29 0 24
24106 함수/공식
New 엑셀에서 해당 날짜기간 동안을 찾아 날짜열에 각각 표기하는 방법 첨부파일 (5)
공수래 | 2021.11.29 | 추천 0 | 조회 39
공수래 2021.11.29 0 39
24099 함수/공식
New 입력한 값에 따라 IMAGE 자동입력 함수 문제 관련 (1)
유지연 | 2021.11.29 | 추천 0 | 조회 28
유지연 2021.11.29 0 28
24098 VBA
New 워드 Format(숫자, "#,###") (1) 답변완료
argus | 2021.11.28 | 추천 0 | 조회 38
argus 2021.11.28 0 38
24097 VBA
New 각각 형식이 다른 여러 시트에서 원하는 값들만 가져와서 한 시트에 보기 쉽게 합치고 싶습니다. 첨부파일 (1)
축전 | 2021.11.28 | 추천 0 | 조회 42
축전 2021.11.28 0 42
24096 VBA
New 엑셀 재고관리툴 만들기 VBA영상 시청중 오류 발생관련 문의입니다. 첨부파일
가을전어 | 2021.11.28 | 추천 0 | 조회 23
가을전어 2021.11.28 0 23
24093 기능/도구
New 작업표시줄 클릭으로 클립보드에 복사 문제 관련 (1)
어루 | 2021.11.28 | 추천 0 | 조회 21
어루 2021.11.28 0 21
24091 VBA
New 도와주세요! 뭐가 문제인지 못찾겠습니다.
y**** | 2021.11.28 | 추천 0 | 조회 40
y**** 2021.11.28 0 40
24089 VBA
New 엑셀 vlookup vba 문의드립니다. (4) 답변완료
ㅈㄱㄹ | 2021.11.28 | 추천 0 | 조회 45
ㅈㄱㄹ 2021.11.28 0 45
24088 함수/공식
New 개인별 회비 납부 현황에 따라 월별 납부액 결정 관련 함수 또는 VBA (미납, 매월 16일 이후 납부할 경우 월회비 10% 가산) 첨부파일 (5) 답변완료
007 | 2021.11.28 | 추천 0 | 조회 58
007 2021.11.28 0 58
24081 함수/공식
New 영문주소를 한글주소로 변경 희망합니다. (1)
루s cos 개인대행 | 2021.11.28 | 추천 0 | 조회 37
루s cos 개인대행 2021.11.28 0 37
24072 VBA
New 수식이 있는 데이터에서 매크로를 사용하여 다른시트에 결과값만 붙여넣고 싶습니다. 첨부파일 (6) 답변완료
호랑이파워 | 2021.11.28 | 추천 0 | 조회 57
호랑이파워 2021.11.28 0 57
24068 파워쿼리/피벗
New 파워쿼리 간단한 '값 바꾸기' 에 대해서 질문드립니다. 첨부파일 (3)
월마리아 | 2021.11.28 | 추천 0 | 조회 31
월마리아 2021.11.28 0 31
24065 피벗테이블
New 열과 행 바꾸는 쉬운 방법있나요? 첨부파일 (5) 답변완료
jyj6**** | 2021.11.27 | 추천 0 | 조회 55
jyj6**** 2021.11.27 0 55
24060 VBA
New 메모리가 부족하다고 뜹니다. 첨부파일
선물 | 2021.11.27 | 추천 0 | 조회 33
선물 2021.11.27 0 33
24059 VBA
New 첨부파일을 서버 업로드 (1)
권원재 | 2021.11.27 | 추천 0 | 조회 31
권원재 2021.11.27 0 31
24053 파워쿼리/피벗
엑셀 배열 순서를 바꾸고 싶습니다. 첨부파일
jyj6**** | 2021.11.27 | 추천 1 | 조회 36
jyj6**** 2021.11.27 1 36
VBA
Re:엑셀 배열 순서를 바꾸고 싶습니다.
Yukon | 2021.11.27 | 추천 1 | 조회 43
Yukon 2021.11.27 1 43
피벗테이블
New Re:Re:엑셀 배열 순서를 바꾸고 싶습니다. (1)
jyj6**** | 2021.11.27 | 추천 0 | 조회 28
jyj6**** 2021.11.27 0 28