No.5
- 回答日時:
VBAで全角英字を半角英字にする。
原文はSheet1にあるとする。
Sheet2において、変換表を作る。
(1)A1セルに9025、A2に9026を入れる。
(2)以下A25までオートフィル。
(3)B1セルに=CHAR(a1)を入れる。
(4)B2よりB25まで式を複写。(A,B,・・・Zの文字が出きる)
(5)C1セルに97、C2セルに98を入れる。
(6)C25までオートフィル。
(7)D1に=CHAR(c1)を入れる。
(8)D1をD2からD25まで式を複写する。
(a,b,c,・・・・,zの文字が出きる。)
(9)下記のコードをVBE画面に貼り付け実行する。
Sub test01()
dim sh1 as worksheet
dim sh2 as worksheet
set sh1=Worksheets("sheet1")
set sh2=Worksheets("sheet2")
For i = 1 To 25
a = sh2.Cells(i, 2)
b = sh2.Cells(i, 4)
sh1.select
Cells.Replace What:=a, Replacement:=b, _
LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False
Next i
End Sub
半角カタカナを全角カタカナに変換するのも、
先に濁点・半濁点(半角2文字-->1全角文字)の
テーブルを先に作り変換し、後に1文字の対応表で
変換すれば出来ると思う。
この回答へのお礼
お礼日時:2002/12/16 11:34
ご回答ありがとうございます。お礼が遅くなり申し訳ありません。
しばらく他に急ぎの仕事ができてしまい、時間をゆっくり取って、取りかかれない状況だったのですが、ご回答のやり方を試してみようと思います。
No.4
- 回答日時:
関数を使えば簡単ですよ!
半角の英数カナ文字を全角の英数カナ文字に変えるには「JIS関数」、全角の英数カナ文字を半角に変えるには「ASC関数」を使ってください。
使い方が分からない場合はEXCELのヘルプを参照してください。
この回答へのお礼
お礼日時:2002/11/27 16:37
ご回答ありがとうございます。
#1の方への解答にも書いたとおり、一筋縄ではいかなさそうですが、今回の件で便利な関数の使い方を知ることができました。
No.2
- 回答日時:
テキストファイルの全角・半角を変換するフリーのソフトがあります.
エクセルのデータをテキストに落としてもOKなら,使えるかも知れませんね.
参考URL:http://www.vector.co.jp/soft/win95/util/se044276 …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
- その他(Microsoft Office) WordやExcelで英数字のみ半角または全角にしたい 6 2022/08/03 08:18
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Excel(エクセル) エクセルシート中の全角英数字を半角に変換したい 4 2022/07/07 13:14
- Mac OS Macの変換ですが、一発で半角英字に変換する方法は無いですか? 3 2022/04/10 22:19
- マウス・キーボード 何故、ローマ字や英語を全角で打つ? 5 2022/05/15 09:36
- Excel(エクセル) Excel でマクロ利用しセル内テキストを修正しております(半角カナを全角にするなど)。 ただ、セル 4 2023/06/15 21:29
- Excel(エクセル) エクセルでのデータの統一に関して リストを作成する際、元データをコピペでリストに転記しており、元デー 2 2022/08/31 15:33
- デスクトップパソコン 40年間の悩み キーボードにおいて初期値として漢字ローマ字変換に設定する方法 8 2023/05/08 14:50
- Excel(エクセル) Excel 365 フリーズ 頻発 エクセルのセルの中に日本語の文章を全角半角和文英文数字を混ぜて入 3 2022/12/12 15:09
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
住宅にカナを入力する際に丁目...
-
英数字のみ全角から半角に変換
-
プログラミングでは、半角括弧...
-
正しいメールアドレスの形式で...
-
全角英数字の必要性が理解できない
-
Excel VBAでオートシェイプ内の...
-
C言語のコンパイルエラーなん...
-
word差し込み印刷 半角カタカ...
-
ダブルコーテーションの置換
-
いまスマホからカードの申込み...
-
メールのURLがつながってしまう
-
javacコマンドの後のエラーの意...
-
IEからEdgeへの移行に伴うIMEの...
-
.NET3.5におけるキーボードの「...
-
半角カナを全角カナに変換したい
-
VBで、String型のデータが、...
-
Pythonにおける全角括弧の正規表現
-
封筒の宛先で縦書きの書き方
-
全角入力
-
CString Format にて全角空白文...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
英数字のみ全角から半角に変換
-
VBA 文字に半角が含まれて...
-
エクセルにMicrosoft Barcode C...
-
全角英数字の必要性が理解できない
-
IEからEdgeへの移行に伴うIMEの...
-
住宅にカナを入力する際に丁目...
-
プログラミングでは、半角括弧...
-
COBOL・全角判定
-
VB.net、テキストボックス入力...
-
word差し込み印刷 半角カタカ...
-
全角入力
-
Accessのテキストボックスの入...
-
VBで、String型のデータが、...
-
よくアカウント等に使われる 半...
-
char型全角数字から、int型半角...
-
[VBScript]バイト長の判定
-
全角チルダと波ダッシュに関す...
-
封筒の宛先で縦書きの書き方
-
Accessでのグループ化で全角・...
-
CString Format にて全角空白文...
おすすめ情報