ExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得する

この記事では当方が実際にご相談いただいた内容をまとめております。
データに入力情報がなく、ふりがなを自動で取得したいという方向けの記事です。

ExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得する方法

「データがコピー貼り付けでふりがな入力情報がない状態でふりがなを自動取得するにはどうすればいいですか?」とご相談いただきました。
データに入力情報がなくふりがなを自動で取得する場合はExcelの機能や関数ではできませんのでExcelVBAを使用します。

ExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得するコードの作成


「開発」タブをクリック
「Visual Basic」をクリック
「数式が入っている空白行と空白行を削除する」コードの入力

ExcelVBAで入力情報なしのふりがなを自動で取得するコードの解説

今回作成するコードのポイントは下記2つです。

  • Cells(Rows.Count, 1).End(xlUp).Row で最終行を取得する
  • Range(“A1:A” & 最終行).SetPhonetic でふりがなを自動取得する

コードとしてはわずか1行書くだけで作成できます。

※コード作成になれるまでは必ず紙に書き出して考えるようにしましょう!

ボタンにExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得するマクロを登録

手順については「ExcelVBAでブックのシート名を検索して見つかったときにシートをアクティブにさせる方法」の記事の「シート検索ボタンにマクロを登録」を参照ください。

ボタンをクリックしてExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得するコードの実行


「ふりがな自動取得」ボタンをクリック


ふりがなが自動で取得される

※わかりやすくするためにB列にPhonetic関数を使用してふりがなを表示しています。

尚、データに入力情報がない場合はPhonetic関数を使用しても漢字で表示されてしまいます。

結論(まとめ)

「ExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得する方法」を解説しました。

  • ExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得するコードの作成
  • ボタンにExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得するマクロを登録
  • ExcelVBAでデータに入力情報なしの状態でふりがなを自動で取得するコードの実行

Follow me!

The following two tabs change content below.
大阪生まれの大阪育ち。システム開発系、パソコン教室運営管理、パソコンサポートの仕事を中心に10年以上IT業界に生息しているけれども、実はHTMLやCSSが苦手。 パソコン教室やパソコンサポートなどでお客様から「ありがとうございます。」という感謝の言葉をいただいたときにやりがいを感じる。もっと自分のITのスキルで人様のお役に立ちたいと考え、義経ITクラブを開業して日々を送る。

これから副業をはじめるならバイナリーオプション取引

バイナリーオプション取引
ペイアウト倍率最大2.0倍

・業界最高水準のペイアウト倍率
・豊富な取引資産と取引種類
・オーストラリア金融当局の監督下にて営業
・取引開始でもれなく全員に5,000円キャッシュバック

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

CAPTCHA