hiko-blog

VBA業務改善

MENU

サブクエリ サンプル

'//サブクエリ サンプル-----------
In(SELECT フィールド名1 FROM Q_名称
  WHERE( フィールド名2 = 条件1 And フィールド名3 = 条件2 )
     OR( フィールド名2 = 条件3 And フィールド名3 = 条件4 )
     OR( フィールド名2 = 条件5 And フィールド名3 = 条件6 )
     OR( フィールド名2 = 条件6 And フィールド名3 = 条件7 )
     OR( フィールド名2 = 条件7 And フィールド名3 = 条件8 )
     GROUP BY フィールド名1
     HAVING Count(1) = 5
)

 

'//クエリ サンプル-----------

日付変更:Cdate(format([日時]."@@@@\/@@\/@@"))