Word(ワード)総合相談所 Part21at BSOFT
Word(ワード)総合相談所 Part21 - 暇つぶし2ch362:名無しさん@そうだ選挙にいこう
12/05/22 22:57:59.60
>>360
これでどうかな

With ActiveDocument.Range(0, 0).Find
.Text = "品番*号"
.MatchWildcards = True
.Replacement.Font.Name = "MSゴシック"
.Execute Replace:=wdReplaceAll
End With


次ページ
続きを表示
1を表示
最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch