[엑셀] 메모 글씨체(글꼴), 글씨 크기를 VBA로 일괄 변경하는 방법

엑셀에서 메모를 입력하면 기본 글꼴이 Tahoma, 9포인트로 되어있어서

그걸 일일히 원하는 글씨체와 글씨크기로 변경한 기억이 있을 것입니다.

 

메모는 엑셀 내에서 글씨체 기본 설정을 할 수 없어서 더욱 불편하게 느껴집니다.

윈도우10 디스플레이 설정에서 [텍스트, 앱 및 기타 항목의 크기 변경]을 조정하면 해결되지만

이는 다른 모든 것들의 글씨 크기도 같이 확대하기 때문에 근본적인 해결책은 아닙니다.

 

이번에 알려드릴 내용도 근본적인 해결책은 아닙니다.

비주얼베이직으로 이미 작성된 메모의 글씨체와 글씨크기를 사후 일괄 조정할 수 있는 방법입니다.

 

엑셀 프로그램을 실행시킵니다.

이미 메모가 작성되어 일괄 변경을 원하는 파일을 여는 것이 더 좋습니다.

 

 

 

[Alt+F11] 눌러서 비주얼베이직을 실행합니다. 삽입-모듈을 클릭합니다.

 

 

 

생성된 모듈창에 다음과 같이 입력합니다.

Sub ChangeComment()
Dim ccmt As Comment
For Each ccmt In Application.ActiveSheet.Comments
  ccmt.Shape.TextFrame.Characters.Font.Name = "맑은 고딕"
  ccmt.Shape.TextFrame.Characters.Font.Size = 14
  ccmt.Shape.TextFrame.Characters.Font.Bold = False
  ccmt.Shape.TextFrame.AutoSize = True
Next
End Sub

 

 

 

입력 완료 시 비주얼베이직을 종료하고 잘 작동하는지 확인하기 위하여 메모를 하나 생성합니다.

 

 

 

개발 도구-매크로 클릭하고 ChangeComment 매크로를 실행합니다.

 

 

 

다음과 같이 메모의 글씨체와 글씨크기, 굵기와 메모의 크기가 조절된 걸 확인할 수 있습니다.

 

 

 

비주얼베이직에 입력한 코드가 뜻하는 바는 다음과 같습니다.

 

ccmt.Shape.TextFrame.Characters.Font.Name = "맑은 고딕"

- 글씨체를 조절하는 코드로 쌍따옴표 안에 원하는 글씨체를 입력하면 됩니다.

 

ccmt.Shape.TextFrame.Characters.Font.Size = 14

- 글씨 크기를 조절하는 코드로 14를 원하는 숫자로 변경하면 됩니다.

 

ccmt.Shape.TextFrame.Characters.Font.Bold = False

- 글씨 굵기를 조절하는 코드로 True는 굵게, False는 일반 굵기 입니다.

 

ccmt.Shape.TextFrame.AutoSize = True

- 메모창의 크기를 조절하는 코드로 True는 입력한 내용에 맞게 메모창 크기를 조절하고, False는 처음 생성하여 조절한 메모창의 크기를 그대로 둡니다.

 

↓ 하단의 ♡를 눌러 ♥로 채워주세요. 큰 힘이 된답니다.