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で質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
英数字のみ全角から半角に変換
-
住宅にカナを入力する際に丁目...
-
VBA 文字に半角が含まれて...
-
封筒の宛先で縦書きの書き方
-
ログインする際のIDやパスワー...
-
[VBScript]バイト長の判定
-
[Excel VBA] ODBCによる外部デ...
-
いまスマホからカードの申込み...
-
char型全角数字から、int型半角...
-
プログラミングでは、半角括弧...
-
word差し込み印刷 半角カタカ...
-
エクセルの検索が正しくできな...
-
CString Format にて全角空白文...
-
Accessで日付や数値を全角で表...
-
大文字と全角文字は同じ意味で...
-
全角英数字を半角英数字に変換...
-
全角数字を半角数字に変えたい...
-
エクセルにMicrosoft Barcode C...
-
禁止ワードのすり抜け対策
-
IEからEdgeへの移行に伴うIMEの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
英数字のみ全角から半角に変換
-
住宅にカナを入力する際に丁目...
-
VBA 文字に半角が含まれて...
-
エクセルにMicrosoft Barcode C...
-
IEからEdgeへの移行に伴うIMEの...
-
プログラミングでは、半角括弧...
-
COBOL・全角判定
-
エクセルでの”々”の扱い
-
全角英数字の必要性が理解できない
-
全角入力
-
word差し込み印刷 半角カタカ...
-
封筒の宛先で縦書きの書き方
-
.NET3.5におけるキーボードの「...
-
VB.net、テキストボックス入力...
-
メモ帳の段落の揃え方
-
LaTeXで半角カンマと全角カンマ...
-
Accessで日付や数値を全角で表...
-
いまスマホからカードの申込み...
-
perl 初めてのプログラムにエラ...
-
Accessでのグループ化で全角・...
おすすめ情報