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

このQ&Aに関連する最新のQ&A

A 回答 (3件)

サンプルです



全角に変換
~~~~~~
Me![テキスト0].Value = StrConv(Me![テキスト0].Value, vbWide)
~~~~~~

半角に変換
~~~~~~
Me![テキスト0].Value = StrConv(Me![テキスト0].Value, vbNarrow)
~~~~~~

頑張って下さい
    • good
    • 0
この回答へのお礼

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

お礼日時:2001/10/09 14:13

StrConv 関数を使用するとできます


使用方法、詳細はAccessのヘルプを参照してください
    • good
    • 0
この回答へのお礼

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

お礼日時:2001/10/09 11:29

アクセスの関数を見たのですか見つからない為


アクセスでエクセルの関数を使用する方法を書きます

く~逃げだ逃げだ (ーー;)

がんばって下さい。

参考URL:http://support.microsoft.com/intl/japan/personal …
    • good
    • 0
この回答へのお礼

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

お礼日時:2001/10/09 14:14

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QExcelのしつもんです! 関数を用いて1文字目だけを大文字にした半角文字のやり方をおしえてください

Excelのしつもんです!
関数を用いて1文字目だけを大文字にした半角文字のやり方をおしえてください。
変換のやりかたです!そして、A la-99などと半角で表示されていない数字だけをとりだし半角にして、最初の大文字にしたやつと半角にした数字を合体させる方法をおしえてください!

Aベストアンサー

PROPER関数で、1文字目を大文字、2文字目以降を小文字にできます。
ASC関数で、半角で表示できる全角文字を半角文字に変えることができます。

これを工夫してみましょう。

QACCESS2000,2003テキストエクスポートで全角が半角になってしまう

ACCESS2000または2003でテキスト固定長エクスポートすると"’"や"I"や"II"などの文字があると正しく変換できません。(全角が半角になってしまいます)
それらの文字を正しく変換できないでしょうか?
よろしくお願いいたします。

Aベストアンサー

 フィールド1がテキスト型でサイズが10
 フィールド2がテキスト型でサイズが5
 フィールド3がテキスト型でサイズが4
 フィールド4がテキスト型でサイズが9
のテーブルがあって、
 フィールド1が「あああ’05.12 」
 フィールド2が「いいい’0」
 フィールド3が「0000」
 フィールド4が「000000000」
のとき、このテーブルを固定長でエクスポートすると桁ずれが起こるということでしょうか? その理解でよろしければ、手元で現象を確認しました。
 これは、参考URLにあるように、Accessの不具合のようです。
 回避策として、新たにクエリを作り、
[フィールド1] & [フィールド2] & [フィールド3] & [フィールド4]
というフィールドを作って、(テーブルをエクスポートするのではなく)この新規クエリを固定長でエクスポートしてみてください。例示いただいたデータでは桁ずれを回避できました。

参考URL:http://www.accessclub.jp/bibouroku/ziten.cgi?action=view&data=8

 フィールド1がテキスト型でサイズが10
 フィールド2がテキスト型でサイズが5
 フィールド3がテキスト型でサイズが4
 フィールド4がテキスト型でサイズが9
のテーブルがあって、
 フィールド1が「あああ’05.12 」
 フィールド2が「いいい’0」
 フィールド3が「0000」
 フィールド4が「000000000」
のとき、このテーブルを固定長でエクスポートすると桁ずれが起こるということでしょうか? その理解でよろしければ、手元で現象を確認しました。
 これは、参考URLにあるよ...続きを読む

Qシフトキーなしで大文字の半角英字を打つ方法

キーボードのシフトキーが壊れてしまい、大文字の半角英字が打てなくて困ってます。メールのパスワードに大文字の半角英字があるんです。全角の場合はコード表があるので大丈夫なんですが・・・。
本当ならキーボードを買い替えるのが一番なんでしょうけど、高いので迷ってます。
シフトキーなしで大文字の半角英字を打つ方法はないでしょうか?
よろしくお願いします。

Aベストアンサー

皆さんWINDOWSで回答されてますけど、カテゴリからいってMACの話ですよね・・?

さすがにCAPS LOCKを使わないでスムーズに・・というのは難しいですが、
とりあえずの一時的な方法でしたら、エディタを使ってはどうでしょうか。

私の知ってるものでは、「ミミカキエディット」というフリーのテキストエディタ(参考URL)ですが、例えば
abcde
と打ち込み、その部分を選択し、マウスで長押しします。
するとサビメニューが出てきて、文字種変換ができ、
小文字→大文字を選択すれば
ABCDE
となりますよ。

パスワードは大抵コピペでも大丈夫です。

どちらにしても不便ですね^^;
とりあえず、これで急場を凌いでみてください。

参考URL:http://www.asahi-net.or.jp/~gf6d-kmym/

Qファイルメーカ 半角数字を全角に

フィールド「A」に
安藤市谷口町 字村田 65番地11
があるとします。

このうちスペースを無くし、半角数字の65と11を全角65と11に変換し
安藤市谷口町字村田65番地11
として他のフィールド「B」に置きたいのですが。

フィールド「B」は計算フィールドにし非保存にしておきたいのですが、計算式はどう記述したらよろしいでしょうか?

Aベストアンサー

B=TrimAll( RomanZenkaku(A) , 1 , 0 )
でどうでしょうか?
ファイルメーカーの関数の説明は、以下のURLもしくはヘルプを参照願います。
http://ippaiattena.ddo.jp/others/filemaker/other/function_text.html
http://www.hillston.co.jp/filemaker/tani1.html

Q英字の半角大文字

@niftyのcombo会員というのに
なりましたが、はじめログインするのに
パスワードを英字の半角大文字で入力しないといけ
ないのですが、設定のしかたが悪いのか
どうしても英字の半角大文字を入力出来ません。
(パスワードを入力するところは変換およびコピーが
できないので はじめに英字の半角大文字が入力出来
ないといけないのですが それができません。)
WIN95を使っているので、MS-IME95
なのですが、設定の仕方を知っている人は
教えてください。

Aベストアンサー

英字半角大文字は、通常はShiftキイを押して入力できます。また、CapsLockキイを押してCapsLockモードにすると大文字入力(Shiftキイを押すと小文字入力)されるようになります。
入力になれるため、メモ帳などで一度試してみるとよく判ると思います。

QSQL鯖での半角<=>全角

どなたか教えてください。
SQLServer2000でストアドでの
全角→半角
あるいは
半角→全角
への変換は可能でしょうか?

関数本を見ても見つからないので、できるかどうかすらわかりません。
できないとわかれば、それはそれでスッキリするので、どうぞよろしくお願いします。

Aベストアンサー

 
> SQLServer2000でストアドでの
> 全角→半角
> あるいは
> 半角→全角
> への変換は可能でしょうか?

残念ながら、なさそうです。
単発のやっつけ仕事的なルーチンなら、Jet + ODBCで、VBAのStrConv関数を使うのが簡単ですが、恒常的に利用するルーチンなら、自前で実装するしかないでしょう。
(Jet + ODBCでは性能上、ネットワーク越しでの実運用には耐えられないと思われます)

# 変換テーブルを使用するのと、Case文で文字コードごとの分岐を
# ゴリゴリ記述するのとどちらがよいか、判断が付きませんが。
 

QExcel97で半角小文字で打った文字を半角大文字にする方法はありますか?

海外の部署名を入力していたところ、
半角大文字で入力しなければいけないものを
半角小文字で入力してしまいました。
おまけに単語の頭の部分は大文字で・・・

例)Marketing&Sales(誤)→ MARKETING&SALES(正)

また、半角小文字で入力したものを全角大文字にもしなければなりません・・・

例)Marketing&Sales(誤)→ Marketing&・・・

全部で100個はあります。
全部一から打ち直しするしか方法はないのでしょうか?
一番早い変換方法などはありませんでしょうか?
どなたか教えていただけませんでしょうか?
よろしくお願い致します。

Aベストアンサー

A1セルに文字列があるとして、
全角を半角に→ASC(A1)
半角を全角に→JIS(A1)
先頭文字だけ大文字に→PROPER(A1)
の関数で簡単に変換できますよ。
例:A1セルの(MAKING,CO)を半角、先頭大文字に変えたい場合は→PROPER(ASC(A1))になります。変換後(Making,Co)
エクセルの中では、文字列操作関数にありますので、詳しくはそちらを拝見ください。
セルのコピーなどでうまくいくといいですね。

Qファイルメーカー5.5 全角文字と半角文字を分けたい。

果たしてこんな事ができるのか・・・と戸惑いながらの質問ですが。
ファイルメーカー5.5を使った住所録があるのですが、このところ頻発している市区町村の合併で町名などがどんどん変わり小規模データベースでも手修正が対応しきれなくなってきました。
一番の問題となっている住所についてなんですが現在は「住所」フィールドに「東京都豊島区東池袋1-2-3」というようにデータが格納されています。
それを「住所1」フィールドに「東京都豊島区東池袋」「住所2」フィールドに「1-2-3」というように分ける事ができれば郵便番号を利用して一括データ書き換えができるかな?という考えの基質問してみました。
一つのフィールのの中のテキスト部分と数字部分を分割する事は可能ですか?
アドバイスよろしくお願い致します。

郵便番号からの変更は郵便局でDLできる郵便番号リストを使おうと思っています。

Aベストアンサー

LeftWords関数を使うと平仮名混じりの住所に対応しないかもしれません。
私の使っている方法を紹介します。
「丁目番地」が全角数字でも対応しています。

計算フィールドで
住所1=
If(TextToNum(住所) = "",住所,Left(住所,Position(住所,Left(NumToText(TextToNum(住所)), 1),1,1) - 1))

住所2=
If(TextToNum(住所) = "","",Right(RomanHankaku(住所),Length(RomanHankaku(住所)) - Position(RomanHankaku(住所),Left(NumToText(TextToNum(RomanHankaku(住所))), 1),1,1) + 1))

Q半角英数字を大文字に変換する方法、初心者です。

HPの設定の過程で英数字の小文字と大文字で出来たパスワードを入れるようになってます。

半角小文字はキーボード左上の「半角/全角 漢字」を押せば入ってると思うんですが
(注:記号を打ち込んでも***の記号で表示されるため分からないのです)
英数字を半角大文字に変換するのはどのようにしたらよいのでしょうか?

打ち込んで記号、英数字を表示されるのであれば出来るんですが… 

質問の内容が少し分かりづらいかもしれませんが宜しくお願いします。

Aベストアンサー

半角英数字の状態で、Shiftを押しながら打ち込めば大文字になりますよ。

QPostgreSQLのデータに半角カナが混入したので全角カナへの変換方法は?

LinuxでPostgreSQLを使っています。
ある人が商品名を全て半角カナで登録してしまい、後で気づきましたのでそのコンバートをどうするか考えています。

DBでインサートする前に文字列が半角カナが含まれているかチェックする関数を作成しておけばよかったのですが後の祭りです。

Perlとかで変換できるのでしょうか?

Aベストアンサー

postgresにはreplace関数はないみたいですね。
SELECT文で半角文字が含まれるのを検索してきて
UPDATEするプログラムを作るか
あと試していませんが
http://chaostic.noexistent.com/loatbell/main/Documents/02prog/postgresql/#10translate
にPostgresで文字置換のSQL文がありましたよ。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング