yol********

2021/2/18 10:50

22回答

Accessの関数に詳しい方がいれば教えてください。

Accessの関数に詳しい方がいれば教えてください。 フラグ1を立てているものを、_で文字で繋げたいのですが、なにか方法はあるでしょうか？Access内で表示させたいと思っております。

画像

Microsoft Access | Excel・41閲覧

ベストアンサー

1

アルルカン

カテゴリマスター

2021/2/18 21:26

まず、図の上はテーブルでしょうか、その他でしょうか。 テーブルならどういうフィールド構成でしょうか。 例えば [テーブル1] ABC：短いテキスト りんご：数値型 バナナ：数値型 パイン：数値型 すいか：数値型 いちご：数値型 の場合のクエリ(クエリ1)は ABC 式1: Mid(IIf([りんご]=1,"_りんご") & IIf([バナナ]=1,"_バナナ") & IIf([パイン]=1,"_パイン") & IIf([すいか]=1,"_すいか") & IIf([いちご]=1,"_いちご"),2) になります。 その時のSQLビューは SELECT [テーブル1].ABC, Mid(IIf([りんご]=1,"_りんご") & IIf([バナナ]=1,"_バナナ") & IIf([パイン]=1,"_パイン") & IIf([すいか]=1,"_すいか") & IIf([いちご]=1,"_いちご"),2) AS 式1 FROM テーブル1; になります。

画像

1人がナイス！しています

ThanksImg質問者からのお礼コメント

皆様ご回答ありがとうございます。 とても勉強になりました。 日々勉強ですね。ありがとうございます。

お礼日時：2/26 9:49

その他の回答（1件）

1

tac********

2021/2/18 12:32

アクセスには多分今回の件に使えるような関数は無いと思います。 そういう場合はVBAを使って自分で関数を作ります。 下記がその見本です。 クエリのフィールド部分に 結果: 名称取得([りんご],[バナナ],[パイン],[すいか],[いちご]) みたいに記載します。 Function 名称取得(R As Boolean, B As Boolean, P As Boolean, S As Boolean, I As Boolean) As String Dim Tmp As String If R Then Tmp = "りんご_" End If If B Then Tmp = Tmp & "バナナ_" End If If P Then Tmp = Tmp & "パイン_" End If If S Then Tmp = Tmp & "すいか_" End If If I Then Tmp = Tmp & "いちご_" End If If Tmp <> "" Then 名称取得 = Left(Tmp, Len(Tmp) - 1) End If End Function

1人がナイス！しています