[Excel/VBA/일본어] 엑셀로 만든 신박한 단어장 (일본어판)

 

안녕하세요!

네이버 단어장, 카카오 단어장 등 많은 애플리케이션이 이미 있지만, 단어 추가와 몇 암기 기능만으로는 뭔가 아쉬움이 있습니다.

저에게는 나만의 지식과 학습 내용을 추가로 입력할 수 없는 것이 바로 그 아쉬움이었습니다.

그래서 제게 맞는 용도의 엑셀 단어장을 만들어보았습니다.

제 단어장의 주목적은 학습 내용의 기록이며 손 쉬운 내용 검색입니다.

 

자, 구경해보시죠!

 

내맘대로 단어장 일본어판 Ver. 0 다운로드

내맘대로단어장_일본어_v0.xlsm

0.03MB

저에게 꼭 필요한 사전 기능

1. 단어, 발음, 뜻, 예시 및 기타 사항 입력 → 기본 기능인 엑셀표를 이용하여 양식 작성

2. 일부 내용으로 해당 항목 찾기 → [자동 필터]의 [텍스트 필터] 중 [포함]을 활용하되 VBA로 제어

3. 읽어주기 → SAPI 기능 활용 (참조 : 오빠두 - 엑셀 단어장 테스트 양식)
※ 음성 합성 기술을 이용한 것으로 악센트는 제대로 구현이 되지 않을 수 있습니다.

 

주요 편리 사항 및 기능

1. 검색어 입력 시 다시 본래의 입력 셀로 돌아가 연속 검색이 편리합니다. (관련 포스팅)

2. 단어 입력 시 한자음을 한글로 미리 입력해 놓으면 단어 검색이 수월합니다.

3. 엑셀표 기능을 이용했으므로, 단어 추가 시 표의 범위가 자동으로 확장되어 편리합니다.

4. 구분열(첫 열)은, 외국어 표현을 나름대로 그룹핑할 수 있는 기능으로 자유롭게 이용하면 됩니다.
(예 상황별, 특성별, 품사별 등)

5. 전체 리스트를 보고 싶을 때는, 발음 검색 입력 셀에서 delete를 눌러주시면 됩니다.

6. 일본어판을 조금만 수정하면 중국어판으로 변신 가능 (언어 특성별 최적 양식으로 수정 필요)

7. 여러셀을 선택하고 발음 듣기도 가능합니다. (다중 셀 값 텍스트 합친 뒤 한 번에 읽도록 코딩)

 

발음 듣기 기능 활성화

※ 상세 이미지 설명은 오빠두 자료 참고하세요.

1. [윈도우키 + i]로 윈도우 설정 진입

2. [시간 및 언어] → [언어] 순으로 클릭하여 상세 설정 진입
(다른 방법 : 검색란에 '언어' 입력해 검색 가능)

3. [기본 설정 언어]에서 [언어 추가] 클릭

4. 설치할 언어 검색 (예 일본어) 후 선택하고 [다음] 클릭

5. [언어팩 설치]와 [텍스트 음성 변환] 항목 체크하고 [설치] 진행

 

자동 필터 VBA 제어 코드

Set lo = ActiveSheet.ListObjects(1)
Set InA = Range("D1")

If Not Intersect(Target, InA) Is Nothing Then
    lo.AutoFilter.ShowAllData
    lo.Range.AutoFilter Field:=2, Criteria1:=("=*" & InA.Value & "*")

※ 원리 : 검색어 입력칸의 값이 바뀌면, 자동 필터의 텍스트 포함 값으로 지정하여 필터링
※ 검색 입력 셀이 총 4개라 여러 셀을 컨트롤하기 위해 InA ~ InD까지 4개를 나열했는데, 좀 더 효율적인 방법이 있을 것 같네요. 배우고 싶습니다.

이상입니다.

 

※ 일본어 버전 보다 한층 업그레이드된 영어 단어장

[Excel/VBA/영어] 엑셀로 만든 신박한 단어장 (영어판 v1.1)