홈피공장장

엑셀 함수 잘 아시는 분~~~ 도움 부탁드립니다.

· 2020-11-23 (월) 15:03:28 · 1600 · 12

안녕하세요.

관리해주는 회사에서 식당 하나를 운영중인데

다음과 같은 엑셀 주문내역이 있습니다.

 

왼쪽의 구분2에 해당하는 각 셀에 => 오른쪽 ID에 해당하는 구분2를 찾아서 넣고싶은데요.

이럴때 어떤 함수를 써야할까요?

 

웹이라면 그냥 dB구성해서 끌고오면 되는데, 엑셀은 잘 안쓰다보니, 모르겟네요 ㅠ

 

index도 아닌거 같고

match도... vlooup? hlooup? 다 아닌거 같아서

아시는 분 도움 좀 부탁드립니다.

 

ID 구분2   캠페인ID 구분2
3202395 ?   2952305 한식
2952306 ?   2952305 한식
3202394 ?   2952306  
2952306 ?   2952306  
3202395 ?   3043269 찜/탕
2952306     3202394 한식
3202394     3202394 한식
2952306     3202395 찜/탕
3202395     3202396 찜/탕
2952306     3272695 한식
3202394     3272695 한식
2952306     3346181 찜/탕
      3346182 한식
      3353289 찜/탕
      3353290 찜/탕
      3353291 찜/탕
      3353292 찜/탕
      3353293 찜/탕
      3365942 찜·탕
      3365943 찜·탕
      3365944 찜·탕
      3365945 찜·탕
      3381759 한식
      3381760 한식
      3381761 한식
      3381762 한식
      3381763 한식
      3381764 한식
|

댓글 12개

pivot으로 검색해보세요
2020-11-23 (월) 15:38:39
vlookup 하면 되는거 아닌가요?
(구분2셀)
=vlookup(ID셀<찾을 값>, 캠페인시트 즉, 찾을 시트의 범위<2952305셀부터 맨아래 한식셀까지>,2<이것은 두번째라는 뜻입니다. 첫번째는 캠페인ID, 두번째는 음식>,TRUE<정확히 일치하는 값을 가져오기>)
2020-11-24 (화) 09:40:06
@해피아이 참조해서 해결했습니다. 감사합니다.~
=VLOOKUP(A1,D1:E11,1,0)
(A1,D1:E11,2,0) 잘못 썻네요 << (A1,D1:E11,1,0) 숫자 1이 줄번호 입니다.. 만약 2번째 줄부터면 2가 되겠죠 ?
2020-11-24 (화) 09:39:33
@sosososo 넵. 어찌어찌 해결은 했습니다.
감사합니다. ^^
검색할 원본 데이터 주소는 절대 주소를 쓰셔야 채우기가 가능합니다.
A1을 찾아라 $D$1:$E$11에서 찾았다면 2번째 열의 값을 가져와라.
검색조건은 완전히 일치하는 값을 찾아서.....
=VLOOKUP(A1, $D$1:$E$11, 2, 0)

요렇게 하시고 채우기 하시면 쭈욱~ 들어갑니다.
2020-11-24 (화) 09:39:04
@컴대장 넵. 해피아이님 답변 참조해서 어찌어찌 해결은 했습니다.
감사합니다. ^^
2020-11-23 (월) 21:48:02
Vba로 만드는것이
좋을 듯 하네요
=수식은 vlookup. 하면 되지만요~~
2020-11-23 (월) 22:04:25
작업 시트에 넣으면 되요
질문의 왼쪽시트에 아래 코드를
질문의 오른쪽 값들은 "DB" 시트만들어 값넣고 코드북으로

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.CountLarge > 1 Then Exit Sub ' 1개 이상이면 종료
If Target.Row < 2 Then Exit Sub ' 2행 이하면 종료
If Target.Column > 1 Then Exit Sub ' 1열 즉 a열 보다 크면 종료

Application.EnableEvents = 0

If Target.Value = Empty Then ' 바코드를 지우면 나머지 "b:h"열 내용도 지움
Target.Columns("b:h").ClearContents ' b:h열 삭제
Else
Dim c As Range
Set c = Sheets("db").Columns("a").Find(Target.Value, , xlFormulas, xlWhole)

If Not c Is Nothing Then
Target(1, "b").Resize(, 6) = c(1, "b").Resize(, 6).Value

Else
Target(1, "b").Resize(, 6).ClearContents
End If
Target(1, "h") = Date & " " & Time

End If

Application.EnableEvents = 1
End Sub
2020-11-24 (화) 09:37:32
@돌소프트 아예 VBA를 짜주셧네요 ;; . 참고하겠습니다. 감사합니다!!!
댓글을 작성하시려면 로그인이 필요합니다.

자유게시판

202,947건
+
제목 글쓴이 날짜 조회
20-11-23 조회 1,317
20-11-23 조회 1,601
20-11-23 조회 1,546
20-11-23 조회 1,297
20-11-23 조회 1,329
20-11-23 조회 1,941
20-11-23 조회 1,507
20-11-23 조회 1,476
20-11-23 조회 1,767
20-11-23 조회 1,297
20-11-23 조회 1,261
20-11-23 조회 1,074
20-11-23 조회 4,484
20-11-22 조회 1,653
20-11-22 조회 1,421
20-11-22 조회 2,024
20-11-22 조회 1,151
20-11-22 조회 1,306
20-11-22 조회 1,367
20-11-22 조회 1,374