Lorraine은 종종 인터뷰 기록으로 작업합니다. 면접관은 면담 자에게 이름 철자를 요청합니다. 입력 할 때 J-O-H-N D-O-E 에서처럼 철자를 표시하기 위해 문자 사이에 대시를 삽입해야합니다. Lorraine은 이름을 선택한 다음 매크로를 실행하여 이름을 대문자로 표시하고 문자 사이에 필수 대시를 삽입하는 방법이 있는지 궁금합니다.

매크로는 이러한 유형의 텍스트 처리를 수행하는 데 매우 적합합니다. 실제로 매크로의 문제에 접근 할 수있는 방법은 수십 가지 정도입니다. 다음은이를 수행하는 다소 간단한 방법입니다.

Sub CapDashNames()

Dim sTemp As String     Dim sName As String     Dim J As Integer

sTemp = UCase(Selection.Range.Text)   ' Make all uppercase     If Len(sTemp) > 1 Then         sName = ""

For J = 1 To Len(sTemp) - 1             ' Add new character to name             sName = sName & Mid(sTemp, J, 1)

If Mid(sTemp, J, 1) >= "A" And Mid(sTemp, J, 1) <= "Z" Then                 ' Add a dash if character was a letter                 sName = sName & "-"

Else                 ' Character added was not a letter                 If Mid(sName, Len(sName) - 1, 1) = "-" Then                     ' If there is a dash just before non-letter,                     ' get rid of it                     sName = Left(sName, Len(sName) - 2)

sName = sName & Mid(sTemp, J, 1)

End If             End If         Next J         ' Add final character         sName = sName & Right(sTemp, 1)

Selection = sName     End If End Sub

기본적으로 매크로는 선택한 항목을 단계별로 실행하고 각 알파벳 문자 뒤에 대시를 추가합니다. 그 대시 다음에 알파벳이 아닌 문자가 오면 대시가 제거됩니다. (예를 들어 공백 앞뒤에 대시가 표시되지 않도록합니다.)

매크로를 사용하려면 수정하려는 이름을 선택한 다음 매크로를 실행하면됩니다.

_ 참고 : _

이 페이지 (또는 WordTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / wordribbon-WordTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_WordTips_는 비용 효율적인 Microsoft Word 교육을위한 소스입니다.

(Microsoft Word는 세계에서 가장 인기있는 워드 프로세싱 소프트웨어입니다.)이 팁 (1354)은 Microsoft Word 2007, 2010, 2013 및 2016에 적용됩니다.