Page: 1/1   
スポンサーサイト

一定期間更新がないため広告を表示しています

| スポンサードリンク | | - | - | pookmark |
【ワードVBA】隠し文字を一瞬で削除
今日はWordの隠し文字をワンクリックで削除する方法をご紹介。

普通に検索置換からでもできますが、今日はVBAで一瞬で削除しちゃいましょう!
Sub RemoveHidden()

Dim sView As Boolean

sView = ActiveWindow.View.ShowHiddenText
ActiveWindow.View.ShowHiddenText = True

Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting

With Selection.Find
.Text = ""
.Font.Hidden = True
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = True
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With

Selection.Find.Execute Replace:=wdReplaceAll
ActiveWindow.View.ShowHiddenText = sView

End Sub

以上です。Word 2010で動作確認済みです。

大変申し訳ありませんが、サポートはしておりませんので、
ご質問などはmougモーグの掲示板などをご利用ください。

JUGEMテーマ:コンピュータ
| 管理人 | 18:54 | comments(0) | trackbacks(0) | pookmark |

Calendar

  12345
6789101112
13141516171819
20212223242526
2728293031  
<< August 2017 >>

Sponsored Links

Profile

Search

Entry

Comment

Trackback

Archives

Category

Feed

Others

無料ブログ作成サービス JUGEM

Mobile

qrcode

Sponsored Links