| |
双方とも自作関数でも作成しないと出来ないと思います。
>クエリの抽出条件の式の件ですが、
>アルファベットが含まれるものだけを抽出させたいのですが、
>どのように式を作ればできるようになるのでしょうか？
こちらだけですが・・・
Public Function Alpha(Parm01 As Variant) As Integer
Dim Data01 As String
Dim Idx1 As Long
Alpha = False
If Nz(Parm01, "") = "" Then Exit Function
Data01 = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
For Idx1 = 1 To Len(Parm01)
If InStr(Data01, Mid(Parm01, Idx1, 1)) <> 0 Then
Alpha = True
Exit For
End If
Next Idx1
End Function
上記モジュールを登録し、クエリで
フィールド：Alpha([確認したいフィールド名])
抽出条件 ：True
ただし、フィールドはテキスト型を想定しています。
|
|
![[未読]](./data/access/image/read_icon.gif){kind=icon}
