Word(ワード)総合相談所 Part21at BSOFTWord(ワード)総合相談所 Part21 - 暇つぶし2ch635:名無しさん@そうだ選挙にいこう 13/01/06 20:06:02.38 >>633 Sub test() Dim s As Range For Each s In ActiveDocument.Sentences If s.Characters.Count >= 4 Then s.Characters(1) = "☆" & s.Characters(1) End If Next End Sub 次ページ続きを表示1を表示最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch