아래와 같이 단어,뜻,예문,예문해석으로 구성된 엑셀양식으로부터 위처럼 단어풀이 슬라이드를 일괄 생성해주는 VBA매크로 프로그램입니다.

 

Eng 열이 영어단어 Kor 열이 한글 해석, Sentence 가 예문입니다.

파워포인트 맨 마지막 기준 슬라이드에 위의 이름과 같은 도형이 있어야 합니다.

 

기준 슬라이드에는 각 도형의 애니메이션이 적용되어 있으면 이 효과는 복사됩니다.

 

먼저 맨 마지막 기준 슬라이드의 Eng, Kor, Sentence 도형의 폰트나 색상, 글자크기, 애니메이션 등을 설정합니다.

 

Alt-F8을 누르고 아래 매크로를 실행합니다.

1. GeneratePPT는 엑셀 파일로 부터 각 슬라이드를 만들어줍니다.

2. InsertTTS는 구글 TTS발음을 다운로드받아 삽입해줍니다. TTSMP3=True 로 바꿔주면 TTSMP3사이트에서 발음을 다운로드합니다. 이 사이트는 특히 아마존 TTS 규격인 SSML을 지원합니다. <prosody rate="0.8" pitch="high" volume="loud"> 이런 스크립트 설정이 가능합니다.

참고: https://docs.aws.amazon.com/polly/latest/dg/supportedtags.html

3. InsertLocalMP3 는 로컬 폴더의 mp3파일을 일괄로 삽입합니다.

TypeCast.ai 사이트를 이용하면 효과적입니다.

4. ApplyTransition 은 화면 전환효과를 일괄로 추가합니다.

 

 

가장 큰 특징은 영어 단어 발음과 예문 발음을 자동으로 삽입하는 점입니다.

 

아래와 같은 3가지 방법을 제공합니다.

1. Google TTS 

https://translate.google.com/?sl=auto&tl=en&text=words%20you%20want%20to%20know 

제한 없음.

 

2. TTSMP3.com

https://ttsmp3.com/makemp3_new.php

이 사이트는 Amazon계열 TTS소리를 하루에 3000자 이내 다운로드할 수 있음.

 

3.로컬 드라이브에 저장된 mp3파일

특히 typecast.ai 등에서 각 문장별로 저장된 mp3 파일이나 로컬 드라이드에 저장된 001.mp3, 002.mp3 등 특정 폴더 안의 일련의 로컬 파일들을 한 슬라이드당 2개씩(Eng, Sentence) 삽입하고 애니메이션을 설정해줍니다.

typecast.ai 에서 무료사용자는 1달에 3분이내의 TTS변환된 음성을 다운로드할 수 있음.(출처표시 조건)

 

참고로 음질 좋은 인공지능 TTS 사이트를 추가로 안내합니다.

실시간으로 녹음하거나 다운로드 받아서 문장별로 파일을 분리해줘야 합니다.

 

  • 구글 Cloud Speech AI:

https://cloud.google.com/text-to-speech/

 

  • Microsoft Azure AI Speech:

https://azure.microsoft.com/ko-kr/products/cognitive-services/text-to-speech/#features

 

MS사이트는 특히 Tampermonkey스크립트를 이용해 아래처럼 다운로드 기능을 활성화시킬 수 있습니다.

이 사이트들은 음질이 우수하나 다운로드 후 문장별로 mp3파일을 끊어줘야하는 단점이 있습니다.

 

 

생성 슬라이드 쇼 결과 화면:

스피커 도형을 누르면 소리를 끄거나 켤 수 있고

새로고침은 현재 슬라이드를 다시 보여주어서 발음을 다시 들을 수 있습니다.

좌상단 번호버튼을 누르면 모든 슬라이드보기 화면이 뜹니다.

 

 

실행과정 캡쳐:

예제문장 생성시 기존에 사용된 어휘가 그대로 사용되지 않고 과거형 등으로 바뀐 경우

사용자가 직접 강조할 부분을 [괄호]로 묶어주도록 했습니다.

 

샘플:

폰트는 빙그레II카페24쑥쑥체가 사용되었습니다.

아래 두 파일은 코드 내용은 같으나 1번은 구글 발음을 다운로드한 것이고

2번은 Typecast.ai 의 Katie 발음을 로컬로 다운받아 일괄삽입한 것입니다.

 

1.Google TTS 발음

Word1_Google.pptm
2.18MB

 

2. TypeCast.AI 사이트의 Katie 발음

Word1_Katie.pptm
2.71MB

이 콘텐츠는 인공지능 가상 연기자 서비스, 타입캐스트를 활용하여 제작되었습니다.
출연진: (Katie)
https://typecast.ai/kr

 

Word1_Katie.pptm을 각 슬라이드를 10초간격으로 동영상으로 변환한 결과