셀값과 같은 시트이름을 찾아 수식에 사용하기


오늘 어떤 선생님에게서 전화가 왔습니다. 학생별로 시트가 있고, 그 시트에 학생의 성적이 있는데, 별개의 시트에서 학생의 이름을 입력하면, 그 학생의 이름과 같은 시트를 찾아 그 시트의 특정셀값이 출력되게 할 수 없느냐는 질문이었습니다.

정교하게 짜려면 VBA를 사용해야할 것 같습니다만, 간단히 하려면 다음과 같이 가능합니다.


 그림에서처럼, 학생의 이름별로 시트가 별도로 있고, 그 학생의 시트안에는 각 기간별 성적이 들어있습니다. 그리고, 학생의 시트마다 평균 성적을 구해둡니다. 여기서는 7행에 평균성적에 해당하는 셀들이 있군요.


"평균"이라는 이름의 시트에 와서, 다음과 같이 수식을 입력합니다.

=HLOOKUP(B$1,INDIRECT($A2&"!C1:F7"),7,0)


--------답만 알기를 원하신다면 이 이후는 읽지 않으셔도 됩니다.---------

사실, Kevin학생의 국어평균점수는 이미 Kevin시트의 C7셀에서 구해두었기때문에

=Kevin!C7

이라고 간단하게 구할 수 있습니다. 그런데 굳이 복잡한 함수를 쓴 이유는 뭘까요?
엑셀의 함수를 사용할때는 많은 양의 데이타를 다룬다는 것을 항상 염두에 두어야합니다. 그래서  함수를 아래로, 오른쪽으로 끌어채우기했을때도 제대로 작동할 수 있도록 만들어야합니다. 그렇지 않고 모든 셀마다 함수를 달리 주어야한다면 엑셀을 사용하는 의미가 없는 것이지요.

=Kevin!C7 이라는 수식을 아래로 끌면 오류가 날것입니다. Kevin시트가 아니라 Mike시트에서 셀을 찾아야하는데 그걸 표현해 주지 못하니까요.

따라서 올바른 수식을 만들려면 Kevin이나 Mike와 같은 시트이름을 그대로 사용하지 말고, 수식으로 표현해야 할 것입니다.

또, =Kevin!C7 이라는 수식을 오른쪽으로 끌면 차례대로
=Kevin!D7
=Kevin!E7
=Kevin!F7
의 수식이 만들어질 것이고, 각각 영어, 수학, 과학의 평균점수를 구하게 됩니다. 그런데, "평균"이라는 시트에서 모든 과목을 다 보기 원하지 않고 일부 몇개만 보기 원한다면? 그래서 국어 다음에 영어가 나오지 않고 수학이 나오는 식으로 표를 만든다면, 위의 수식대로 해선 안되겠지요. 수학평균이 나와야할 자리에 영어평균이 나오게 되니까, 모든 셀에 수식을 새로 입력해야합니다.

따라서, 올바른 수식을 만들려면 "국어""영어"와 같은 과목이름을 맨 윗행에서 찾아, 그 과목에 해당하는 평균점수를 구하도록 해야할 것입니다.


이제, 정답인 =HLOOKUP(B$1,INDIRECT($A2&"!C1:F7"),7,0) 에 사용된 함수를 하나씩 알아봅시다.

HLOOKUP함수는 이전에 배웠습니다. 맨첫행에서 주어진 값을 찾고, 또 주어진 숫자만큼 아래로 이동한 곳에 있는 셀값을 출력하는 함수입니다.

 =HLOOKUP(B$1,  B1셀의 값을 국어
 INDIRECT($A2&"!C1:F7"),  INDIRECT($A2&"!C1:F7") <--- 이 부분에서 가리키고 있는 배열의 첫행에서 찾아서  Kevin시트의 C1:F7의 배열의 첫행
 7,  7번째 셀에 있는 값을 구하되  C7셀의 값
 0)  "국어"를 찾되 정확하게 "국어"라고 되어있는 값을 찾아라. "영어"나 "국사"를 찾으면 안된다

그럼 HLOOKUP함수는 아시겠지요. INDIRECT함수 부분으로 가겠습니다.

INDIRECT함수는 셀주소를 A1과 같이 직접입력하지 않고 다른 방식으로 셀주소를 표현하는 함수입니다.

예를 들어, "가회동"이라고 주소를 써주지 않고, ""가정"의 첫글자, "회식"의 첫글자, "엄동설한"의 두번째 글자를 모아"라고 주소를 주는 것입니다.

=HLOOKUP(B$1,INDIRECT($A2&"!C1:F7"),7,0)

이 수식에서 HLOOKUP함수의 두번째 인수는 첫행의 값을 찾을 배열입니다. 여기서는 Kevin!C1:F7을 의미해야합니다.

INDIRECT($A2&"!C1:F7")

라는 수식은

A2라는 셀에 있는 값에
!C1:F7 이라는 문자를 더하면 만들어지는 주소를 반환합니다.

A2라는 셀안에는 Kevin이라는 학생의 이름이 들어있습니다. 따라서 결국 위의 수식은

Kevin!C1:F7

이라는 주소를 반환하게 됩니다. 즉,

INDIRECT($A2&"!C1:F7") ===> Kevin!C1:F7 이므로,

HLOOKUP(B$1,INDIRECT($A2&"!C1:F7"),7,0) ===> HLOOKUP(B$1,Kevin!C1:F7 ,7,0) 이 됩니다.

이제 이 수식을 아래로, 오른쪽으로 끌어채우기 해보세요. ^^



댓글

댓글 쓰기

이 블로그의 인기 게시물

중복된 텍스트 제외하고 고유 텍스트 개수 세기

이미지
네이버 지식인 에서 알게 된 좋은 수식을 소개합니다. 이런 식으로 A1:D2 범위 내에 사람 이름이 중복된 것 포함해서 여러개 있습니다. 이때  중복된 이름은 제외하고 모두 몇 명의 이름이 있는지  알고 싶을 때 쓰는 수식입니다. 수식은 위와 같습니다.  일단, 이 수식의 기본적인 구조는,  각 사람의 이름이 나올 때마다 그 자리에 전체 범위에서 그 사람의 이름이 나오는 횟수를 분모로, 1을 분자로 한 값을 배정하여, 나중에 그 모든 숫자를 합하는 것입니다. 간단한 예를 들어서, 다음과 같이 이름이 6개가 배열되어 있다고 합시다. 홍길동,장길산,홍길동,홍길동,홍길동,장길산 그럼 이름 대신에 그 자리에 다음 숫자를 배당합니다. 0.25, 0.5, 0.25, 0.25, 0.25, 0.5 홍길동은 총 4번 나오니 1/4해서 0.25를 홍길동이 나오는 자리마다 배정합니다. 장길산은 총 2번 나오니 1/2해서 0.5를 장길산이 나오는 자리마다 배정합니다. 이제 모든 숫자를 더하면 0.25+ 0.5+ 0.25+ 0.25+ 0.25+ 0.5 = 2  그래서 중복된 이름을 제외하고 모두 2명의 이름이 있다는 결과가 나옵니다. 이제 수식을 살펴보겠습니다. =SUMPRODUCT((A1:D2<>"")/(1-(A1:D2<>"")+COUNTIF(A1:D2,A1:D2))) (엑셀에서 수식-수식분석-수식계산을 하시면 단계별로 수식이 어떻게 계산되는지 볼 수 있으므로 수식을 이해하는데 도움이 됩니다.  밑줄이 쳐진 부분은 이번 단계에서 계산이 될 예정이라는 것을 의미하고 이탤릭으로 표시된 부분은 바로 이전 단계에서 계산이 된 결과라는 것을 보여줍니다) 이 부분은 A1:D2 범위에서 공백이 아닌, 즉 이름이 있는 셀을 골라내는 것입니다. 그래서 이름이 들어있으면 TRUE, 공백이면 FALSE
자세한 내용 보기

1일1함수 (12) sumproduct함수 - 동점일때 다른 기준으로 순위매기기

이미지
오늘은 SUMPRODUCT함수를 다룹니다. SUMPRODUCT함수는 매우 다양한 문제의 해결을 위해 광범위하게 응용될 수 있는 함수입니다. 오늘은 석차를 낼때 사용하는 예를 들어 설명해 보겠습니다. 주어진 배열에서 해당 요소를 모두 곱하고 그 곱의 합계를 반환합니다. 구문 SUMPRODUCT ( array1 ,array2,array3, ...) array1, array2, array3, ...   곱한 후 더할 값이 들어 있는 배열을 지정합니다. 2개에서 255개 사이의 배열을 사용할 수 있습니다. 주의 인수로 사용하는 배열의 차원은 모두 같아야 합니다. 차원이 같지 않으면 #VALUE! 오류 값이 반환됩니다. 숫자가 아닌 배열 항목은 0으로 처리됩니다. SUMPRODUCT함수는 다음에 이야기하게 될 "배열함수"와 깊은 관련이 있습니다. 영어로는 ARRAY인데, 학교 다닐때 "행렬"이라는 이름으로 배운 기억이 있는데 엑셀에서는 "배열"이라는 표현을 씁니다. 배열로 수식을 작성하는 것은 저도 아직 정확하게 이해는 하지 못했지만, 대충 감은 잡고 있는데, 그 감을 잡는데 이 SUMPROCUT함수가 도움이 되었습니다. 이 함수는 위에 있는 설명에도 있듯이, 주어진 배열을 모두 곱한 뒤에 그 합계를 반환하는 함수입니다. (2,4) 라는 배열과 (3,5) 라는 배열이 있을때, SUMPRODUCT({2,4},{3,5})라고 하면 2*3 + 4*5 를 계산하여 26을 반환합니다. 같은 식을 다음과 같이 표현할 수도 있습니다. A1:A2 의 배열과 B1:B2의 배열이 * (논리곱)으로 연결되어있습니다. 이때의 계산식은 위에서 설명한 것과 같이, 2*3 + 4*5 입니다. 그런데, 다음처럼 + (논리합)으로 연결되면 (2+3) * (4+5) 를 계산하여 14를 반환합니다. 여기까지 SUMPRODUCT함수의 기본적인 설명이
자세한 내용 보기

한 폴더 안의 모든 파일에서 특정 시트 복사해오는 vba

네이버 지식인에서    큰형(ks_1862)님의 답변 중 참고하였습니다. D:\TEMP 라는 폴더 안에 있는 모든 XLSX 확장자를 가진 엑셀파일에서 "통계"라는 이름을 가진 시트를 복사해옵니다. Option Explicit Sub MergeWBs() Dim wbDst As Workbook Dim wbSrc As Workbook Dim wsSrc As Worksheet Dim MyPath As String Dim strFilename As String Application.DisplayAlerts = False Application.EnableEvents = False Application.ScreenUpdating = False MyPath = "D:\temp" Set wbDst = ThisWorkbook strFilename = Dir(MyPath & "\*.xlsx", vbNormal) If Len(strFilename) = 0 Then Exit Sub Do Until strFilename = "" Set wbSrc = Workbooks.Open(Filename:=MyPath & "\" & strFilename) Set wsSrc = wbSrc.Worksheets("통계") wsSrc.Copy after:=wbDst.Worksheets(wbDst.Worksheets.Count) wbSrc.Close False strFilename = Dir() Loop wbDst.Worksheets(1).Delete Application.DisplayAlerts = True Application.EnableEvents = True Application.ScreenUpdating = True End Sub 2017.2.16 몇가지 기능을 추가한 버전입니다 1. '통계&
자세한 내용 보기