akashi_keirin https://blog.hatena.ne.jp/akashi_keirin/ 素人がExcelVBAによる「一人働き方改革」に挑むブログ https://akashi-keirin.hatenablog.com/ VBA自作メソッド VBA一般 WordVBA 記号を黒字、文字を白字にする 前回 akashi-keirin.hatenablog.com を用いて、記号は黒字に、文字は白字にするメソッドを作った。 コード コードは次の通り。 リスト１ 標準モジュール Private Sub changeFontColor(ByVal targetFont As Font) '……(1)' If isSign(targetFont.Parent.Text) Then _ targetFont.ColorIndex = wdBlack: Exit Sub '……(2)' targetFont.ColorIndex = wdWhite '……(3)' End… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fakashi-keirin.hatenablog.com%2Fentry%2F2018%2F10%2F19%2F215057" title="記号は黒字、文字は白字にするマクロ - 素人がExcelVBAによる「一人働き方改革」に挑むブログ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/a/akashi_keirin/20181019/20181019214714.jpg Hatena Blog https://hatena.blog 2018-10-19 21:50:57 rich https://akashi-keirin.hatenablog.com/entry/2018/10/19/215057 1.0 100%