Accessでのグループ化で全角・半角を分けたい。

締切済

質問者：i_september
質問日時：2006/07/26 10:38
回答数：2件

こんにちは。
Accessクエリのグループ化についてお伺いします。

グループする項目データが
A(半角大文字)
a(半角小文字)
Ａ(全角大文字)
ａ(全角小文字)
でも全て同じグループとなってしまします。

これを分ける方法を知りたいのですが、
ご存知の方宜しくお願い致します。
(OS:Windows2000 Ver:Office2000)

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

最新から表示
回答順に表示

No.2

回答者： noname#22222
回答日時：2006/07/26 12:04

途中までですが・・・。

ID　　　　　　データ
1　　　　　　全角文字
2　　　　　　HANKAKU
3　　　　　　hankaku
4　　　　　　ＺＥＮＫＡＫＵ
5　　　　　　ｚｅｎｋａｋｕ
6　　　　　　HANKAKUNANODA
7　　　　　　hankakunanoda

というテーブルがあるとします。
これを、0、１、2、3 の４つのタイプ情報を付加して表示すると次のようです。

タイプIDデータ
2　　　　　　1　　　　　　全角文字
0　　　　　　2　　　　　　HANKAKU
1　　　　　　3　　　　　　hankaku
2　　　　　　4　　　　　　ＺＥＮＫＡＫＵ
3　　　　　　5　　　　　　ｚｅｎｋａｋｕ
0　　　　　　6　　　　　　HANKAKUNANODA
1　　　　　　7　　　　　　hankakunanoda

SELECT IsType([データ]) AS タイプ, * FROM テーブル1;

Public Function IsType(ByVal strText As String) As Integer
　　IsType = Abs(Len(strText) <> LenB(StrConv(strText, vbFromUnicode))) * 2 + _
　　　　　　　　　Abs(StrComp(UCase(strText), strText, vbBinaryCompare))
End Function

先ずは、0、１、2、3 の決め方と思います。
質問者の意向に沿って IsType関数を修正して下さい。

これで、例えば、次のようにタイプカウントを求めることも可能になると思います。

タイプタイプカウント
0　　　　　　2
1　　　　　　2
2　　　　　　2
3　　　　　　1

＊私は、全くクエリを利用しませんので的を外しているかも知れません。