Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
967 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【9318】条件の記述方法 あおぎん 07/4/20(金) 11:05 質問[未読]
【9319】Re:条件の記述方法 まさ7251 07/4/20(金) 11:16 発言[未読]
【9320】Re:条件の記述方法 あおぎん 07/4/20(金) 15:15 お礼[未読]
【9318】条件の記述方法
質問  あおぎん  - 07/4/20(金) 11:05 -
引用なし
パスワード
   いつもお世話になっています。
検索フォーム上のテキスト職員番号と職員番号至の間の番号を入力して、その範囲のデータを表示させるため、コードを下のように書いているのですが、Me!職員番号　と　Me!職員番号至　を聞くパラメータクエリが表示されます。

修正方法をご教示いただけたらと思います。
よろしくお願いします。


Private Sub コマンド2_Click()
On Error GoTo Err_コマンド2_Click

　　Dim stDocName As String
　　Dim stLinkCriteria As String
　　　
　　stDocName = "F_職員1904"
　　
Select Case フレーム検索条件

　Case 1
　　stLinkCriteria = "[職員番号] between Me![職員番号] And Me![職員番号至]"
　　DoCmd.OpenForm stDocName, , , stLinkCriteria

　以下省略
（環境：WIN XP 、アクセス2000）
【9319】Re:条件の記述方法
発言  まさ7251  - 07/4/20(金) 11:16 -
引用なし
パスワード
   >　　stLinkCriteria = "[職員番号] between Me![職員番号] And Me![職員番号至]"


職員番号が数値型なら、
stLinkCriteria = "[職員番号] between " & Me![職員番号] & " And " & Me![職員番号至]

職員番号がテキスト型なら、
stLinkCriteria = "[職員番号] between '" & Me![職員番号] & "' And '" & Me![職員番号至] & "'"
【9320】Re:条件の記述方法
お礼  あおぎん  - 07/4/20(金) 15:15 -
引用なし
パスワード
   ▼まさ7251 さん：

早速の回答ありがとうございます。
できました！
ありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
967 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1080767
(SS)C-BOARD v3.8 is Free