[[20200324154522]]　『マクロが実行できない』（すみれ）　ページの最後に飛ぶ

『マクロが実行できない』（すみれ）

Excel初心者です。
名前にフリガナをつけるマクロを実行してもフリガナがつかないのですが、
どうすれば出来るようになるでしょうか。

＜標準モジュール１に設定したマクロ＞

Sub フリガナをつける

Selection.SetPhonetic

End Sub

よろしくお願いします。

＜使用 Excel：Excel2016、使用 OS：unknown ＞

 Selection.Phonetics.Visible = True

をいれてみるとどうですかね？
（えく） 2020/03/24(火) 15:54

ありがとうございます、出来ました！
が、Phonetics.の後のVisible=Trueは毎回入れなくてもいいような設定にすることは可能でしょうか？
私のパソコンの問題なんでしょうか...?

（すみれ） 2020/03/24(火) 16:00

毎回入れなくてもいいというのは、どういうことですかね？

 Sub フリガナをつける
   Selection.SetPhonetic
 End Sub

上記コードだけで表示したいってことですか？

https://kokodane.com/mini_macro21.htm

このサイトで、わかりにくいですが

既に「ふりがなの表示」をしている状態にもかかわらず
ふりがなが表示されていない場合だけ、上記コードで表示されるということを言っているのだと思います
(右クリックメニューの「ふりがなの表示」を選択してもふりがなが表示されない場合)

マクロ単体でふりがなを表示しようと思ったら

 Sub フリガナをつける
   Selection.SetPhonetic
 　Selection.Phonetics.Visible = True
 End Sub

こうするしかないんじゃないでしょうか
（えく） 2020/03/24(火) 16:21

特定セルは常にフリガナあり、という事ならば、マクロ実行する必要はないような？

セルを範囲選択してから、「ホーム」－「フォント」のところにある「ふりがなの表示/非表示」を「ふりがなの表示」にするだけですよ。
（???） 2020/03/24(火) 16:28

サイトも確認させて頂きました。
表示されない場合の対応ということで教えて頂いたコードを活用させて頂きます。
ありがとうございました。

（すみれ） 2020/03/24(火) 16:52

はい、おっしゃる通り、ホーム→フォント→ふりがなの表示／非表示で出来るのですが、マクロの勉強を
してみたいと思っていまして一番簡単そうなものからとっかかったのですが、しょっぱなからつまづいてしまいました(笑　が、えくさんのアドバイスで解決できたので良かったです。ありがとうございます！
（すみれ） 2020/03/24(火) 16:56

コメント返信：

[ 一覧(最新更新順) ]

[[20200324154522]] 『マクロが実行できない』（すみれ） ページの最後に飛ぶ

[[20200324154522]]　『マクロが実行できない』（すみれ）　ページの最後に飛ぶ