Access(アクセス)
- 【Access】タブオーダーが選択できなくなった
フォームにてボタンを追加することが多く、その都度タブオーダーでボタンの移動順を変更していたのですが、Officeが2013から365へ変更後、Accessのタブオーダーが選択できなくなってしまいました。 オプション等で何か特別な設定が必要なのでしょうか? 会社の指示通りにOffice365をインストールしているので、再インストールはできません。
- 締切済み
- KO1014
- Access(アクセス)
- 回答数3
- Accessクエリ
お世話になります。 Access初学者です。 グループごとに日付が最大のレコードを、それぞれ1件抽出するクエリを作成したいと思っています。 IDを表示させなければできるのですが、IDを表示させると全レコードが抽出されます。どのようにすればいいのでしょうか? よろしくお願いします。
- ベストアンサー
- mihimarumaru
- Access(アクセス)
- 回答数2
- Accessのテーブル設計 オートルックアップ
Accessのテーブル設計。及びオートルックアップについて質問です。 現在Excelで下記の様な形でXlookupを使い部品の履歴データ入力を行っております。 親番1→親名1→子番1→子名1→親数1→子数2→子単価→合計→注番1 &&・・ 親番1→親名1→子番2→子名2→親数1→子数4→子単価→合計→注番1 &&・・ 親番1→親名1→子番3→子名3→親数1→子数5→子単価→合計→注番1 &&・・ Accessにてクエリを使用して入力、親番号を入力して子番号を参照できるようなテーブル設計は可能でしょうか? 1つの親図番を入力した際、子番号・子品名・子数量・子単価が異なる場合になります。 色々とやってみたのですが上手い事いかず、説明下手で申し訳ありませんがご教授頂きたくお願い申し上げます。
- ベストアンサー
- 080-xx69-xxxx
- Access(アクセス)
- 回答数3
- Access 非連結からレコード追加について
標記の件。 不明な点がありご教授頂きたくお願い致します。 今まで普通に使えていたのですが急にエラー「実行時エラー2147467259・(80004005)エラーを特定できません」が出るようになりました。 Windowsのヘルプを参照しましたが、全然ヘルプどころか謎が深まるばかりという状況です。 2つあるチェックボックスの2つ目でエラーになります。 下記コードで全体の改善点含め原因等ありましたらご教授をお願い致します。クエリに変更はありませんでした。 Private Sub btn_登録_Click() Dim con As ADODB.Connection Dim rst As ADODB.Recordset Set con = CurrentProject.Connection Set rst = New ADODB.Recordset If IsNull(txt_工数ロットCD = "" Or _ txt_部品CD = "" Or _ txt_図面番号 = "" Or _ txt_数量 = "" Or _ txt_品名 = "" Or _ cmb_社員名 = "" Or _ txt_作業日 = "" Or _ cmb_工程 = "" Or _ txt_工数 = "") Then MsgBox " 未入力項目があります", vbCritical, "確認" Exit Sub End If If txt_工数ロットCD = "" Or _ txt_部品CD = "" Or _ txt_図面番号 = "" Or _ txt_数量 = "" Or _ txt_品名 = "" Or _ cmb_社員名 = "" Or _ txt_作業日 = "" Or _ cmb_工程 = "" Or _ txt_工数 = "" Then MsgBox "未入力項目が有ります", vbCritical, "確認" Exit Sub End If rst.Open "Q_工程進捗確認", con, adOpenForwardOnly, adLockPessimistic On Error GoTo err_handler 'エラーなら con.BeginTrans ' With rst .AddNew .Fields("工数ロットCD") = Me!txt_工数ロットCD .Fields("部品CD") = Me!txt_部品CD .Fields("数量") = Me!txt_数量 .Fields("社員名") = Me!cmb_社員名 .Fields("作業日") = Me!txt_作業日 .Fields("工程") = Me!cmb_工程 .Fields("工数") = Me!txt_工数 If IsNull(Me.chk_自工程完了) Then .Update Else .Fields("自工程完了") = Me.chk_自工程完了 .Update '更新 End If If IsNull(Me.chk_製作完了) Then .Update '更新 Else .Fields("製作完了") = Me.chk_製作完了.Value ←ここでエラー .Update End If End With con.CommitTrans '確定 Set rst = Nothing Set con = Nothing Call btn_クリア_Click Exit Sub err_handler: con.RollbackTrans Call dbcut_off MsgBox Error$ Debug.Print Error$ End Sub
- ベストアンサー
- 080-xx69-xxxx
- Access(アクセス)
- 回答数3
- Access テーブルについて。 複数の素材
現在手探りで1から作成しておりますが、悩んでおりご質問させて頂きます。(製造業) 最終的にやりたい事としては、レポートで各テーブルを使用して注文書を発行、着荷後バーコードで着荷処理をしたいと考えております。 それ以前に、素材を注文するにあたり「部品CD」に対し、「素材1ヶ」の部品と「素材10ヶ」の部品があり、それぞれの寸法と素材単価を表示させるにはどのような構成のテーブルを追加すればよろしいのでしょうか? 下記、部品のテーブル。 T_itemsのフィールド 部品CD(オートナンバー 取引先CD(テキスト 図面番号(テキスト 品名(テキスト 図面(リンク 受注単価(通貨 材料費(通貨 加工費(通貨 外注費(通貨 実工数(通貨 備考(テキスト レポートには「図面番号」を入力した際に素材明細を表示させたいと考えております。 説明下手で大変恐縮ですがご教授頂きたくお願い致します。
- ベストアンサー
- 080-xx69-xxxx
- Access(アクセス)
- 回答数1
- Accessフォームに写真が表示されない
Access2016 フォームに写真(BMPファイル)を入力しても表示されません。このデータベースを他のPCに移動し使うと、通常に入力し表示されます。 このデータベースを元のPCに戻すと表示されます。 元のPCと他のPCのAccess設定を確認しましたが違いはありませんでした。 元のPCに問題があるのでしょうか。宜しくお願い致します。
- 締切済み
- hasegawa-t
- Access(アクセス)
- 回答数2
- Access コンボボックスの表示選択について
Accessのコンボボックスにて、名簿テーブルにある担当を表示させていますが、Yes/Noにて、退職者を表示させない様にしたところ、退職した担当の過去レコードも表示されなくなり困っています。在職者と退職者のコンボボックスを新たに作り、選択することで、在職者のみ表示、退職者のみ表示が出来る事は、過去質問で見つけましたが、コンボボックスのみ退職者表示をさせずに、レコードには在職者、退職者の表示共にさせておく方法はないのでしょうか。知見のある方、ご教授お願い致しますm(_ _)m
- 締切済み
- mokuro
- Access(アクセス)
- 回答数9
- Microsoft Access
お世話になります。アクセスで教えて下さい。とても困っています。 テーブルをデザインビューで作成していて、ふりがなウィザードを使用すると、型が一致しないと出てきてしまいます。 名前もふりがなもデータ型は、短いテキストです。 また郵便番号から入力支援も、入力支援ウィザードの最初の画面が真っ白 次へを押すとイベントプロパティに指定した式云々出てきてしまいます。 昨日まで作成していた他のテーブルでは出来ていたのですが、出先設置のパソコン及び本日の自宅パソコンで全く同じく出来ない状態になってしまいました。 Windows10 オフィス365です。 アクセスは最新に更新されています。 どうすれば改善できるか教えて欲しいです。 アクセス初心者の為、とても困っています。 よろしくお願いします。
- ベストアンサー
- pony19
- Access(アクセス)
- 回答数1
- excelファイルからaccessへのデータ移管
Accessのフィールド名がA、B、C、D、E、F、GとなっているものにExcelのヘッダがA、B、C、D、E、E、Gとなっている物を強制的に読み込ませたいです。Excel側のデータは弄る事が出来ません。Access側を弄って読み込ませる方法はありませんか?
- ベストアンサー
- hankyo01
- Access(アクセス)
- 回答数6
- Access 単価変更
Accessで仕入管理を作成しています。 部品テーブルに登録してある単価を変更しても、過去のデーターは単価変更しないように設定にしたいのですが… 現在は、部品テーブルの部品番号と仕入テーブルの部品番号をリレーションシップの設定をしているので、過去のデーターも最新単価に変更されます。 どのような構成にしたら良いのか見当もつかなく困っています。 Access初心者なので、分かりやすく教えて頂けると助かります。 よろしくお願い致します。
- ベストアンサー
- KRin163
- Access(アクセス)
- 回答数5
- 点数の平均値の求め方
Accessバージョン 2021 フィールド全体の平均ではなく、フィールドのIDから遡って最新のデータを含めて5つの平均値を求めたいのですが、検索しても探しきれず投稿させて頂きます。 テープの構成は ID 日付 氏名 点数 ランク ご教授宜しくお願い致します。
- ベストアンサー
- 1968masaru
- Access(アクセス)
- 回答数1
- アクセスバーコードVBA
ご教示お願いします。 Windows XP、アクセス2000で運用していたレポートを Windows 10、アクセス2010に移行しました。 レポートにバーコードを配置し、VBAで「フラグによってバーコードを出す出さない」を入れているのですが、そうするとバーコードが希望の大きさにならなくて困っています。 元はバーコードコントロール9.0でしたがアクセス2010ではバーコードコントロール14.0でしたので、バーコードだけ新たに作り直してみましたが、VBAを入れると大きさが小さくなってしまいます。 バーの部分が1×4.2㎝程度にしたいのですが、どうしたらいいでしょうか。 よろしくお願いいたします。
- ベストアンサー
- DPS-DPS
- Access(アクセス)
- 回答数1
- Accessのコンボボックスを使ったデータ入力
誤って質問締め切ってしまいましたので、再度内容を修正の上質問させていただきます。 Accessにおいて、コンボボックスを使ったデータ入力で不具合が生じました。 以下のデーターベースを使用します。 ①テーブル:T_材料 フィールド:材料コード、材料分類コード、名称(材料名) ②テーブル:T_材料分類 フィールド:材料分類コード、分類名 ③テーブル:T_レシピ内容 フィールド:ID、料理コード、材料コード、分量 ④テーブル:T_料理 フィールド:料理コード、名称(料理名) ⑤クエリ:Q_レシピ入力用 SELECT T_レシピ内容.ID, T_レシピ内容.料理コード, T_材料.材料分類コード, T_レシピ内容.材料コード, T_材料.名称, T_レシピ内容.分量 FROM T_材料 INNER JOIN T_レシピ内容 ON T_材料.[材料コード] = T_レシピ内容.[材料コード] ORDER BY T_レシピ内容.料理コード, T_レシピ内容.分量; メインフォームにT_料理にして、レシピを入力するためにQ_レシピ入力用のサブフォームを作成しました。 材料分類の”材料分類名”をコンボボックスで選択後、該当する材料の”名称”をコンボボックスで選択し”分量”を入力する形式にしたいです。 ”材料分類”のコンボボックスは、T_材料分類、材料分類コードをコントロールソースで設定、材料名を表示しています。[更新後処理]は以下の通りにしました。 Me!名称.Requery ”名称”のコンボボックスは、T_材料をコントロールソースして、以下の値集合ソースにしました。 SELECT T_材料.名称, T_材料.材料分類コード FROM T_材料 WHERE (((T_材料.材料分類コード)=[Forms]![F_レシピ登録M]![F_レシピ登録S]![材料分類])); 以上の設定でコンボボックスは成功しましたが、入力を行うたびに、T_材料内に入力した食品のデータが追加される現象が出ました。 長文で恐縮ですが、 何が原因だったのか、対策方法をご教授お願いします。
- ベストアンサー
- matsume_02
- Access(アクセス)
- 回答数16
- レポートでのグループ化となった件数について
いつもお世話になっております。 Access2010を使用しています。 Accessのレポートにおいて、レポートフッターにグループ化となった件数を表示したいと考えています。 具体的には、下記のようにしたいと考えています。 【テーブル名:T_チケット】 番号 席ひらがな 販売箇所 1 あ A市 2 い B市 3 う C市 4 う D市 5 え E市 6 え F市 【レポート名:R_チケット】 ------ページヘッダーに表示------ 番号 席ひらがな 販売箇所 ------------------------------------- ------詳細に表示------------------ 1 あ A市 2 い B市 3 う C市 4 う D市 5 え E市 6 え F市 ------------------------------------- ------レポートフッターに表示---- 【席ひらがな販売数】4件 -------------------------------------- このように、席ごとグループ化(あ、い、う、え)となった全体の件数をレポートフッターに表示したいのですが、やり方が分かりません。 どうぞご教示をよろしくお願いいたします。
- ベストアンサー
- ankle
- Access(アクセス)
- 回答数5
- Accessメインレポート非表示
Access初心者です。 サブレポートにリンクされたメインレポートがあります。 サブレポートに表示するレコードが無い場合は、メインレポートのレコードも非表示にし、印刷対象外にしたいのですが、可能なのでしょか? 方法があれば教えて下さい。 よろしくお願い致します。
- ベストアンサー
- KRin163
- Access(アクセス)
- 回答数8
- Accessのコンボボックスを使ったデータ入力
Accessは初心者です。宜しくお願いします。 コンボボックスを使ったデータ入力で不具合が生じました。 以下のデーターベースを使用します。 ①テーブル:T_食品 フィールド:食品コード、分類コード、食品名 ②テーブル:T_食品分類 フィールド:分類コード、分類名 ③テーブル:T_材料 フィールド:コード、食品コード、分量 ④クエリ:Q_材料入力用 フィールド:コード(T_材料)、食品コード(T_材料)、分類コード[T_食品]、食品名(T_食品)、分量(T_材料) ※食品コード、分類コードはリレーションシップしてあります。 料理のレシピを入力するために、レコードソースがQ_材料入力用の”材料入力”の帳票フォームを作成しました。 理想としては、食品分類の”分類名”をコンボボックスで選択後、該当する食品の”食品名”をコンボボックスで選択します。そして”分量”を入力する形でした。 ”分類名”のコンボボックスは、T_食品分類をコントロールソースで設定を行い、[更新後処理]は以下の通りにしました。 Me!食品名.Requery ”食品名”のコンボボックスは、T_食品をコントロールソースして、以下の値集合ソースにしました。 SELECT T_食品.食品名, T_食品.分類名 FROM T_食品 WHERE (((T_食品.分類コード)=[Forms]![材料入力]![分類名])); 以上の設定でコンボボックスは成功しましたが、入力を行うたびに、T_食品内に入力した食品のデータが追加される現象が出ました。 何が原因だったのか、対策方法をご教授お願いします。
- ベストアンサー
- matsume_02
- Access(アクセス)
- 回答数3
- Access ナビゲーションウィンドウが突然グレー
いきなりの質問ですみません。 会社のAccessバージョンが2016、自宅のAccessバージョンが2019なのですが…自宅で自作のデータベースを作成しつつ会社で編集したり自宅で編集したりしていました。 OSは共にWindows10です。 そして今日突然、会社でどのAccessを開いてもナビゲーションウィンドウの背景がグレーになってしましたした。 原因が分からず、会社の他のAccessデータベースまで壊れてしまったらと思うと不安です。 ネットで調べましたがよく分かりませんでした。 どなたかご教授して頂きたいです。何卒宜しくお願い致します。
- ベストアンサー
- coco--chanel
- Access(アクセス)
- 回答数3
- アクセス レポートの表示の並び替えについて
Windows10 Office2019の環境です レポートの並び替えなのですが フィールドに―を含むデータがありましたので 文字列に設定しましたが 当然並び替えがうまくいきません 1-2 2 1-3 1-4 56 が 1-2 1-3 1-4 2 52 となるよう順番に並び替える方法はないでしょうか
- ベストアンサー
- tom2011
- Access(アクセス)
- 回答数5
- 最終ページのみページフッターを表示する
環境は Office2019 Windows10です レポートでページフッターに合計が表示されるようにしています 複数ページになった時に最終ページのみページフッターを表示したいので 下記のコードを記入しましたが うまくいきません Private Sub ページヘッダー_Format(Cancel As Integer, FormatCount As Integer) If Page = Pages Then Me.ページフッター.Visible = True Else Me.ページフッター.Visible = False End If End Sub 最終ページのみページフッターを表示にはどのようにすればいいでしょうか 宜しくお願い致します
- 締切済み
- tom2011
- Access(アクセス)
- 回答数7
- レポートフッターにレコードの数を表示したいのです
Windows10 Office2019です レポートで ページフッターにレコードの数を表示したいのですが テキストボックスのコントロールソースに="Count(*)しましたが エラーで表示しません 初心者ですいませんがご指南ください
- ベストアンサー
- tom2011
- Access(アクセス)
- 回答数5