매크로를 작성하는 경우 문자열 변수로 많은 작업을 수행 할 수 있습니다. 문자열 변수와 관련된 일반적인 작업은 문자열에서 문자의 한 발생을 다른 발생으로 대체해야하는 것입니다. 예를 들어, 다음 문자열을 고려하십시오.

"This is my string of characters."

“of”를 “that has”와 같은 다른 단어로 바꿀 수 있습니다.

다음의 범용 함수는이를 수행 할 수 있습니다.

Function RepText(sIn As String, sFind As String, sRep As String) As String     Dim x As Integer

x = InStr(sIn, sFind)

While x > 0         sIn = Left(sIn, x - 1) & sRep & Mid(sIn, x + Len(sFind))

x = InStr(sIn, sFind)

Wend     RepText = sIn End Function

함수 사용 방법의 예로 다음을 수행 할 수 있습니다.

sTemp = "This is my string of characters."

sTemp = RepText(sTemp, "of", "that has")

이 코드가 실행되면 sTemp에 “This is my string that has characters”라는 문자열이 포함됩니다.

내 루틴에서 나는 종종 RepText와 같은 함수를 사용하여 여분의 공백을 제거합니다 (두 공백 문자열을 단일 공백 ​​문자열로 대체)

또는 여러 공백을 탭 문자로 대체합니다. 물론 그것을 사용하는 방법은 전적으로 귀하에게 달려 있습니다.

VBA의 최신 버전 만 사용하는 사람들은 내장 된 Replace 기능이 아닌 RepText와 같은 기능을 사용하는 이유에 대해 궁금 할 것입니다. Replace 기능은 본질적으로 RepText와 동일한 작업을 수행하지만 VBA 무기고에 추가 된 것은 비교적 새로운 일입니다. 매크로가 이전 버전의 Word에서 사용될 가능성이 거의없는 경우 바꾸기를 사용하면 매크로가 충돌 할 위험이 있습니다. 해당 버전에서는 사용할 수 없습니다.

_ 참고 : _

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

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

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

(Microsoft Word는 세계에서 가장 인기있는 워드 프로세싱 소프트웨어입니다.)이 팁 (811)은 Microsoft Word 97, 2000, 2002 및 2003에 적용됩니다.