エクセルでひらがな入力した列を半角カタカナに一括変換するには？

＃４です。 >元のひらがなの列を削除すると今作ったのがみんなエラーになります。これを回避するにはどうすればいいのでしょうか？ 関数式=kana(A1)等で、表示された半角カタカナの列（仮にＢ列とします）をコピーして、自身の列に，編集－形式を選択して貼りつけ－値（ｖ）にチェックを入れ－Ｏｋをクリックします。 すると=kana(A1)等の式は消えますが、値（半角カタカナ）はその列に残ります。するとＡ列（に当たる列）は削除しても、Ｂ列（に当たる列）はエラーは出ません。

>#2です。 Ｂ１に=kana(A1)と入れ、Ｂ２以下に式を複写する」とはどういう意味でしょうか。 Ａ列にひらがなで入力されているとします。Ａ列のデータをすべて打ち終わった後のことです。 Ｂ列に他の項目のデータがあるときは、列挿入をして 空白の列を１列作ります。 そしてＡ１（第１行目）からひらがなデータがあると仮定していますが、その右のＢ１に、関数式を入れる要領で、=kana(A1) と入れます。そしてＢ１セルの関数式をＢ２以下最終行まで複写します。（右下に＋ハンドルを出して下へ引っ張ると出来ます。）結果が上手く出るには、＃２のＶＢＡコードを標準モジュールと言うところに貼りつけてないとエラーになりますから、手順としては、＃２のＶＢＡコードを標準モジュールと言うところに貼りつけることを先にやってください。 ＞VBEは使ったことがなく ワークシート画面でＡＬＴキーを押しながら「Ｆ１１」キーを押します。ＶＢＥ画面になります。 そこでＡＬＴキーを押しながら「Ｉ」（挿入と言う操作なるキー）を押し、更にＡＬＴキーを押しながら「Ｍ」（標準モジュール）を押すと標準モジュールを記述するウインドウが出ます。そこへ＃２のコード Function kana(a) kana = StrConv(a, 24) End Function をコピーして貼りつけてください。

他のセルを使用しないで、今のデータを直接変換したいということだと解釈します。 それあれば、マクロを使用します。 変換する列全体を選択するか、変換する列の先頭セルを選択し、次のマクロを実行すると、 その列全体、または、指定セルから下のデータが、半角カタカナに変換されます。 但し、英数記号も全て半角に変換されます。 【マクロ設定手順 】 １．Alt + F11 で VBE(Visual Basic Editor)を開きます。 ２．VBE のメニューから[挿入] -->[標準モジュール] を指定します。 ３．モジュールウィンドウに下記コードをコピーして貼り付けます。 ４．Alt + Q （または、右上隅の×）でウィンドウを閉じ、シートに戻ります。 ５．メニューから[ツール]-->[マクロ]-->[セキュリティ]で「セキュリティレベル」を 　「中」にして、[OK]します。 ６．実行するときは、変換する列を選択し、Alt ＋ F8 (メニューから[ツール]--> 　[マクロ]-->[マクロ])で「半角カタカナ変換」を指定し、[実行]ボタンを押します。 これで如何でしょうか。 Sub 半角カタカナ変換() Dim Rng As Range Dim R As Range Set Rng = Range(ActiveCell.Address, _ 　　Cells(65536, ActiveCell.Column).End(xlUp)) For Each R In Rng 　　R.Value = StrConv(R.Value, vbNarrow + vbKatakana) Next R Set Rng = Nothing End Sub

セルの中身がひらがなだけで、それを半角カタカナに変換するのでしたら、「PHONETIC」関数を使います。 参考URLへどうぞ。