回答数
気になる
-
Accessツールにおいて、一番長いデータを抽出するクエリを作成したい
以下の条件において、 同じコードに紐付くデータで、一番データが長い方のデータが抽出できるようにしたいのですが、 どのように設定したらいいのか、わからず、ご教示ください。 <例> コード 内容 1111 ありがとう 1111 ありがとうございます 2222 よろしく 2222 よろしくおねがいします 2222 どうぞよろしくおねがいします 上記クエリから、 コードそれぞれに紐付くもので、以下のように、内容が長いデータのほうを抽出してくれる クエリを作りたい 1111 ありがとうございます 2222 どうぞよろしくおねがいします Access初心者で、サイト読み漁っていますが、上記条件になるような演算?ができず、 ご教示いただきますよう、よろしくお願いいたします。
質問日時: 2021/07/16 16:16 質問者: すぅすぅすぅ
ベストアンサー
1
0
-
アクセス クリエについて教えて下さい
アクセス初心者です。 テーブルAにフィールドa1.a2があり、テーブルBにフィールドb1.b2があります。 2つをクリエで結合したときに、a1-b1,a1-b2,a2-b1,a2-b2が表示されましが、この時、a1-b1,a2-b2のみのレコードを抽出して表示さするには、どの様すればよいでしょうか。よろしくお願いします
質問日時: 2021/07/13 05:24 質問者: せごどん2020
解決済
1
0
-
アクセス教えてください。 あるフォルダにあるエクセルデータをマクロなどで自動にインポートしたいです。
アクセス教えてください。 あるフォルダにあるエクセルデータをマクロなどで自動にインポートしたいです。 フォルダの中のエクセルが複数あるとき、 それらを自動にインポートしたいですがどうしたらやいですか? ※日によってデータ数が違うので、1件のときもあれば5件のときもあります。 ※最大で5件までとします よろしくお願いします
質問日時: 2021/07/07 22:40 質問者: richiha
解決済
1
0
-
Access初心者です。 管理表を作成しており入力フォームを作成し、 テーブルへのデータ登録をしたい
Access初心者です。 管理表を作成しており入力フォームを作成し、 テーブルへのデータ登録をしたいと思っております。 何とか登録ボタン設置まで行い イベントプロシージャーからコードの記入まで終わったので、試しに動かしてみたところ『コンパイルエラー:SubまたはFunctionが定義されてません』と表示され、どれだけネットを見ても解決出来ずにいます。 どなたか優しく教えてくださいm(_ _)m ↓↓書いたコード↓↓ private sub btn登録_Click() ⇦ここがエラー Dim Rst〜
質問日時: 2021/07/07 10:10 質問者: やん325131
ベストアンサー
1
0
-
VBAで変数内に保持された二次配列データをテーブルに格納
E Excelから二次配列で取得されたデータをAccessのテーブルに格納したいです。 詳細としては 必要なデータのみをテーブルに格納したいので2列目をフィールドAに、7列目をフィールドBに格納という事がしたいです。 レコードセットで1つずつ格納するしかないでしょうか?
質問日時: 2021/07/06 09:53 質問者: ババロア123
解決済
1
0
-
Excel 自動セル 抽出 別シートへ反映 画像添付のようにしたい。
恐れ入ります。 事務始めたばかりで、 関数や、マクロ、VBAなど勉強中なのですが、 画像のように、 「Sheet1」内の業者名・所在地・代表者名・電話番号を 「Sheet2」に反映・または抽出する関数や、 VBAをご教授頂けませんでしょうか。 2日以内で終わらせなければならず、 勉強しても追いつきません… どうかご教授頂けないでしょうか。 浅知恵で申し訳ございません。 クレクレ行為なことも承知しております。 助けてください。 よろしくお願い申し上げます。
質問日時: 2021/06/30 04:08 質問者: generatearea
解決済
1
0
-
アクセス2016のレポートで、テキストボックスの文字を自動で改行(縮小)させたい。
アクセス2016を使っています。 フォームのテキストボックス「概要」 に100~400文字程度の文字を入力して、 レポートのテキストボックス「概要」に、同じものを表示して印刷しています。 フォームとレポートのテキストボックスの大きさは同じ(高さは5行分くらい)です。 https://hatenachips.blog.fc2.com/blog-entry-177.html のサイトを参考にして、「概要」の文字数が多い場合に、レポート上で途切れないように文字を縮小しています。 問題は、フォームの「概要」に入力している文字は、改行をせず入力している(たまに改行している)ため、レポートの「概要」に納めるために、文字が最小のサイズまで縮小されてしまいます。 やりたいことは、文字を縮小せずとも、改行のみで、レポート「概要」からはみ出さないのであれば、 改行するだけで印刷したい。 改行だけでは、はみ出すのであれば、文字を1サイズづつ縮小させたい (テキストボックスの高さだけで縮小の判断をさせたい) のですが、上記のコードのどのあたりを治したらいいのでしょうか?? もしくは、なにか良い方法はないでしょうか?教えて頂けませんか
質問日時: 2021/06/27 19:50 質問者: takitaki168
ベストアンサー
1
0
-
access ファイル共有
すいません。。。accessについて教えて下さい アクセスでデーターベースを作成して mysqlのようなイメージで 一つのファイルで、ファイルの共有して、どのタイミングでも、複数の利用者がデータを追加して、ファイルの更新のズレ(正式な単語は忘れましたが)などはなく使えるイメージですか? それともexcelのように、一人が入力しているとロックして、すすめていくイメージですか?
質問日時: 2021/06/21 20:53 質問者: ひろみch
解決済
1
0
-
別シートの品目の数量を日付ごとに集計したい。
毎日の納品量を品目ごとで集計を出したいのですが、よろしくお願いいたします。 集計を出したいシートは 元データは A (品名) B(1日分) A日付 B品名 C規格 D数量 じゃがいも 数量 1 キャベツ 3.2 人参 数量 じゃがいも 1.5 キャベツ 数量 人参 3 2 椎茸 0.3 パプリカ 1.5 元データはそれぞれ微妙に異なりますが、このような感じです。元データは20シートあります。 集計を出したいシートは新たにできますが、元データはこのような感じできます。 パソコン初心者で書類をみて日付ごとに手打ちで作業しています。納品書も同じような作業をしています。時間がかかるのと2度手間のような気がしまして、教えていただけたら幸いです。 よろしくお願いいたします。
質問日時: 2021/06/21 18:01 質問者: narujun
解決済
2
0
-
Access2016 レコード印刷時に入力したレコード(1件のみ)のみ印刷する方法について まず現在
Access2016 レコード印刷時に入力したレコード(1件のみ)のみ印刷する方法について まず現在の状況を説明いたします フォームでレコードを入力し、印刷ボタンをクリックします。するとレポート形式で先程入力したレコードの印刷プレビューが開き印刷できるように設定してあります。ですが、印刷をかけると他のレコードも印刷されてしまう状況です 分かる方いましたら教えてください よろしくお願いします!
質問日時: 2021/06/18 11:13 質問者: パソコン苦手
解決済
1
0
-
Access2016 入力専用フォームと修正専用フォームに分ける方法
office2016 Accessについての質問です。 入力専用フォームと修正専用フォームを分けて使用したいです。 フォームAで入力したレコードを「新規」ボタンをクリックするとフォームBにフォームAで入力したレコードが移動することは可能でしょうか?そして「新規」をクリックすると新しいレコードになるようにしたいです。できればフォームAには新規のレコードだけが見れてフォームBには今まで入力したレコードが溜まっていくイメージで作れたらと思います。 おそらくVBAを使うと思いますが、ど素人のため入力方法が分かりませんので教えていただけると助かります。 よろしくお願いします。
質問日時: 2021/06/15 10:59 質問者: パソコン苦手
解決済
1
0
-
アクセス2010 の時間の合計の計算
アクセスで勤務時間の合計の集計をしていますが、24時間わ超えた合計時間数の計算式が分からず困っています。 労働時間合計は例えば 2627→41:00 と表示したいです。 アクセスは初心者でVBAは利用できないため、フィールド名などで計算できるとありがたいです。 宜しくお願いします。
質問日時: 2021/06/04 17:09 質問者: fuuVIVA
解決済
1
0
-
データベースアクセスがない、フリーソフト入れちゃダメの会社でデータベースでクエリ使える方法ないですか
データベースアクセスがない、フリーソフト入れちゃダメの会社でデータベースでクエリ使える方法ないですか?
質問日時: 2021/06/04 08:28 質問者: あっきー126
ベストアンサー
3
0
-
教えてください! テーブル1に都道府県市区町村コードがあります 111 北海道札幌市北区 222 岐
教えてください! テーブル1に都道府県市区町村コードがあります 111 北海道札幌市北区 222 岐阜県岐阜市 333 愛知県額田郡幸田町 テーブル2は 北海道札幌市北区さっぽろ1-1 岐阜市ぎふちょう1-1 愛知県額田郡幸田町あいち1-4 とあったとき住所にコードをつけたいです。 都道府県からはじまるときと市から始まるときがあって、、急ぎで作成しないといけません。 教えてください テーブル1に都道府県がない場合も登録すればよいのかな?とも思ってます。 クエリを何回挟んでもよいのでお願いします
質問日時: 2021/05/31 20:23 質問者: richiha
解決済
1
0
-
アクセスにおいて、ドキュメントタブの閉じるボタンが一部表示されなくなりました。。
マイクロソフト365のアクセスにおいて、レポート画面を作成中に、 レポートを、レポートビューで開いた際、写真の通り、閉じるボタン(xボタン) が表示されなくなりました。 タブ上で、右クリックを押して閉じることはできるのですが、閉じるボタンの表示されるレポートと 表示されないレポートが混在し、統一できないかと試行錯誤中です。 よろしくお願いいたします。
質問日時: 2021/05/31 16:50 質問者: masakko38
解決済
1
1
-
Accessのレポートで重複データ非表示がうまくいきません。 txt場所とtxt名前には重複データ非
Accessのレポートで重複データ非表示がうまくいきません。 txt場所とtxt名前には重複データ非表示を「はい」にしています。 txt場所については問題無いのですが、txt名前はtxt場所が違えば表示するようにしたいです。 添付画像のとおり、右表のようにしたいが、左表のようになります。 vbaでも構いませんので教えてください。
質問日時: 2021/05/28 04:38 質問者: mionosuke_21
ベストアンサー
2
0
-
従業員名簿について アクセスかエクセル管理どちらがいいのでしょう? 派遣会社の内勤事務員です。 稼働
従業員名簿について アクセスかエクセル管理どちらがいいのでしょう? 派遣会社の内勤事務員です。 稼働従業員数は150人程度なのですが、ほとんどの帳簿類がエクセル管理で法改正される度に項目追加されてきたようで今年度から事業報告書の担当になり集計作業をしていたのですが必要な項目が同じシート内にあったりなかったり・違うブックから引っ張ってきたりしてかなり手間がかかってしまったので来年度からもっとスムーズに作業をしたいと思っています。 そこで、まず初めに基本情報(氏名や生年月日・住所)と履歴が同じシート内にあるので使用列が多く横長になっている名簿の整理をしようと思うのですがエクセルでユーザーフォームを作成するのとアクセスで入力フォームを作成したデータを作るのかどちらが良さそうだと思いますか?
質問日時: 2021/05/26 15:20 質問者: yulilly
ベストアンサー
5
0
-
教えてください テーブル1に コード コード名 111 愛知県岡崎市 121 愛知県豊田市 200
教えてください テーブル1に コード コード名 111 愛知県岡崎市 121 愛知県豊田市 200 岐阜県岐阜市 500 福岡県福岡市博多区 テーブル2に 住所 愛知県岡崎市横浜町17 愛知県豊田市東京町17-6 タワー101 岐阜市千葉町652-3 ディズニー307 福岡市博多区99 とあったとき、 コード 住所 111 横浜町17 121 東京町17-6 タワー101 200 岐阜市千葉町652-3 ディズニー307 500 99 というクエリを作成したいです テーブル1のコードをつけて、コード名以下を 表示させたいのですが、 そんなことはできますか? とあったとき 愛知県岡崎市
質問日時: 2021/05/25 22:02 質問者: richiha
解決済
2
0
-
教えてください。 テーブル1に 市区町村 よみがな 福岡市 ふくおかし 名古屋市 なごやし 柏市 か
教えてください。 テーブル1に 市区町村 よみがな 福岡市 ふくおかし 名古屋市 なごやし 柏市 かしわし テーブル2に 福岡市500 名古屋市6000 柏市70 とあったとき ふくおかし500 なごやし6000 かしわし70 というようにアクセスでできないでしょうか?
質問日時: 2021/05/25 20:58 質問者: richiha
ベストアンサー
1
0
-
アクセスで教えてください 住所を抜き出したいのですが、 区があれば区より前、 郡のときは町より前、
アクセスで教えてください 住所を抜き出したいのですが、 区があれば区より前、 郡のときは町より前、 市だけのときは市より前を 抜き出すことはできますか?
質問日時: 2021/05/25 19:27 質問者: richiha
解決済
3
0
-
教えてください! 例えば横浜市...というようなデータがあったら アクセスで神奈川県横浜市みたいに県
教えてください! 例えば横浜市...というようなデータがあったら アクセスで神奈川県横浜市みたいに県をつけることはできますか? アクセス初心者です。 教えてください
質問日時: 2021/05/25 19:14 質問者: richiha
解決済
3
0
-
何かいい案があれば教えてください 例えば 横浜555あ1111という車番があったとしたら、ヨコハマ5
何かいい案があれば教えてください 例えば 横浜555あ1111という車番があったとしたら、ヨコハマ555ア1111というように 半角カタカナでふりがなをつけたいですが、 クエリとかで上手くできないでしょうか? よい案を教えてください
質問日時: 2021/05/25 18:29 質問者: richiha
解決済
1
0
-
納期をBETWEENで抽出して請求書発行したいのですが「型が一致しません」のエラーがでます。
お世話になります。 ACCESSの勉強を始めたばかりの初心者です。 請求書発行のデータベースを作っているのですが、顧客と納期で抽出して請求書を発行しようとしています。 以下コードですが、実行時エラーで「型が一致しません」というメッセージがが出ます。 どうにもこうにも分からないのでご教示願えますでしょうか…。 どうぞよろしくお願いします。 -- Private Sub コマンド14_Click() If IsNull(Me.顧客名コンボ) Then MsgBox "顧客名を選択して下さい。", vbOKOnly, "顧客名" Me.顧客名コンボ.SetFocus ElseIf IsNull(Me.開始) Then MsgBox "開始年月日を入力して下さい。", vbOKOnly, "開始" Me.開始.SetFocus ElseIf IsNull(Me.終了) Then MsgBox "終了年月日を入力して下さい。", vbOKOnly, "終了" Me.終了.SetFocus Else DoCmd.OpenReport "R請求書", acPreview, , "顧客名='" & 顧客名コンボ.Value & "'" And "納期 Between #" & Me!開始 & "# And #" & Me!終了 & "#" End If End Sub
質問日時: 2021/05/22 18:23 質問者: yue1004
ベストアンサー
3
0
-
Accessで教えてください!データを横に並べる
Accessで伝票を作成したいのですが、データが縦にしかできません。 なにか方法はありますか? 現状 商品名 サイズ 数量 靴① 250 1 靴① 255 2 靴② 235 2 靴③ 260 4 靴③ 265 3 ----------------------------------------------- 希望 商品名 サイズ 数量 250 255 靴① 1 2 235 靴② 2 260 265 靴③ 4 3 上記のように商品ごとに横な並べて印刷したいです。 クロス集計クエリ使うとすべてのサイズが表示されてしまします。 Accessではこのようにできないのでしょうか? 助けてください。
質問日時: 2021/05/11 16:13 質問者: OKTYA
ベストアンサー
7
0
-
Accessで詳しい方教えてください。 Excelファイルを読み込む際、「エラー217」と表示され読
Accessで詳しい方教えてください。 Excelファイルを読み込む際、「エラー217」と表示され読み込めません。 「エラー217」とはなんのエラーでしょうか?
質問日時: 2021/05/07 19:43 質問者: トト33
解決済
1
0
-
特定の日付のセルを色を付ける
お忙しいところすいませんがよろしくお願いいたします。 A B C D E F G H I 4/1 金額 備考 5/1 金額 備考 6/1 金額 備考 4/2 金額 備考 5/2 金額 備考 6/2 金額 備考 ~ ~ ~ 4/30 5/31 6/30 現在5/6日のD、E、F 列に特定の色を付けたいと思いますが、条件書式のセルをどうしたらよいか教えていただけませんかよろしくお願いいたします。
質問日時: 2021/05/06 07:47 質問者: Y-1224
ベストアンサー
3
0
-
Accessのパラメータークエリで入力する値を、別のテーブルのフィールドの値を初期値とできるか
こんにちは。(HELLO) Accessのパラメータークエリについて質問です。 クエリの抽出条件にパラメータークエリを使用したいと考えています。 入力する値は別のテーブル(1つしかレコードがないテーブル)のAというフィールドの値を、初期値として入れておきたいと考えています。(もし、その初期値以外の値を入れたい場合は、手入力で修正することをイメージしています。) なにかよい方法はありますでしょうか。
質問日時: 2021/04/28 09:14 質問者: gorilla39
ベストアンサー
1
0
-
ACCESSでチャットを自作したい
マイクロソフトACCESS2016 を使用して、チャットを自作できないでしょうか? 社内の共有フォルダにACCESSを置いて、 メンバーがそのファイルを開いて、最小化しておいて、 誰かがメッセージを投稿したらポップアップで表示される みたいなものを作成したいのですが、ネットを調べても今ひとつわからず、困っています。(社内にインターネットがないので、イントラネットで、使用できるのがACCESSかExcelくらいです。) 教えていただけませんか。
質問日時: 2021/04/28 01:12 質問者: takitaki168
解決済
5
1
-
アクセス2013について
アクセス2013のフォームにて下記を作成しようとしています。 〇フォーム画面にて ①オプショングループ作成 1:はい 2:いいえ の二つの選択肢を作成 ②「2:いいえ」を選択した場合のコメント欄作成(テキストにて) この場合の②のコメント(テキスト)を入力必須にする為のSQLのご教授お願いします。
質問日時: 2021/04/28 00:10 質問者: T6360
解決済
1
0
-
Access,Excel連携で"(","-","/"の文字が思惑通りに操作できない。
Accessテーブルのフィールド名に"(","-","/"の文字が含まれていると、 Excel側からVBA(ADO)で、Accessのテーブルをリードしようとすると 実行時エラーでうまっく実行できません。 体系的に分析できていませんが、 Excel側で、フィールド名の半角文字("(","-","/")を全角にするとリードできてしまう。 【実験例】 Accessのフィールド名にあえて実験的に フィールド名 (a),a-b,a/b ←全て半角 データ 1 , 2 , 3 として Excel側で strSQL = "SELECT * FROM test1 WHERE (a)= '1'" ←これだとエラー そこで、半角の()を全角にして strSQL = "SELECT * FROM test1 WHERE (a)= '1'" ←これだとOK いったいどうなってるんだかわかりません。文字コードの問題なのでしょうか? 初心者のため、ご教授よろしくお願いします。
質問日時: 2021/04/25 17:16 質問者: tokotoko.dai3
ベストアンサー
1
0
-
日付の古いデータを削除
いつもお世話になっております。 やりたいこと 削除フォルダがあります。 その中には下記のコードで作成された Excelファイルがあります。 Dim str As String str = "\Desktop\削除フォルダ\" & Format(Now(), "yy年mm月dd日")'個人情報があるため前の部分省略しています。 Sheets(1).Copy ActiveSheet.SaveAs Filename:=str, FileFormat:=xlWorkbookDefault Sheets(1).Copyをコピーして 削除フォルダに保存しています。 ここで今日の日付より古いデータを削除してから、 上のコードを削除することは可能でしょうか
質問日時: 2021/04/24 22:33 質問者: ぶどうと
ベストアンサー
4
1
-
Access データベースを分割したものを 元に戻したい
表題の通りです Accessのバージョンは2016です よろしくお願いいたします
質問日時: 2021/04/24 14:59 質問者: elpa_pityo
ベストアンサー
1
0
-
データベースソフトのアクセス2013で困っています。
コマンドボタンをクリック時 「ファイルへのアクセスでエラーが発生しました。ネットワークの接続が切断されている可能性があります。」というエラー表示がされ、OKボタンをクリックするとPrivate Sub マクロ実行_Click() が黄色のマーカー表示になり、知識が無いので中断してしまう。別のネットワークを組んでいるパソコンからはコマンドボタンも正常に機能し、レポートやフォームを表示出来ているので、入力したデータの保存がされているようです。
質問日時: 2021/04/22 09:17 質問者: たいへい1961
ベストアンサー
10
0
-
Accessについて質問です。 条件を入力すると、該当レコードを表示するフォームを作りました。 この
Accessについて質問です。 条件を入力すると、該当レコードを表示するフォームを作りました。 このフォームにチェックボックス(コンボボックスでも良いです)を作り、チェックが入ったレコードだけを抽出したいです。 レコードデータが全てODBCデータのため、チェックボックスやらコンボボックスやらをフォーム上に作成しても、何も反映されません。 「作っただけ」で格納する場所が無いからだろうというのは何となくわかるのですが、このチェックボックスのデータをどうやって格納するのかがわかりません。 ここがクリアできれば、あとはクエリでどうにかなると思うのですが。 初心者があれこれ考えてるだけなので、根本的に色々違うのかも知れません。 どなたかご教示ください。よろしくお願いします。
質問日時: 2021/03/29 01:51 質問者: るりるりちゃん
解決済
2
0
-
ACCESSで2つのテーブルで一致しないデータのフィールドのみ取り出す方法を教えてください。またはデ
ACCESSで2つのテーブルで一致しないデータのフィールドのみ取り出す方法を教えてください。またはデータごと取り出して、一致しないフィールドのみ色反転させて表示する方法を教えてください。よろしくお願いします。
質問日時: 2021/03/14 21:57 質問者: ケンジ19720817
解決済
2
1
-
AccessのWHERE句において、変数は使用できますか?
WHERE句において、以下のように 変数=変数 という記述は出来ますでしょうか? SQL = "SELECT ID FROM T_製品 WHERE '" & Survey & "'='" & Target & "';" Set DB = CurrentDb Set RS = DB.OpenRecordset(SQL) エラーは、発生しないのですが、対象のIDがあるはずなのに、求められません。 お分かりになる方、教えて頂きますよう、お願いします。
質問日時: 2021/03/09 16:49 質問者: tomo3rd
ベストアンサー
2
0
-
accessエラー回避について
初めまして。 access2013で作成したものをaccess2016で動かしています。(2013では動いていたようです。) 「3211 ほかのユーザまたはプロセスで使用されているためロック出来ません」が出てきてしまい回避方法を教えて頂きたく。。。 処理としては、Excelに書かれたキー項目で外部テーブルを検索し、複数レコードが存在した場合に 内部テーブルにコピーしサブフォームで表示し、表示されている内容を利用者が選択し、CSVに書き出すといった処理を行っています。 内部テーブルへのコピー(作成)は、以下のSQLでDoCmd.RunSQLで行っています。 SELECT A,B INTO 内部テーブル FROM 外部テーブル WHERE 検索キー デバッグモードで実行したところ、2回目のテーブルへのコピー(作成)時にエラー になっていました。 何か回避方法があるか、ご教授いただければと思います。 因みにソースコードはこんな感じです。 public SUB1 Excelが無くなるまで読み込み 外部テーブル検索 外部テーブルを検索し複数レコードが存在した場合 DoCmd.SetWarnings False 内部テーブル作成用SQL生成 DoCmd.RunSQL 生成SQL <-------2回目:ここで3211エラー発生 Call Docmd.OpenForm(FormName:=選択画面, WindowMode:=acDaialog) DoCmd.SetWarnings True CSV出力 End SUB
質問日時: 2021/03/09 14:03 質問者: f----f
解決済
1
0
-
ACCESS テーブルの期間によってクエリの金額を変更したい
現金出納帳を作成しているのですが、外貨の欄をクエリで期間によって評価した金額に変更したいです。 T現金(テーブル) 日付 適用 入金 出勤 2020/3/1 ○○ 2021/3/15 ○○ T外貨(テーブル) 開始日 終了日 所持外貨 日本評価額 2019/3/31 2020/3/30 100 10,000 2020/3/31 2021/3/30 100 9,000 Q出納帳 日付 適用 入金 出勤 所持外貨 2020/3/1 ○○ 10,000 2021/3/15 ○○ 9,000←こうなるようにしたい うまく質問が検索出来なかったため質問しました。 ACCESS2019です。 よろしくお願いします。
質問日時: 2021/03/05 10:55 質問者: pure-white
ベストアンサー
1
0
-
accsessで、テーブルに受付日を設定して日付だけを取りたいが、どうしても時間まで取得してしまう。
accsessで、テーブルに受付日を設定して日付だけを取りたいが、どうしても時間まで取得してしまう。書式も定型入力も設定しているのに何故でしょう?原因がわかりません。
質問日時: 2021/03/02 15:03 質問者: D-JIN-RYU
ベストアンサー
1
0
-
Access パラメータークエリ VBAの書き方について よろしくお願いします。 ①クエリでデータを
Access パラメータークエリ VBAの書き方について よろしくお願いします。 ①クエリでデータを絞る ②絞ったデータを行ごとにまとめるクエリにかける ③その結果をボタンを押したらテキスト5にひとまとめにする といったものをいくつか作りました。 こちらは固定のものなので問題なく動きましたが、新しく①をパラメータークエリでデータを絞る必要があり、既存のコードを元に以下のコードを書いて③を実行しようとした際、 「3061/パラメーターが少なすぎます。4を指定してください」というエラー文が出ました。 Private Subコマンド11_Click() Dim SQL As String Dim rs As Recordset Me!テキスト5 = Null SQL = "SELECT * FROM ひとまとめクエリ"Set rs = CurrentDb.OpenRecordset (SQL) Do Until rs.EOF Me!テキスト5 = M!テキスト5 &rs![ひとまとめ] &vbCrLf rs.MoveNext Loop Set rs = Nothing End Sub *ひとまとめクエリが②のクエリ名です *[ひとまとめ]はテキスト5と同じフォーム内にあるひとまとめクエリのデータが表示されているテキストボックスの名前です。 *デバッグの際、Set rs : CurrentDb.OpenRecordset (SQL)の部分が黄色くなります 調べたところパラメーター名を足せばいいと出てきて試してみたのですが、サイトの書き方を真似して書き足してみても上記のエラーだけでなく「438/オブジェクトはこのプロパティ〜」や「424/オブジェクトが必要です」等、別のエラーが出てどうすればいいのかわからない状態です。 下記が新しく書き足したコードになります。 Private Subコマンド11_Click() Dim SQL As String Dim rs As Recordset Me!テキスト5 = Null Set myDb = CurrentDb SQL ="SELECT *FROMひとまとめクエリ"With qdf 'フォーム参照パラメータ名にコントロールの値をセット Set qdf = myDb.QueryDefs("ひとまとめクエリ") .Parameters("[Forms]![フィルターフォーム]! [コンボ11]") = Forms!フィルターフォーム!コンボ11 .Parameters ("[Forms]![フィルターフォーム]! [コンボ13]") = Forms!フィルターフォーム!コンボ13 .Paransters ("[Forms]![フィルターフォーム]! [コンボ17]") = Forms!フィルターフォーム!コンボ17 Set rs = CurrentDb.OpenRecordset (SQL) End With Do Until rs.EOF Me!テキスト5 = Me!テキスト5 &rs![ひとまとめ] &vbCrLf rs.MoveNext Loop rs : Nothing Set End Sub *パラメーターの指定はコンボボックスで設置してあり、3箇所あります 正直もうお手上げ状態のため、どうすれば上手くいくのか.... みなさまのお力を貸してほしいです。 よろしくお願いします。
質問日時: 2021/02/26 16:53 質問者: 由依.1856
ベストアンサー
1
0
-
Access クエリの計算式を教えてください。
Access 初心者です。 営業成果・業務内容から 1 POINT につき1,000円の POINT 制度を導入することになりました。 POINT 獲得の多い営業1・営業2・営業3は毎月 POINT 合計から一割を天引きした金額で支払い、 一割を天引きした金額を累積してボーナス月に還元します。 POINT 獲得の少ない事務職・パートは毎月 POINT 合計金額で支払います。 クエリには 獲得した POINT を[POINT乗率]として *1000の計算式で POINT を算出。 一割を天引きした値を POINT_1 として POINT_1: Nz([POINT])-Nz(([POINT])*0.1) で算出したいのですが。 [営業1][営業2][営業3][事務職][パート] を POINT_1: Nz([POINT])-Nz(([POINT])*0.1)の計算式に組み入れて [営業1][営業2][営業3]は一割引いて[事務職][パート] は天引きしない計算式をご教授のほどよろしく お願いいたします。
質問日時: 2021/02/25 11:07 質問者: kotaro1360
解決済
1
0
-
Accessのテーブルで、不可解な現象が起こっています。
Accessでテーブル(T_テーブル①)のフィールド数が255を超えたので、 別テーブルを準備しました(T_テーブル②)。 次に、オートナンバー型の「ID」でリレーションシップを行いました。 ですが、フォームで、1レコード登録した際、T_テーブル①とT_テーブル②の「ID」がなぜかズレます。 (例:T_テーブル①で100の次が102。T_テーブル②はズレずに、100の次が101) ズレるせいで、フォームを「ID」で検索して表示した際、入力データが正しく表示されません。 どのような原因が考えられますでしょうか? 教えて頂ければ、幸いです。 (テーブル設計や正規化といった根本の話もあると思いますが、 上記環境での解決を目指しています)
質問日時: 2021/02/25 09:50 質問者: tomo3rd
ベストアンサー
1
0
-
テキストボックスに入力した値を、次に入れ替えるまで保持させたいのですが、どのような方法があるでしょう
テキストボックスに入力した値を、次に入れ替えるまで保持させたいのですが、どのような方法があるでしょうか?ソフトを終了させて再起動しても値を保持しておくようにしたいのです。商品単価を設定して、それを元に、フォーム上やレポート上の金額計算に使用したいのです。よろしくお願いします。
質問日時: 2021/02/24 12:01 質問者: D-JIN-RYU
ベストアンサー
2
0
-
こんにちは、Accessを複数人で同時作業できるようにデータ保管をしたいと思っています。共有フォルダ
こんにちは、Accessを複数人で同時作業できるようにデータ保管をしたいと思っています。共有フォルダだとVPN接続時にレスポンスが極端に悪くなるため、それ以外の方法で保管したいと考えています。例えば、SharePoint、OneNoteだと、そのような Accessを複数人で同時作業できますでしょうか。(Excelだとできると思いますが、Accessだとどうでしょうか)
質問日時: 2021/02/18 14:30 質問者: mame1216
ベストアンサー
1
0
-
アクセス(access)組み合わせのリストを作る方法
お世話になっております。 二つのテーブルのフィールドを総当たりでリスト化するクエリは作成できますか。 とても素人です。 (例) テーブル1 A B C テーブル2 売上 粗利 経費 クエリ1 A売上 A粗利 A経費 B売上 B粗利 B経費 C売上 C粗利 C経費
質問日時: 2021/02/15 11:39 質問者: mogurayama_2
ベストアンサー
1
1
-
iPadのExcel
あるファイルを開こうとすると、先日まで使えていたはずのファイルが 開けなくなりました。 「〜(ファイル名)はサポートされていないサーバーの場所に保存されています」 とメッセージが出て困っています。 どなたか解決方法をご存知の方いらっしゃいましたら教えてください。 よろしくお願いします。
質問日時: 2021/02/14 21:42 質問者: ずなちゃ
解決済
1
0
-
MicrosoftのAccessを使って社員、顧客の管理をしたいです。参考になる本や動画、サイトのリ
MicrosoftのAccessを使って社員、顧客の管理をしたいです。参考になる本や動画、サイトのリンクを教えて下さい
質問日時: 2021/02/12 05:13 質問者: black27island
解決済
1
0
-
一つのデータベースで対応できますか?
300戸ほどの所帯のマンション管理員です。 殆どエクセルで処理していましたが、現場にでる状況もないほどの煩雑な業務に手を焼いて 76歳の今アクセスに取りかかったばかりです。 質問なんですが、データベースを作れば、在庫管理 貸し出し管理は出来るでしょうか? 駐車場のロボットゲートのリモコン貸し出しで 一定量は貸し出し完了したのですが 入居者の転居などで常時把握しなければならないとき 1シートで在庫管理 貸し出し管理を平行して一括に出来るものかと思案している次第です IDを居住区にすることが先決だと思います。 その時に在庫管理は 同時に出来ますでしょうか リモコンにはすべてにランナンバーガ入っています。 リレーショナルデーターベースは絶対条件にるのでしょうか? お願いします!
質問日時: 2021/02/10 23:36 質問者: 無人駅長
ベストアンサー
4
0
-
Accessのフォームにあるテキストボックスに、別フォームのコンボボックスから文字列を挿入
こんにちわ 普段仕事で作っているAccessの効率化で新しくフォームの追加を試みています。 相談内容は、AccessのフォームAにあるテキストボックスに普段は内容を直接入力している枠があります。テーブルのフィールドはメモ型です。 この項目によく同じ内容の短い文章を記入することが多い為、コンボボックスのみがある別フォームBをボタンでポップアップさせて、選んだ文字をフォームAに追記できないかと考えています。フォームAに直接打ち込んである文字列を残しつつ挿入ができればと思案中です。また追記の度にスペースを1つ空けたいと思っています。 --------------------------------------------------------- フォームA「あか あお きいろ」 フォームB コンボボックス「みどり」を選択すると フォームA「あか あお きいろ みどり」となる予定 ---------------------------------------------------------- 途中まで出来ていましたが、エラーになりうまくいきません。 当方初心者の為、行き詰っています。 Private Sub コンボ11_AfterUpdate() Dim a As String Dim b As String a = Me.コンボ11 b = Forms!フォームA!txt内容 Forms!フォームA!txt内容 = Forms!フォームA!txt内容 & a End Sub よろしくおねがいします
質問日時: 2021/02/08 15:21 質問者: 初心シャー
ベストアンサー
1
0
-
お世話になります access初心者です。 下記教えていただければ有り難いです。 テーブルで下記デー
お世話になります access初心者です。 下記教えていただければ有り難いです。 テーブルで下記データがあります。 商品名 在庫ケース数r A1 5 A2 12 A3 3 A4 32 A5 8 A6 2 A7 22 このデータをレポートで添付ファイルのように赤の四角のボックスが数量分横に延びていくように出力したいです。 以前こちらで横に延びるためのコードは教えて頂きました。その節は本当に助かりました。ありがとうございました。 教えて頂いたコードを参考にして作ったコードは下記になります。 Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer) If 在庫ケース数r >= 1 Then ボックス01.Visible = True ボックス02.Visible = False ボックス03.Visible = False ボックス04.Visible = False ボックス05.Visible = False ボックス06.Visible = False ボックス07.Visible = False ボックス08.Visible = False Else ボックス01.Visible = False End If If 在庫ケース数r >= 2 Then ボックス01.Visible = True ボックス02.Visible = True ボックス03.Visible = False ボックス04.Visible = False ボックス05.Visible = False ボックス06.Visible = False ボックス07.Visible = False ボックス08.Visible = False Else ボックス02.Visible = False End If If 在庫ケース数r >= 3 Then 以下3~7は省略。 If 在庫ケース数r >= 8 Then ボックス01.Visible = True ボックス02.Visible = True ボックス03.Visible = True ボックス04.Visible = True ボックス05.Visible = True ボックス06.Visible = True ボックス07.Visible = True ボックス08.Visible = True Else ボックス08.Visible = False End If If 在庫ケース数r >= 9 Then End If End Sub 在庫ケ―ス9以上の場合、8個マスを表示して、折り返して2段目に四角マスを表示したいと思っています。 参考までにレポートのデザインビューの写真を添付します。 もし可能でしたら、やり方を教えて頂ければ有難いです。 宜しくお願い申し上げます
質問日時: 2021/02/06 18:14 質問者: nnnkukuku
ベストアンサー
1
1
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
【Access(アクセス)】に関するコラム/記事
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Microsoft 365 Basic サブスクリプ...
-
「テキストデータで送ってください...
-
access vbaでフォームを開くとき、Y...
-
レポートの印刷を一括ではなくグル...
-
ACCESS VBA でのエラー解決の根拠が...
-
Access 複数条件検索の設定が上手く...
-
Accessのクエリで、replace関数を使...
-
access2021 強制終了してしまう
-
access2021 VBA メソッドまたはデー...
-
Accessのクエリの結果を、既存のエ...
-
Accessのスプレッドシートエクスポ...
-
Arduinoで温湿度と時刻を1分ごとにS...
-
access2019の起動が遅い
-
Accessでフォームに自動入力した内...
-
Access Error3061 パラメータが少な...
-
Access IF文でテーブルに存在しない...
-
Microsoft365にAccessってありますか?
-
【アクセス】レポート テキスト枠線...
-
Excelを開く時と閉じる時に一度下記...
-
accessでlaccdbファイルが削除でき...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Microsoft 365 Basic サブスクリプ...
-
「テキストデータで送ってください...
-
ACCESS VBA でのエラー解決の根拠が...
-
Accessのクエリで、replace関数を使...
-
access2021 強制終了してしまう
-
access2021 VBA メソッドまたはデー...
-
Access VBA [リモートサーバーがな...
-
access vbaでフォームを開くとき、Y...
-
Accessのクエリの結果を、既存のエ...
-
Access Error3061 パラメータが少な...
-
Microsoft365にAccessってありますか?
-
実行時エラー3131 FROM 句の構文エ...
-
列が255以上のCSVファイルをAccess...
-
Accessのスプレッドシートエクスポ...
-
Access 複数条件検索の設定が上手く...
-
Accessでレポートを印刷する時のプ...
-
Arduinoで温湿度と時刻を1分ごとにS...
-
accessでlaccdbファイルが削除でき...
-
Accessでフォームに自動入力した内...
-
Accessのリンクテーブルのパスを相...
おすすめ情報