2016-07-01 7 views
0

표준 글 머리 기호 (^ 0149)로 글 머리 기호 (PS : 글 머리 기호 목록 없음)를 대체하는 매크로를 기록했습니다.글 머리 기호 문자를 찾고 MS Word에서 글 머리 기호 문자 하나를 바꾸는 방법은 무엇입니까?

Sub Macro1() 
Selection.Find.ClearFormatting 
Selection.Find.Replacement.ClearFormatting 
With Selection.Find 
    .Text = "o^t" 
    .Replacement.Text = "^0149^t" 
    .Forward = True 
    .Wrap = wdFindContinue 
    .Format = False 
    .MatchCase = False 
    .MatchWholeWord = False 
    .MatchKashida = False 
    .MatchDiacritics = False 
    .MatchAlefHamza = False 
    .MatchControl = False 
    .MatchWildcards = False 
    .MatchSoundsLike = False 
    .MatchAllWordForms = False 
End With 
Selection.Find.Execute Replace:=wdReplaceAll 
Selection.Find.ClearFormatting 
Selection.Find.Replacement.ClearFormatting 
With Selection.Find 
    .Text = ChrW(61607) & "^t" 
    .Replacement.Text = "^0149^t" 
    .Forward = True 
    .Wrap = wdFindContinue 
    .Format = False 
    .MatchCase = False 
    .MatchWholeWord = False 
    .MatchKashida = False 
    .MatchDiacritics = False 
    .MatchAlefHamza = False 
    .MatchControl = False 
    .MatchWildcards = False 
    .MatchSoundsLike = False 
    .MatchAllWordForms = False 
End With 
Selection.Find.Execute Replace:=wdReplaceAll 

최종 하위

내 문제는 일부 글 머리 기호 문자를 찾을 수 없습니다. 예를 들어 아래 이미지를 참조하십시오.

Example 01

어떻게 MS 워드 매크로에 의한 글 머리 기호 문자 또는 문자를 찾을 수 있습니까?

답변

1

테스트하지는 않았지만 아래 내용이 도움이 될 수 있습니까?

if asc(oldBullet) = 1 then replace by newBullet 
... 
관련 문제