Value = Application. 例として「全角・ひらがな」から「半角・カタカナ」など同時に変換もできるので、色々使い分けて利用して下さい。 また、vbaに関するテクニックや便利な手法などをこのサイトに掲載していきますので、定期的に参照していただけると幸いです。 ただし、数字だけ半角へ変換し、カタカナなどは全角のままといった場合はvbaを使う方が容易と考えます。 全角の数字を半角に変換する. Sub 数字のみ半角にする '選択範囲に対して処理を行います Dim myRange As Range Dim i As Integer For Each myRange In Selection For i = 1 To Len(myRange. Copyright © 2020 AKIRA SITE(EXCEL VBA初心者・入門者向きサイト) All Rights Reserved. 数字のみを変換する. Value) If Mid(myRange. WordPress Luxeritas Theme is provided by "Thought is free". ブログを報告する, '「-」は、ひらがなとカタカナ区別なく半角にします。半角にしたくない場合、ァ-ヶの後のーを消去して下さい, SpecialCells(xlCellTypeVisible)メソッドのバグ?を回避する(Tips-16). Replace (myRange. ここでは、文字の変換(StrConv)の使い方を説明します。文字変換の種類は、「大文字⇔小文字・カタカナ⇔ひらがな・・・」, 下記のプログラムは、StrConv(vbUpperCase)の使い方です。小文字から大文字に変換するプログラムです。, 下記のプログラムは、StrConv(vbLowerCase)の使い方です。小文字から大文字に変換するプログラムです。, 下記のプログラムは、StrConv(vbProperCase)の使い方です。先頭文字を大文字に変換するプログラムです。, 下記のプログラムは、StrConv(vbWide)の使い方です。半角文字から全角文字に変換するプログラムです。, 下記のプログラムは、StrConv(vbNarrow)の使い方です。全角文字から半角文字に変換するプログラムです。, 下記のプログラムは、StrConv(vbKatakana)の使い方です。ひらがな文字をカナ文字に変換するプログラムです。, 下記のプログラムは、StrConv(vbHiragana)の使い方です。カタカナ文字をひらがな文字に変換するプログラムです。, EXCEL VBA Sheet(シート)上に実行ボタンの設置(VBAプログラムの実行), など、さまざまな形に変換します。具体的には、下表に一覧表示されていますので、参考にして下さい。この機能については、列毎に統一したデータを揃える場合に利用すると便利な機能です。, ●実行後 ※A列の文字列の先頭が大文字に変換されました。 単語ごとに先頭文字が大文字になります。(クリックして拡大), ●実行後 ※A列の半角文字表示されている名前が全角表示されました。(クリックして拡大), ●実行後 ※A列の全角文字表示されている名前が半角表示されました。(クリックして拡大), ●実行後 ※A列にひらがなで名前表示されている名前がカタカナに変換されました。(クリックして拡大), ●実行後 ※A列にカタカナで名前表示されている名前がひらがなに変換されました。(クリックして拡大), EXCEL VBA Google Chrome(グーグルクローム)の操作・webスクレイピング・情報取得(Seleniumの設定・準備), EXCEL VBA Replace関数 複数の文字列の置換(セルの値・指定文字列位置・置換リスト・数式の置換), EXCEL VBA 請求書・領収書の作成・自動判定・自動押印(電子印鑑)丸印・角印(テクニック), EXCEL VBA Goto ステートメント(行ラベル・行番号)指定ラベルへジャンプ, EXCEL VBA Replace メソッド 複数の文字列の置換(セル範囲・一括変換・置換リスト), EXCEL VBA Substitute メソッド 複数の文字列の置換(大量・一括変換・置換リスト), EXCEL VBA Weekday関数・WeekdayName関数・日付から曜日を取得・祝日判定, EXCEL VBA RangeオブジェクトOFFSETプロパティ(基準セルからの行・列移動・相対参照・セル範囲を移動する), EXCEL VBA  2次元配列・セル範囲の内容を配列に格納・配列の内容をセルに代入(一括・高速化・セルの指定範囲), EXCEL VBA 連想配列で合計・グループ集計・別シート転記・重複削除 (Scripting.Dictionary), EXCEL VBA フォルダー・ファイルのショートカット作成(アプリケーション・共有フォルダー・URLのショートカット), EXCEL VBA 文字列の読み上げ・セルのデータを読み上げる(読み上げ機能:RangeオブジェクトのSpeakメソッド), EXCEL VBA  オーバーフローしました。(実行時エラー:6)エラー原因・修正・回避・対処・解決, EXCEL VBA 連想配列でクロス集計・項目別集計・グループ集計 (Scripting.Dictionary) テクニック, EXCEL VBA InternetExplorerの操作 住所から最寄り駅を検索する・自動収集(テクニック), EXCEL VBA フォルダー内のファイル名をシートに一覧表示(サブフォルダー含める:再帰呼び出し)テクニック, EXCEL VBA ハイパーリンクの追加・設定 別のシートへジャンプ・Webページを表示(Hyperlinkオブジェクト), EXCEL VBA InternetExplorerの操作(ブックマーク・お気に入り登録・管理)テクニック, EXCEL VBA InternetExplorerの操作(Webページ操作・監視・タイトル名取得・URL取得・ブックマーク)②, EXCEL VBA ワークシートの追加・複数追加・先頭・最後(Worksheets.Addメゾット), EXCEL VBA Call の使い方 (サブルーチンの活用・プロシージャの連携). 全角→半角. 全角英数字を半角に変換する ここでは全角英数字を半角に変換するコードを2つ紹介します。 1つ目は正規表現とStrConv関数を使う方法で、2つ目は全角英数字と半角英数字を列挙した配列を使う方法です。 1つ目の方が汎用性は … セルに入力された文字列に全角の数字0,1,2,3・・・,8,9が含まれていたら、その数字を半角に変換します。 Excel VBAで全角の文字列を半角に変換する方法と、半角の文字列を全角に変換する方法についてご紹介します。全角と半角の変換はStrConvを使うとできます。全角もしくは半角に変換する具体例と、StrConvを使った実践例について説明します。 | Value, i, 1) Like "[0-9]" Then myRange. 今回はVBAを使って、エクセルに入力された文字列のうち、カタカナ(または数字・英字・記号)のみを全角(または半角)にしてみようと思います。これがどんな時に役立つかというと・・・・・・、カタカナや英字や数字や記号のみを半角全角にしたい時です(*`・ω・)※そのまんまかんたんなのでさっそくやってみましょう!, 一発目なので簡単に説明します。セル内の文字列を左端から1文字ずつ、全角数字かそうでないかを調べ、全角数字であれば半角数字に変換します。これを右端まで繰り返します。右端まで行ったら、次のセルに処理が移ります。とっても愚直です。, 濁点・半濁点が付くカタカナを半角にすると、1文字増える(例えば「ガ」を半角にすると、「カ」と「゙」の2文字になる)ので、ループ回数が固定であるFor ~NextではなくDo While ~Loopを使っています。 お節介かもしれませんが、長音符号を含む、例えば「ラーメン」を変換すると「ラーメン」になってしまうので、「ラーメン」になるように「-」も変換対象にしてます。, 1文字ずつ変換すると、ガ→カ゛のようにカタカナと濁点・半濁点がそれぞれ全角になってしまいます。ということで、左端から1文字ずつ調べ、半角のカタカナと半角の濁点・半濁点が連続する間は、その数をカウントするだけにします。連続が途切れたら、そこまでをまとめて変換します(まとめて変換すれば、ガのように1文字のカタカナになる)。濁点と半濁点の分だけ文字数が減るので、iからマイナスします。, 以上です。とくに処理が速くなるような工夫はしていないので、膨大なセル数を変換対象にすると時間がかかるかもしれません。(PCのスペックによって差があります), SubからEnd Subまでをコピーし、標準モジュール等に貼り付けて使用して下さい。なお、マクロで実行した処理は「元に戻す」ことができません。実行前に一旦保存しやり直しのできる状態にしておいて下さい。標準モジュールにコードを貼り付けてマクロを使用する方法はこちら。, 過去にPerlを勉強するも、悠久の時を経て完全に忘却する経歴をもつ。趣味と実益を兼ねて再びプログラミングを勉強中。, kouten0430さんは、はてなブログを使っています。あなたもはてなブログをはじめてみませんか?, Powered by Hatena Blog WorksheetFunction. 皆さんは、vbaで全角文字を半角文字・半角文字を全角文字に変換する方法を知っていますか?全角で入力されている英字を半角にしたい場合、全角カタカナで書かれている文字を半角にしたい場合など、変換したいケースはよくあります。