• ベストアンサー

ACCESSの全角、半角・・・

こんにちは! さっそく質問なのですが、ACCESSのVBAで、入力した文字を全角や半角に変換する関数はありますか?exelでしたら、「asc」や「jis」なのですが、ACCESSの場合は使えませんでした。 ボタンを作成して、そこの「クリック時」のイベントに組み込みたいと思うのですが・・・ よろしくお願いいたします。

  • Fujjy
  • お礼率77% (203/262)

質問者が選んだベストアンサー

  • ベストアンサー
  • teppy
  • ベストアンサー率50% (9/18)
回答No.3

サンプルです 全角に変換 ~~~~~~ Me![テキスト0].Value = StrConv(Me![テキスト0].Value, vbWide) ~~~~~~ 半角に変換 ~~~~~~ Me![テキスト0].Value = StrConv(Me![テキスト0].Value, vbNarrow) ~~~~~~ 頑張って下さい

Fujjy
質問者

お礼

ありがとうございました。

その他の回答 (2)

  • teppy
  • ベストアンサー率50% (9/18)
回答No.2

StrConv 関数を使用するとできます 使用方法、詳細はAccessのヘルプを参照してください

Fujjy
質問者

お礼

む・む・むずかしい・・・わからない・・・(TT)

  • k_eba
  • ベストアンサー率39% (813/2055)
回答No.1

アクセスの関数を見たのですか見つからない為 アクセスでエクセルの関数を使用する方法を書きます く~逃げだ逃げだ (ーー;) がんばって下さい。

参考URL:
http://support.microsoft.com/intl/japan/personal/default.asp?nav=kl
Fujjy
質問者

お礼

エクセルの関数を使うのかぁー・・・わかりました!

関連するQ&A

  • 英数文字を半角に、カナを全角に変換したい(Excel関数)

    Excel関数で、英数カナ文字混在したセルに対して 英数は半角に、カナ文字は全角に変換したいのですが なにかいい方法はないでしょうか? JIS関数、ASC関数では上手くできません。 当方はエクセル駆け出しです。VBAとかを使えば上手くいくのでしょうか?よろしくご教授願います。

  • Access2000のクエリで全角文字を半角にするには?

    もともとのデータが全角英数字になっているフィールドを半角に変換したいのですが、クエリー実行時に変換できますでしょうか? 文字列関数のASCかな?とも思い、やってみたのですが、うまくいかず、とりあえず元のテーブルのデータを編集を置換でもって半角にしました。 でも、出来ればテーブルのデータは変更したくないので、クエリーでやる方法はありませんでしょうか? あまり専門的なことは分かりません。VBAは使ったことがありませんのでよろしくお願いします。

  • 半角・全角文字が入り乱れて、困っています。

    すみません。どなたか教えてください。 windows 98 を使っています。 wordやexel を使って、文字を入力したとき無意識のうちに (英・数・カナ)の半角と全角がどうしても入り混じってしまって、 結果的にかなり見てくれが悪くなってしまいます。 (他の人が作成した書類を見ても、ほとんど同じことが起きています。) 1.全体に半角と全角が入り混じらないように、最初から英・数の全角とカナの 半角文字が入力できないような初期設定はできないのでしょうか? 2.確定させた後、半角・全角を一括で (英数→半角、カナ→全角に)変換 できないでしょうか?   Macを使っていたときはこんな無意味な苦労をしたことがなかったのですが・・・

  • 全角半角?

    ACCESS97を使用しています。 次のような文字があります。 4-22 これを4バイトのデータに追加したところ "‐"と"-"によって "4‐2"となります。 "‐"…全角 "-"…半角という意味でしょうか? またStrConv関数で全角⇔半角、大文字⇔小文字をしたのですが 変換できません。 目的は 4‐22 のデータを 4-22 というように変換して 4バイトのところに全て追加できるようにしたいのです。  (数字ではなく "-"横棒を変換) ACCESSで可能でしょうか?

  • エクセルで半角を全角に変えるマクロは?

    ワークシート関数の JIS のようにVBAで「半角英数かな」を「全角英数かな」に変換するにはどのように書けばいいでしょうか? たとえば、Dialogsheets("Dialog1")の Editboxes("ABC")に入力された半角文字をWorksheets("AAA")のセルA1に全角で出す場合です。 変換せずそのままなら Sub test() Sheets("AAA").Range("A1") = DialogSheets("Dialog1").EditBoxes("ABC").Text End Sub だというのはわかりますが。

  • ACCESSで全角と半角を変換する

    いつもお世話になっております 早速ですが、 ACCESS2000(OSはWindowsXP)での質問です 住所録を整理しているのですが、 住所欄に全角と半角の入力が混在しています 英数字及びハイフンは半角に カタカナは全角に変換したいのですが、 いい方法はないでしょうか? ちなみにStrconv関数をつかって 何とかしようと思ったのですが、 すべて変換されるので、どうもうまくいきません よろしくお願いします

  • マクロで半角を全角に

    お世話になっています。 VBの中で Application.WorksheetFunction.Asc(対象)・・・・A で全角を半角にできますが、その逆のJisが使えません。 エクセル関数のJisにあたる関数を教えて下さい。 また、Aをもっと簡単に表現できるんでしょうか? マクロは超がつく位初心者ですのでよろしくおねがいします。

  • Excel2003 すでに入力されている全角文字

    お世話になります。 掲題の件で 質問が御座います。 通常「全角文字」→「半角文字」に変換する際には「=ASC」を使いますが この関数を使わずに どこかのキー1発で 「すでに入力されている全角文字を半角文字」に変換出来ないでしょうか? (漢字、ひらがな以外のカタカナ、アルファベットをです) 入力途中の場合は「F8」だということは知っていますが すでに入力されている文字に対しては無効の手段ですよね。。 通常は そのような機能は無く、やはりVBAの出番となるのでしょうか? どなたかお分かりになる方、ご教示ください。 宜しくお願い致します。

  • 【Excel】 全角(数字だけ)を半角にしたい

    住所の表を整理しているのですが、数字が全角になっているので、半角に変換したいと思い、ASC関数を使ったのですが、カタカナまで半角になってしまいました。 カタカナは全角で、数字だけ半角にしたいのですが。。 数字だけを半角にする方法ってないんでしょうか?

  • 全角英数字を半角に excel vba

    インターネットで全角を半角に変換するvbaを調べたら、strconvみたいな関数の説明がいろいろあったので、私のケースにあてはめて考えましたがどうもしっくりきません。例えばセルの A1,A2,A3..............A200位まで(最後の位置A200は毎回変わります)全角の英字 (TOKYO, OSAKA,NAGOYA) など都市の名前がいろいろ入っているですがそれをすべて半角に変換するvba関数はどういった表記でできるかご教授願います。毎月の仕事で必要なEXCEL作業の一部でエクセルのASC関数などは使用せずにvbaのをくみこみたくここで質問を入れてみました。vba全くの初心者なので簡単な表記であれば助かります。