![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.2ベストアンサー
- 回答日時:
Excelという前提で回答します。
マクロでSetPhoneticを使うので、Excel2000(以上?)が必要です。>1.秀丸で商品名を入力する。
>2.入力された商品名をAに張り付きとします。
ここまでは実行します。
A列に入力した商品名を選択した状態で下記マクロを実行します。ふりがなを隣のB列に書き出します。
セットされたふりがなは人間の目で確認する必要があるでしょう。
SetPhoneticは幸子が『サチコ』か『ユキコ』か判定できません。
ツール→マクロ→Visual Basic Editor でVBE画面に移り、挿入→標準モジュール で標準モジュールを挿入します。出てきたコードウインドウに下記マクロをコピーして貼り付けます。
Public Sub SetFurigana()
Dim rg As Range
For Each rg In Selection
rg.SetPhonetic
rg.Offset(0, 1) = Application.Phonetic(rg)
Next
End Sub
nishi6 殿
返事して頂いて、ありがとうございます。以前、MicrosoftのHPに調べましたが
または、問い合わせしましたが回答は得られなかった。教えて頂いたマクロを作って、実行しました。素晴らしい結果が得られました。PHONETICの関数まで影響がでました。本当にどうも、ありがとうございました。
No.3
- 回答日時:
Phonetic関数はコピーと貼りつけに関して
(1)同一シートのセルから他セルにコピーしたとき。
=Phonetic(c1)でカナが出る。
(2)ワードで漢字を出し、エクセルのセルに貼りつけたとき。
例えば隣のセルに=Phonetic(c1)を入れる。-->漢字が出る。
(カナが出ない)
メモ帳でも同じ。
(3)秀丸エディターの漢字をエクセルにコピーしても、かな漢字
変換の入力プロセス記録をエクセルへもってこれない。
(4)最近初めて気がついたのですが、ツール-マクロ記録をセットし て、セルに例えば「近藤」と入力して、マクロ記録をみたら、
ActiveCell.FormulaR1C1 = "近藤"
ActiveCell.Characters(1, 2).PhoneticCharacters = "コンドウ"
となっていました。この後半があるおかげで、別セル(または同一セ ル上部振り仮名)に、振り仮名が取り出せると言うことらしい。
ついでに、セルに「あおい」とひらがなを入れて無変換のままだと、
「・・・.PhoneticCharacters = 」はマクロ記録に出てきません。
エクセルのバージョンは2000です。
返事して頂いて、ありがとうございます。PHONETICでカタカナかフリガナを変換すると以前(98)からあったようです。それれも、Microsoftさんは仕様というか?
imogasiさんの経験は役に立ちます。どうも、ありがとうございます。
No.1
- 回答日時:
PHONETIC関数はセルに入力される際のひらがなの情報を表示します
漢字を自動的に読んでそれを表示するものではありません
また、振り仮名の情報はエクセルで新たに入力した文字データに対してだけです、他のアプリケーションで作成してコピーしても振り仮名は表示されません
ですから秀丸で入力してセルにコピーした場合、入力した漢字のひらがな
は引き継がれませんので
PHONETIC関数の結果は漢字のままとなります
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) Microsoft IME 一発で変換できない言葉がある 3 2022/07/19 19:29
- Safari(サファリ) ブラウザーの検索欄に、仮名や漢字が入力できません。 1 2022/10/06 12:55
- デスクトップパソコン 40年間の悩み キーボードにおいて初期値として漢字ローマ字変換に設定する方法 8 2023/05/08 14:50
- Excel(エクセル) エクセルでセルに何らかの文字が入力されたらそれを任意の数値として認識させる方法がしりたいです。 3 2023/03/16 20:19
- その他(Microsoft Office) Excelで該当しない項目(#N/Aの商品名)を簡単に表示・抽出させる方法についてです 1 2022/08/25 22:12
- Visual Basic(VBA) 入力ボックスが繰り返しポップアップして止まらない。 下記コードでファイル名の変更をしたいのですが、変 1 2022/09/08 11:27
- Excel(エクセル) Excelの社員名簿 6 2023/07/10 16:35
- Excel(エクセル) Excel 関数 vlookupなどの使い方について質問です。 シート1に品番、商品名、単価、発注条 6 2022/06/15 19:16
- フリーソフト フォルダ、ファイル名の一括変換について 3 2023/03/16 09:23
- その他(悩み相談・人生相談) チャットアプリで女の子友達ができたのですが、LINE交換をしました。 もともと下の名前は教えていて、 3 2022/07/20 09:59
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
Excel内での検索結果をシート...
-
マクロを実行すると画像がズレ...
-
エクセル 数字をすべて○などの...
-
エクセルでページ数をあるセル...
-
クリックすると文章が表示され...
-
エクセルでの検索ボックスの作...
-
Excelでセルをクリックす...
-
太字に設定されているセルの個...
-
セル背景や文字を点滅させる方法
-
VBA 見つからなかった時の処理
-
アポストロフィーの一括挿入 ...
-
Excelで、図形内の文字をセルに...
-
エクセルでPDFリンクを大量...
-
Excelで挿入した図をセルの中央...
-
シート保護とグループ化機能を...
-
【EXCEL】先週の月曜日の日付を...
-
開始行と最終行を指定して差し...
-
エクセルでセルをダブルクリッ...
-
エクセルVBA セルに表示された...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
太字に設定されているセルの個...
-
クリックすると文章が表示され...
-
Excelで挿入した図をセルの中央...
-
【マクロ】ファイル名の変更に...
-
Excelで、図形内の文字をセルに...
-
マクロを実行すると画像がズレ...
-
Excel ハイパーリンクのURLを別...
-
フォントの色を指定して削除出...
-
Excelでセルをクリックす...
-
Excel2007 色のカウント (VBA)
-
エクセルでの検索ボックスの作...
-
現在のセルの位置を返す関数は...
-
エクセル マクロ チェックボックス
-
VBA 見つからなかった時の処理
-
アポストロフィーの一括挿入 ...
-
エクセルでPDFリンクを大量...
-
セルの値が変ると自動でマクロ...
おすすめ情報