- ベストアンサー
Excelの置換について
kazuhiko5681の回答
遅くなりました。修正サンプルマクロを作ってみました。以下のように操作してみて下さい。 1.新規ブックを開き、ALT+F11を押してVBE(Visual Basic Editor)画面を表示させる。 2.VBE画面左上にあるVBAProjectと書かれている下のSheet1にマウスをあわせ、ダブルクリックする。 3.下記のコードをVBE画面右の白い部分にコピー・ペーストする。 Private Sub CommandButton1_Click() Dim myStr As String Dim myRange As Range myStr = Range("A1").CurrentRegion.SpecialCells(xlCellTypeLastCell).Address For Each myRange In Range("A1:" & myStr) myStr = Left(myRange.Value, 1) Select Case myStr Case "0", "1", "2", "3", "4", "5", "6", "7", "8", "9" myRange.Value = StrConv(myRange.Value, vbNarrow) Case "A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z" myRange.Value = StrConv(myRange.Value, vbNarrow) Case "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z " myRange.Value = StrConv(myRange.Value, vbNarrow) End Select Next End Sub 4.ALT+F11を押し、Sheet1を表示させる。 5.メニューバーの中にある表示→ツールバー→コントロールツールボックスを順にクリック。 6.ダイアログボックスの一番右の上から2番目にコマンドボタンがあるのでそれをクリック 7.シートの適当な位置をクリックするとコマンド場短が貼り付けられる。 8.ダイアログボックスの一番左上にある三角定規のマークをクリックする。 この状態で、コマンドボタンをクリックしてみて下さい。カタカナとひらがな以外の文字が半角に変換されると思います。 不都合な点がありましたら、またお知らせ下さい。
関連するQ&A
- Excelの半角英数字の入力について
Excelで、あるセル、又は行全体に入力するときに半角、全角の入力にかかわらず、入力したものは必ず半角に変わるようにするにはどうすればいいでしょうか? また、漢字かつ英数字の混合文字列に対して、英数字だけは、全角で入力しても半角に変えてくれるようにするにはどうすればいいでしょうか?
- ベストアンサー
- オフィス系ソフト
- エクセルでひらがな入力した列を半角カタカナに一括変換するには?
エクセルに約500件もひらがな入力した列を、半角カタカナに一括変換するにはどうすればいいのでしょう?全角英数字を半角英数字に変換は出きるようですが、こんなこと出きるのでしょうか?
- ベストアンサー
- オフィス系ソフト
- Excelで文字の長さを揃えるには
excel95とExcel2000を使っています。 漢字やひらがな全角カタカナ全角英数字は2バイト、 半角カタカナ英数字は1バイト、 2バイトと1バイトの混在入力して20バイトの長さの文字列を比べると見た目の長さが違う。 同じ20バイトの文字列を見た目を揃える方法を教えてください。
- ベストアンサー
- その他(業務ソフトウェア)
- エクセルの使い方(関数?)
エクセルで A列は半角 B列は文字 を入力するとき、わざわざ「半角/全角」キーを 押さなければいけませんが これを押さずに(言語バーは触らず) 入力できる方法はありませんか? 確か関数であった気がしますが。。 ちなみに、一括変換ではないです。 A列は半角・B列は全角と設定できませんか?
- 締切済み
- Windows NT・2000
- EXCELでの入力について・・・
初歩的なことかも知れませんが教えてください。 EXCELなんですが、全角で入力されている英数字を、列でまとめて半角に変換することって可能ですか?
- ベストアンサー
- オフィス系ソフト
- 半角カタカナを全角カタカナに変換したい
Windows2000/Microsoft Excel2000です。 入力されている文字列のカタカナが半角になっているのを 全角に一括変換する数式はありますでしょうか? 英数字は半角のまま残したいのですが。 JISを使うと英数字も全角になってしまいます。 ヘルプいただけると大変助かります。
- ベストアンサー
- Windows NT・2000
- wood2003: 置換について
1)文書内の一部の半角()を全角()に一括置換したいのですが、どうすればよいでしょうか? 条件:全角()にする文字列は、()内が全角文字の場合のみで、()内が半角文字の場合は変更したくないのです。 2)文書内の一部分だけのフォントサイズを変更したいのですが、どうすればよいでしょうか? 文字列はバラバラなので、1つ1つ選択してフォントサイズを変更するしかないのでしょうか? 1)&2)ともかなりのページ数になるので、できれば一括で置換できる方法があればと思っております。
- 締切済み
- オフィス系ソフト
- 半角⇔全角の一括変換
Excelで、全角または半角になっているものすべて(英数字、記号、文字)を一括半角または全角に一括変換できますか?もし可能なら方法を教えてください。 Excel2019利用です。
- ベストアンサー
- Excel(エクセル)
- エクセルで全角~半角の相互への置換方法について
エクセルの文字列の置換ですが、 全角文字から半角文字への置換。 また、その逆に半角から全角への置換。 方法があれば教えてください!
- 締切済み
- オフィス系ソフト
お礼
何度もすいませんでした。 とても参考になりました。 ありがとうございました。