Access（アクセス）(10ページ目)

データベースの作成や集計・精査などに役立つAccess。テーブルの組み方やクエリの設定方法などビジネスシーンでも活用できる内容が多いので知っておいて損はないでしょう。操作に困ったときはこちらで質問すると解決のヒントが見つかるかもしれません。

回答数

気になる

Accessフォームが入力できません。

お世話になっております。Access初心者です。すみませんが至急で作成したいDatabaseのため、どうか以下ご教示お願い致します。 ①質問内容複数のテーブルをクエリ「Q_入力フォーム」で結合し、そのクエリから作成した入力用のフォームがあるのですが全く動きません。リレーションシップの結合の種類や結び方が間違っているのかなと思いますが、素人なのでどこが違っているのか分かりません・・図を添付しているので、正しい設定を教えて頂けますでしょうか。 ●作りたいフォームお客様IDだけを入力すると、紐づけされた複数のテーブルのお客様情報が自動で表示され、そこに手入力でデータを入れて保存していきたい。フォームで保存したレコードは「T_入力用」のレコードに追加されていくようにしたい。 ●テーブルについてリレーションシップを結んでいる箇所は「データ型」「フィールドサイズ」「書式」を統一しています。データ型は全て「短いテキスト」にしています。【T_入力用】 →フォームで入力したレコードの保存をするところです。【T_入力用_入力者名】 →フォームでドロップボックスに紐づける選択肢をレコードに入れています。【T_顧客情報_日本支社】 →「T_入力用」テーブルIDと紐づけしたいマスタテーブルです。【T_顧客情報_海外本社】 →「T_入力用」テーブルIDと紐づけしたいマスタテーブルです。　ここで紐づけに使っているIDのデータは参照照合性不可・重複あり空白ありのIDデータです。【T_顧客情報_海外担当者】 →「T_入力用」テーブルIDと紐づけしたいマスタテーブルです。　ここで紐づけに使っているIDのデータは参照照合性不可・重複あり空白ありのIDデータです。 ●クエリについて以下テーブルを組み合わせて作っています。フォームを作成するために作りました。・T_入力用・T_顧客情報_日本支社・T_顧客情報_海外本社・T_顧客情報_海外担当者 ②質問内容出来上がったフォームに新たにテキストボックスを追加し、そこに別テーブルにあるフィールドを関数かなにかで表示させたいのですがうまくいかなかったので関数式をご教示いただけますでしょうか。すみませんが、何卒宜しくお願い致します。

質問日時: 2020/05/16 13:06 質問者: Y.T19900612

ベストアンサー

8

0
Access検索方法

70才の超おじんが　Accessに挑戦しております外注データーベースを作成　フィールド（得意先名）は得意先入力フォームより入力しておりますのでフィールドのデーター型は(数値型)になっております ”みようみまねで”で検索カードで　 Private Sub 検索ボタン_Click() Me.Filter = "得意先名 like'*" & 検索 & "*'" Me.FilterOn = True End Sub　で作成しましたが『検索』できません (数値型)では検索ができないのでしょうか

質問日時: 2020/05/16 11:57 質問者: 福島県初心者

ベストアンサー

1

0
エクセルのCOUNTIF関数で演算子<>（～以外）でデータ元が結合セル範囲だとカウントできない

A列とB列が結合されているデータがあります。 A1：B5には5つのデータがあり、仮に　　A　 B １　りんご２　りんご３　みかん４　りんご５　りんごという５つのデータで、 =COUNTIF(A1:B5,"<>りんご") とすると、結果は「1」となるかと予測したのですが、「6」となってしまいます。 =COUNTIF(A1:B5,"りんご")とすると「4」を返してくれます。 =COUNTIF(A1:A5,"<>りんご")とすると「1」を返してくれます。なぜこのようになるのか、どなたか教えていただけませんでしょうか？

質問日時: 2020/05/13 19:54 質問者: chibitajun

ベストアンサー

2

0
アクセス2007でレコード抽出のvbaを簡潔に書きたい

アクセス2007で、分割フォームにて、以下のようなコードを搭載したボタン(抽出)を作製しています。 private sub 抽出_Click() Dim strFilter as string strFilter = "(" If ka1.Value = True Then strFilter = strFilter & "ka = 1 or " If ka2.Value = True Then strFilter = strFilter & "ka = 2 or " If ka3.Value = True Then strFilter = strFilter & "ka = 3 or " If ka4.Value = True Then strFilter = strFilter & "ka = 4 or " If ka5.Value = True Then strFilter = strFilter & "ka = 5 or " strFilter = Left(strFilter, Len(strFilter) - 3) & ") and ( " If kb1.Value = True Then strFilter = strFilter & "kb = 1 or " If kb2.Value = True Then strFilter = strFilter & "kb = 2 or " If kb3.Value = True Then strFilter = strFilter & "kb = 3 or " If kb4.Value = True Then strFilter = strFilter & "kb = 4 or " If kb5.Value = True Then strFilter = strFilter & "kb = 5 or " strFilter = Left(strFilter, Len(strFilter) - 3) & ") " Me.Filter = strFilter Me.FilterOn = True End sub これを For i = 1 to 5 で簡略化することは可能でしょうか？チェックボックスka1～ka5、kb1～kb5について、 ka1、kb2がチェックされたらフィールドkaが１でフィールドkbが２のレコードを、 ka1,ka2、kb1,kb2がチェックされたらフィールドkaが1 or 2でフィールドkbが1 or 2のレコードを、抽出するようにしていますが、実際はチェックボックス・フィールドは kc、kd、ke、、、、と続いていて、コードがかなり長くなってしまい、そのまま書いたらエラー（プロパティの設定値が長すぎます）になってしまいました。もしくは、ka、kb、、、を文字変数にした方がよいのでしょうか？

質問日時: 2020/05/11 16:43 質問者: takitaki168

ベストアンサー

4

0
Access コマンドボタンの色の件

Accessのコマンドボタンの色の事で教えてください。当方、Access2016を使用していますが、デフォルトのボタンの色は青色です。ただ、できれば、Access2010以前のデフォルト色（質感のあるグレーの色）に色を変更したいと考えています。その際、どのような色コードを使えば上記色を再現できるかを教えてください。よろしくお願いします。

質問日時: 2020/05/08 20:59 質問者: mame1216

ベストアンサー

1

1
Access SQLで２項目を比較し連番IDを付けれますか？

初めて質問させていただきます。質問不足などありましたらごめんなさい。郵便番号と電話番号項目比較し下記のようなIDを付けたい。同じ郵便番号に同じIDが付与される郵便番号は違うが電話番号が同じレコードが他にあるものにも同じIDを付与郵便番号　　　　電話番号　　　ID 〒123-4567 090-0000-0000 　1 (同じ) 〒123-4567 090-0000-0000 　1 (同じ) 〒123-4567 090-0000-1234 　1 (同じ) 〒001-0001 090-0000-1234 　1 (同じ) 〒001-1111 090-0000-1234 　1 (同じ) 〒333-3333 090-0000-3333 　2 (違う) 上記の結果が返るSQLをどなたか教えてくれませんでしょうか。

質問日時: 2020/05/06 22:26 質問者: おれんじ7777

解決済

1

0
データベースソフト「アクセス」のプログラムで悩んでいます。

アクセスで15年ぶりに設計作業に携わっています。その中で設計の仕方に問題があるのか、データが取得できないため困っています。レポートに複数のテキストボックスを置き、レポート全体のデータソースは”売上情報”という名のテーブルからの選択クエリー[q_売上情報]としています。問題なのは、あるテキストボックスに表示させたい情報が、クエリーのデータの中で、あるフィールドの一部の情報だけとなる事です。具体的には下記のとおりです。レポートの①テキストは[q_売上情報]の[事業所]フィールドのデータが”1”で且つ[商品]フィールドのすべての条件の際の、[売上金額]フィールドのデータを集計させて表示させたい。レポートの②テキストは[q_売上情報]の[事業所]フィールドのデータが”null”で且つ[商品]フィールドのすべての条件の際の、[売上金額]フィールドのデータを集計させて表示させたい。レポートの③テキストは[q_売上情報]の[事業所]フィールドのすべてのデータで且つ[商品]フィールドのデータが”0”の際の、[売上金額]フィールドのデータを集計させて表示させたい。レポートの④テキストは[q_売上情報]の[清算日]フィールドから抽出した日付データを表示させたい。最終的にレポートには縦列が日付で、横列に左から④①②③の順に並ばせて、日付ごとの売上データを表示させて完成、です。各テキストボックスのデータソースにＳＱＬ分を書き込んで表示させようとしましたが、データが一位に取れないからなのか（？）テキストのデータがすべて「#Name?」となってしまいます。そもそも設計の仕方に問題があるのではとも思いますが、解決策が見当たりません。どなたかお教えただけませんか？

質問日時: 2020/04/28 12:38 質問者: suzutaro0820

解決済

1

0
アクセスで、テーブル左列の文字がしおとあれば、その右列に 1 が入力されるようにしたいです。

アクセスで、テーブル左列の文字が　しお　とあれば、その右列に　1　が入力されるようにしたいです。具体的に添付ファイルのデータを例に説明します。材料の列に、しお　とあれば、結果の列に　1　が自動的にでるようにしたいです。結果の列に、どのような関数をいれたらよいか、教えて下さい。よろしくお願いします。

質問日時: 2020/04/21 11:43 質問者: goseinaito

解決済

1

0
アクセス2010で、チェックボックスを用いた検索を、複数条件（AND）で行いたいです。フィールド「

アクセス2010で、チェックボックスを用いた検索を、複数条件（AND）で行いたいです。フィールド「個数」に、1~5いずれかの数値が入力されて、フィールド「単位」に1~5いずれかの数値が入力されたレコードがあります。検索フォームにチェックボックス５つを２セット（名前はko1からko5までと、ta1からta2まで）を作製して、 co1とta1がチェックされた時は「個数」が1かつ、「単位」が1のレコードを、 ck1、ck2とta3、ta4がチェックされた時は「個数」が１または２かつ、「単位」が3または4のレコードを表示するのようなコードを書きたいのですが、うまくできません。教えていただけませんか。フィールドが一つの場合は、こちらで教えていただいたのですが、、このようなフィールド多数の場合は、非連結のチェックボックスは、良くないでしょうか。

質問日時: 2020/04/20 13:26 質問者: takitaki168

ベストアンサー

4

0
アクセスでチェックボックスで検索

アクセス2010を使用していて、チェックボックスを用いた検索を行いたいです。フィールド「個数」に、1~5いずれかの数値が入力されたレコードがあります。検索フォームに非連結のチェックボックスを５つ（名前はck1からck5まで）を作製して、 ck1だけがチェックされた時は「個数」が1のレコードを、 ck1とck2がチェックされた時は「個数」が１のレコードと２のレコードを表示するのようなコードを書きたいのですが、わからず困っております。おしえていただけませんか

質問日時: 2020/04/17 17:17 質問者: takitaki168

ベストアンサー

1

0
Accessの使い方に関してご質問です。

AとBのフィールドがあるとします。 Aのフィールド1に入力されているコードで、Bのフィールド1に同一のコードがあった場合のみ、Aのフィールド2にその同一コードがあるBのフィールド1 のとなりのフィールド2の数字を表示させるにはどうしたらいいのでしょうか？うまく説明が出来ず申し訳ないです。

質問日時: 2020/04/16 00:38 質問者: あんこばたー

ベストアンサー

1

2
Accessで同じ文字の一列を追加する方法

これまでエクセルで会員ID、付与ポインから成るテキストファイルにそのイベントごとに振られるイベントIDを貼り付けていました。ある日のイベントIDは別の日のイベントIDとは違っていますリストはイベント単位で管理されているため同じイベントIDをコピペでやっていました。今回ついにこの作業で100万人以上の人に同一のイベントIDを貼り付ける作業が発生します 100万を超えるとエクセルでは作業ができず、これまでの方法が使えませんそこでAcccesを使えばその作業が100万件以上でもできるというお話を聞きました今手元には100万人以上の会員IDと付与ポインののリストがありますここにイベントID（すべて同じイベントID）をつけたいのですがそのAccessでのやり方を教えて下さいよろしくお願いたします

質問日時: 2020/04/15 01:20 質問者: 0422542177

ベストアンサー

1

0
[Access] パススルークエリーで実行すると遅い

在庫計算をするためのストアドプロシージャを作っています。 Microsoft SQL Server Management Studioで実行すると1秒もかからないのですが、 Microsoft Access(Office 365)のパススルークエリーで実行すると7秒程度かかってしまいます。どちらも　exec ストアドプロシージャ名(引数1, 引数2...) で実行しています。他にもいくつかストアドプロシージャを作っているのですが、他の分はAccess側で実行しても遅くなりません。確認すべきところがありましたらご教示ください。よろしくお願いいたします。

質問日時: 2020/04/13 21:05 質問者: MIKOTOKANA

解決済

1

0
AccessのDMax関数の複数条件式に関して

Dmax関数に関してですが、現在、以下の式で「コード」毎の最大日付を上手く取り出せています。 DMax("日付","T_取引","日付 < #" & [日付] & "# and コード = " & [コード]) 今回、数値型の「コード」ではなくテキスト型の「取引先名」毎の最大日付を取り出したいのですが、以下の式で上手くいきません。正解を教えて頂けないでしょうか？どうぞよろしくお願い致します。 DMax("日付","T_取引","日付 < #" & [日付] & "# and 取引先名 = '" & 取引先名 &"'")

質問日時: 2020/04/13 15:46 質問者: ag5

ベストアンサー

3

0
複数のフォームを１つのフォームにまとめて表示する方法

複数あるフォームを１つのフォームにまとめて表示させる方法はございますでしょうか。 access初心者です。例） A B C D という４つのフォームがあるとして、 EというフォームにA～Dのフォームをまとめて表示させたいです。そのようなことは可能なのでしょうか。可能であれば方法をご教授いただければと存じます。よろしくお願いいたします。

質問日時: 2020/04/10 19:51 質問者: ヒトシ31

解決済

1

0
Access クエリ実行が急に非常に遅くなりました。

会社の顧客管理システムをAccessで作って共有ファイルとして社員それぞれのPCで使用しています。環境はwindows10 Access2016です。 Accessの起動は問題なくすぐ起動しますが、クエリを実行すると数分単位かかります。特に何か設定したなどの思い当たる事はありませんが、急にとても遅くなりました。他のPCでは問題ないため、私のPC個別の問題かと思います。 officeの修復も行いましたが変化ありません。どこか確認する事や、設定等アドバイスいただけませんでしょうか。

質問日時: 2020/04/03 11:08 質問者: 104949213

解決済

3

0
accessのクエリについて教えて下さい

accessのクエリについて教えていただきたいです。売上実績、店舗一覧、分類一覧上記３つのデータを使って、各分類の店舗ごとの売上数値を出したいです。その際に、売上があった店舗だけでなく、売上がなかった店舗も出したいのですがうまくいきません。お知恵をお借りできないでしょうか。各テーブルの内容は下記の通りです。・売上実績（店名、商品、売上金額）・店舗一覧（店名、エリア）・分類一覧（分類名、商品）まず、選択クエリで　売上実績と分類一覧を選択し、各店舗の分類ごとの売上実績を出しました。（クエリ１）この状態では売上実績がある店舗のみしか抽出されないので選択クエリで上記のクエリ１と店舗一覧を選択し、店舗一覧にある店舗全レコードとクエリ1の店名で外部結合をしました（クエリ２）これで出てきたのが、各店舗の売上実績の下にどの分類も売っていない店舗一覧がくっついたものでした。この状態でエクスポートすると、分類Aの売上がある店舗、分類Bの売上がある店舗、何も売っていない店舗、のみになってしまい、分類Aは売っていないが分類Bは売っていない店舗というのが表示されず困っております。店舗が100店舗あったら、分類Aは店舗分の100行ある状態にしたいのです。（分類Aに実績があるないにかかわらず全店表示される状態）エクセルで集計表を用意してINDEX関数とMATCH関数を使って当て込んでいくことはできたのですが、データ量が大きすぎてPCが止まってしまうため、できればaccessで出したいと考えているのですが、どなたかお知恵を拝借いただけないでしょうか。よろしくお願い致します。

質問日時: 2020/03/25 18:42 質問者: pinokokko123

解決済

2

0
ジムのスタジオレッスンを予約するのに、決まった時間にアクセスして予約します。ただ、人数制限があるた

ジムのスタジオレッスンを予約するのに、決まった時間にアクセスして予約します。ただ、人数制限があるために、早くアクセスできた人から順番となります。これを、自動で送信して順番をとってる人がいて、中中順番を取る事ができません。自動で送信するやり方を教えてください。

質問日時: 2020/03/23 10:24 質問者: ステッパー

解決済

1

0
Accessのフォルダ作成に関して ACCESS初心者で、行き詰っています。どなたか解決策を教えて

Accessのフォルダ作成に関して ACCESS初心者で、行き詰っています。どなたか解決策を教えて頂けないでしょうか。 ACCESSでフォームにボタンを配置し、そのボタンを押すと ACCESSファイルがある場所に"資料"という名称のフォルダを作成できるようにしました。また、すでにファイルが存在する場合は"既にフォルダが存在している可能性があります。"とメッセージを表示する様にしています。この状態では上手くフォルダ作成まで確認出来ています。 Private Sub フォルダ作成ボタン_Click() On Error GoTo ErrExit MkDir (Application.CurrentProject.Path & "\資料") Exit Sub ErrExit: MsgBox "既にフォルダが存在している可能性があります。" End Sub 追加で作成するフォルダを"資料"のみではなく、"資料\メール文書"と言うように次の階層まで作成したく、以下の様に変更しましたが、エラーメッセージが出て上手くいきません。どなたか教えて頂けないでしょうか。 Private Sub フォルダ作成ボタン_Click() On Error GoTo ErrExit MkDir (Application.CurrentProject.Path & "\資料\メール文章") Exit Sub ErrExit: MsgBox "既にフォルダが存在している可能性があります。"

質問日時: 2020/03/12 14:03 質問者: ふのの

ベストアンサー

3

0
Access 無操作の場合、自動で閉じたいです。

お世話になっております。 Accessが無操作状態が5秒あったらフォームを閉じるようにしたいと考え、公開されているコードを参考に下記のようにしました。：：：：：：：：：：：：：：：：：：：：：：：：：：：：：：：：：：：：： 1　　Option Compare Database 2　　Option Explicit 3 4　　Dim sigStart1 As Single 5　　Dim sigStart2 As Single ------------------------------------------------------------------------------------ 6　　Private Sub Form_Load() 7 8　　TimerInterval = 1000 9　　sigStart1 = Timer 10 11　 End Sub ------------------------------------------------------------------------------------ 12　 Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) 13 14　 sigStart2 = Timer 15 16　 End Sub ------------------------------------------------------------------------------------- 17 　Private Sub Form_Timer() 18 19　 Dim sigStop As Single 20　 Dim IngTimer As Long 21 22　 Me.KeyPreview = True 23　 sigStop = Timer 24 25　　　If sigStart2 <> 0 Then 26　　　　　IngTimer = Fix(sigStop - sigStart2) 27　　　Else 28　　　　　IngTimer = Fix(sigStop - sigStart1) 29　　　End If 30 31　　　If IngTimer >= 5 Then 32　　　　　DoCmd.Close 33　　　End If 34 35　 End Sub ------------------------------------------------------------------------------------- 上記のコードで閉じることはできるのですが、警告なしに急に閉じてしまうため、警告のメッセージを出せるように改良したいです。そこで31～33行目を次のようにしました。 :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: If InfTimer >=5 Then Dim res As vbMegBoxResult res = MsgBoxres("作業を継続しますか？", vbYesNo + vbInformation) If res = vbYes Then MsgBox "OK" Else DoCmd.Close End If End If ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: 警告は出ますが、メッセージボックスのYesNoを選択が必要になり、目的から外れてしまいました。また、Yseを選択するとそれ以降連続してメッセージボックスが表示されてしまいます。自分なりに調べ「Popup」を使ってみましたが、うまく出来ず断念しました。現状説明が大変長くなってしまい申し訳ありませんが、教えていただきたいのは下記の2点です。 ①　メッセージボックスのように警告を出し、かつ無操作状態が継続した場合は、　　自動でフォームを閉じる方法 ②　①の警告で「Yes（継続）」を選択した場合、また無操作状態が継続するまで　　メッセージボックスがでない方法お手数をおかけしますが、何卒ご教示のほどよろしくお願い申し上げます。

質問日時: 2020/03/10 12:41 質問者: accesshelpme

ベストアンサー

4

0
投函を記録する簡易データベースを作成したいのですが…

社内業務で、自分の部署より「郵送」か「お渡ししているか」を記録しているものがあるのですが問い合わせが予想以上に多く、業務に支障をきたすのではないかと危惧しています。予算もあまりないため、excelやaccessで簡易データベースのようなものを作成して問い合わせに即時対応できるようにしたいのですが、おすすめの方法はありますでしょうか。具体的な内容を言えば、取引先に対して「直接お渡ししに行った」「郵送した」のどちらかを記録して、追加で郵送したもの等を備考にでも入れられればなという感じなのですが、非常に数が多く、今の人数でなんとかしろという体制が変わらず…山積みになってしまっています例えばバーコードを印刷してリーダーで読み取るみたいな簡単なものだと最高なのですが難しいでしょうか

質問日時: 2020/03/07 10:37 質問者: やんすけ19

ベストアンサー

4

0
ACCESSクエリで複数条件での最新情報の抽出について

製造工場での各工程で作業記録を行い、最新の生産状況をACCESSで管理したいと考えております。製造番号毎に約10工程に分かれており、現在、それぞれの工程で作業内容を記録しています。抽出条件として生産終了が空白⇒生産中なので除外、中断完了⇒中断は除外、正常再作業⇒再作業は除外、完成フラグが１⇒全ての工程が完了し完成したので該当の製造番号は除外、というものの中で製造番号毎の生産終了が最新のものだけを抽出したいという複雑な条件での要望です。工場内の最新の仕掛状況を把握したいという内容になります。生産記録のテーブル ID 製造番号　　　生産開始　　　　　生産終了工程番号中断完了通常再作業完成フラグ 2798　1900840A08 2019/12/14 10:48 2019/12/14 12:01 554 完了通常 ⇒完成したので除外 2799 　1900892A01 2019/12/22 15:31 2019/12/22 16:30 401 完了通常 2800 　1900840A08 2019/12/24 14:45 2019/12/24 15:59 538 完了通常 ⇒完成したので除外 2801　1900852A08 2019/12/24 15:30 2019/12/24 16:15 131 完了通常 2802 　1900840A08 2019/12/25 8:46 2019/12/25 10:00 532 完了通常 1 ⇒完成したので除外 2803 　1900852A08 2019/12/25 16:57 2019/12/25 17:19 101 完了通常 2804 　1900852A08 2019/12/26 10:00 　　　　　　　　108 通常 ⇒生産中なので除外 2805 　1900892A01 2019/12/27 17:14 2019/12/27 18:14 408 中断通常 ⇒中断なので除外 2806 　1900892A01 2019/12/28 16:16 2019/12/28 16:29 467 完了再作業 ⇒再作業なので除外求めたい結果としてIDが2799と2803の2つのレコードを抽出になります。 SQLもVBAも多少程度のスキルなのでやり方をご提示頂ければ勉強しなが理解したいと思います。何卒よろしくお願い申し上げます。

質問日時: 2020/03/01 00:45 質問者: YASU1974

ベストアンサー

3

0
Accessでの時間別集計について

以前別サイトで質問をさせていただきましたが解決が出来なかったため、質問させていただきます。 ACCESSでのデータ抽出の質問です。下記のような構造のテーブルがあり、そこから日付別の時間帯毎の個数を集計したいと考えています。ここで日を跨ぐ場合の集計方法が分からずに困っています。考え方をしては「9:00～翌3:00」を1日として「0:00～3:00」の時間帯のデータ数は前日の日付の欄に表示させたいです。 ■履歴テーブル・日付（日付/時刻型）・項目（短いテキスト） ■時間帯・時間帯_1…9:00～12:00 ・時間帯_2…12:00～17:00 ・時間帯_3…17:00～22:00 ・時間帯_4…22:00～3:00 ■取得したい結果日付｜項目｜時間帯_1｜時間帯_2｜時間帯_3｜時間帯_4｜－－－－－－－－－－－－－－－－－－－－－－－－－－－－ 2020/01/01｜販売｜ 30 ｜ 20 ｜ 10 ｜ 10 ｜ 2020/01/02｜販売｜ 10 ｜ 10 ｜ 10 ｜ 10 ｜ 2020/01/02｜買取｜ 10 ｜ 10 ｜ 10 ｜ 10 ｜ 2020/01/03｜販売｜ 20 ｜ 30 ｜ 40 ｜ 50 ｜ 2020/01/03｜買取｜ 10 ｜ 10 ｜ 10 ｜ 10 ｜・・・別サイトで教えていただいたヒントを参考に select 日付, 項目, sum( iif(TIMEVALUE([日付])>=#09:00:00# and TIMEVALUE([日付])<=#12:00:00#, 1, 0) ) as [時間帯_1], sum( iif(TIMEVALUE([日付])>=#12:00:00# and TIMEVALUE([日付])<=#17:00:00#, 1, 0) ) as [時間帯_2], sum( iif(TIMEVALUE([日付])>=#17:00:00# and TIMEVALUE([日付])<=#22:00:00#, 1, 0) ) as [時間帯_3], sum( iif(TIMEVALUE([日付])>=#22:00:00# or TIMEVALUE([日付])<=#03:00:00#, 1, 0) ) as [時間帯_4] where [日付] between #2020/01/01# and #2020/01/31# group by format([日付],"yyyy/mm/dd"), 項目上記のように作成をしました。ここから「0:00～3:00」の時間帯のデータ数は前日の日付の欄に表示させるため group by の部分を group by format(iif(TIMEVALUE([日付])<=#5:00:00#,dateadd("d",-1.[日付]),[日付]),''yyyy/mm/dd) という風に変更しましたが、構文エラーとなります。どのようにSQLを書けば、思っているようなデータを作ることが出来るでしょうか。ご教授よろしくお願い致します。

質問日時: 2020/02/29 17:54 質問者: mokomoko2016

ベストアンサー

1

1
ACCESS 特定の月間の抽出について

お世話になります。 ACCESS2016について質問させてください。過去５年分のデータを納めたクエリがあります。ここから年度は関係なく、１月～3月分と、四半期、上期、下期を抽出したクエリを作成したいです。抽出するフィールド:　[年月日] また、年度はこれからも増えるため年数を指定しないようにしたいです。 Between (month[年月日])=1 and month[年月日])=3)と抽出条件にしましたが、何も表示されませんでした。どうかアドバイスをお願い致します。

質問日時: 2020/02/25 08:22 質問者: Sararan007

ベストアンサー

1

0
エクセル入力したデータを抜き取り、違う場所に移動し溜めていく方法を御教授願います。

エクセル入力したデータを抜き取り、別の場所に溜めていく方法についてＢ5：Ｈ5に入力したデータを抜き取った後、Ｂ10：Ｈ10に書出しされ、その後Ｂ5：Ｈ5のデータが消去されます。ここまではＯＫですが、次に、またＢ5：Ｈ5に入力し、データを抜き取った後、前の抜取ってデータの下段のＢ11：Ｈ11に書出しされ、その後Ｂ5：Ｈ5のデータが消去されるこの繰り返し書出し保存Ｂ12：Ｈ12、Ｂ13：Ｈ13、、、、、が出来るマクロの御教授をお願いします。 Sub 登録() Application.ScreenUpdating = False Dim n As Long n = Sheets("横抜き").Cells(Rows.Count, "B").End(xlUp).Row + 1 ' Range("B5:H5").Select Selection.Copy Range("B" & n).Select Selection.PasteSpecial Paste:=xlPasteValues Range("B5:H5").ClearContents ' Application.ScreenUpdating = True End Sub

質問日時: 2020/02/24 23:33 質問者: yu218shi316

ベストアンサー

2

0
access テーブル結合

共通キーを持った2つのテーブルがあり、単純に結合して新しいテーブルを作成したいです。フィールドは全て保持したいです。初心者向けに、手順教えて頂けないでしょうか。よろしくお願いいたします。

質問日時: 2020/02/24 11:04 質問者: tomi1196

解決済

1

0
access テーブル一覧エクスポート

テーブルのフィールド名、データ型などをエクスポートしたいと考えてます。簡単なフリーソフトなど有れば教えて頂けないでしょうか？もしくはaccessの基本機能にあるのでしょうか？よろしくお願いいたします。

質問日時: 2020/02/24 10:53 質問者: tomi1196

解決済

1

0
アクセスが拒否されましたこのページを表示する権限がありません。どーしたらaccess出来ますか

アクセスが拒否されましたこのページを表示する権限がありません。どーしたらaccess出来ますか

質問日時: 2020/02/15 20:32 質問者: アルミニウス

解決済

2

0
Access2019でフォームから入力する時「引数が無効です」と警告が出ます。

データベースをAccess2019で作成しています。テーブルに入力や修正する時は、それぞれのフォームから行っていますが、はじめに必ず警告「引数が無効です」が出ます。Enterで消してから入力していますが、どうすれば警告が消えるでしょうか。「できるAccess」にもサポートを求めましたが回答いただけません。となたか教えて下さい。

質問日時: 2020/02/13 15:47 質問者: akimi370498

ベストアンサー

1

0
Access2016 直近の注文のメモを見たい

お世話になります。 Access2016で作成しております。以下のような注文テーブルがあります。前回のメモの欄に前回のメモを表示させたいのです。例えば、NO5なら、「発送なし（No3のメモ）」例えば、NO3なら、「6日発送（No1のメモ）」アルゴリズムとしては、以下の形でいけると思うですが、 Access,SQLでどのように作成すればいいのかわかりません。ご存じの方教えていただけないでしょうか。 ①注文ごとに自分のNOを取得する。 ②自分と同じ商品番号でNOが一番大きい注文のメモを取得する ③②で取得したのを自分の前回のメモに表示する ------------------------------------- NO 注文番号　商品ID メモ前回のメモ 1 A1200 111 6日発送 2 B1201 222 10日発送 3 A1502 111 発送なし 4 A12A3 333 ー 5 A12B0 111 エラー ------------------------------------- ※Noが小さいほうが昔の注文、大きい方が最新の注文 ※注文番号はユニーク何卒よろしくお願い申し上げます。

質問日時: 2020/02/10 11:29 質問者: kgyqk433

解決済

1

0
accessのレポートを20行固定にする方法

accessのレポートで20行固定にしたくて、悪戦苦闘しています。あちこちで調べているのですが、うまく出来ません。抽出された名簿データをレポートに出すのですが 20行固定で全て出したいのですが出せません。 35行の名簿を出すと１ページ目は20行出てくるのですが 2ページ目は15行まではでててくるのですが以下は空白なってしまいます。ページ内できっちり20行の罫線を出したいのですがどうすれば良いのでしょうか？添付の画像のようにレポートは作っています。テーブルのレコードが一行ずつ詳細部に表示され２０行目で次のページに行くように設計したのですが、２ページ目で空白部分には罫線だけを入れたいのですがどうすれば良いでしょうか？グループheaderを作る必要も無いため他のサイトの記述が参考にならなく困っています。ご教授よろしくお願いいたしますm(__)m

質問日時: 2020/02/06 20:11 質問者: ossannsan

解決済

4

0
accessクエリで文字を結合とCSV書き出し

お世話になります。早速ですがaccessのクエリについてできるか分からないので教えていただきたいです。やりたいことはエクセルにあるデータを取り込みクエリを使って意図する列順にデータを加工し別なソフトに取り込めるようにしたいと思っています。テーブルに取り込むデータには数字など入っているのですがクエリで【A】フィールド　数値のみ　空白なしですべて入っています。 ○○123▲▲という用に入れる事は出来ますでしょうか？〇や▲は文字です。〇は定期的に変更が必要な文字列です。 ▲は固定文字です。【B】フィールド　数値のみ　空白あり ◆10という感じにできますでしょうか？ ◆は固定の文字です。このフィールドに数値が入っているところだけ文字列を結合させたいと思っています。こんなことできるのでしょうか？クエリで整理したデータをテーブルに出し、CSVで書き出したいと思っています。どうかご教授いただきますようお願いいたします。

質問日時: 2020/01/31 10:13 質問者: ossannsan

解決済

1

1
ACCESS への複数ファイルのインポートマクロ

こんにちは、ACCESSへのエクセルデータのインポートのマクロについて教えて頂けませんか？大量のファイルがあり、どれも同じ形式、同じフィールド名で保存してあります（xlsx形式）これを自動でインポートするマクロはどのようなものになるでしょうか？ファイル名は連番になっておらず、同じフォルダ内にあります。また、テーブル名はマクロ内で随時指定したいと思っています。 aaa.xlsxをインポート定義を反映させテーブル名を指定してインポート bbb.xlsxをインポート定義を反映させテーブル名を指定してインポート・・・・みたいな感じです。詳しい方教えて頂けませんでしょうか。よろしくお願いいたします。

質問日時: 2020/01/29 01:00 質問者: gekikaraou

解決済

7

0
クエリのデータから複数条件抽出後、印刷プレビューをしたい

お世話になっております。早速ですが、accessで顧客情報を入力しています。入力用フォーム、テーブルを作成しました。このテーブルをもとにクエリを作成しています。このクエリから条件に合ったものを抽出して、一覧表を印刷したいと思っています。一覧表用のレポートは作成できています。今、行き詰っているのは添付している抽出用のフォームから印刷プレビューをしたいのですがうまくいきません。１、データの抽出２、表題をレポートに反映です。上記２点です。抽出用キーワードは２種類です。＜日付＞　ｇｇｇｇ/ｇｇ/ｇｇという定型入力＜区分＞　居住者、非居住者のいずれかを入力して抽出（コンボボックスを使用したほうがいいのか悩んでいます。）２つの条件から抽出したものを印刷プレビューをしたいと思っています。あと、一覧表の表題を抽出画面のところで入力したものがそのまま反映されるようにしたいのですが、どのようにしたらいいでしょうか？ VBAなど全くわからないので自分でくみ上げることができません。欲を言えば抽出されたデータから各レコードの金額から金種一覧表も作れたらいいなと思っています。ご教授ください。よろしくお願いいたします。

質問日時: 2020/01/24 10:21 質問者: ossannsan

ベストアンサー

3

1
日計データの月間累計ファイルを作成

月別の日ごとの数件のデータを該当月のファイルに書き込む 1/1に3件 1/5に5件累計ファイルに計8件のデータを作成する

質問日時: 2020/01/24 09:39 質問者: 昭介

解決済

1

0
Accessでの抽出方法で悩んでいます。

はじめまして。 MS ACCESSわからないことがあるので、皆さんのお知恵をお借りしたく投稿しました。今タイムカードを作っています。テーブル T-社員マスター ID 名前 T-勤怠データ社員ID 日付出勤時間退勤時間クエリ Q-管理＆編集 T-勤怠データ社員ID T-社員マスター名前 T-勤怠データ日付 T-勤怠データ出勤時間 T-勤怠データ退勤時間年 Year([日付]) 月 month([日付]) このような感じであり、一覧で見るためのフォームを非連結テキストボックス名前年月で作り抽出を行っているのですが名前・年・月のすべて入力すれば抽出されるのですが、どれか一つでも、条件を入力していなければ何も表示がされないため、これをどれか一つだけ入力した場合は、それに合うデータだけ表示できるように抽出文を書きたいのですが、どのようにすれば抽出できるのかわかりません。教えていただけると非常に助かります。よろしくお願いします。

質問日時: 2020/01/23 16:34 質問者: Blehiro

ベストアンサー

4

0
姉妹２人のパソコンで、アクセス２０１９を使う事は出来ますか？

２台のWindowsPC で使えると書いてある、ACCESS2019のライセンスカード？みたいなものを購入しました。そして、自分のパソコン（１台）のみ、インストールが完了した状態です。もう１台分を妹のパソコンにインストールする事は出来ますか？その場合は、自分のアカウントやパスワードを使用するのでしょうか？　それとも、妹のアカウントやパスワードを使用するのでしょうか？お分かりの方、いらっしゃいましたら、よろしくお願いいたします。

質問日時: 2020/01/12 15:50 質問者: アルムの森の木よ

ベストアンサー

1

0
Access2000でのShift有効無効をAccess2007に変更したらデバックエラーが出る

初めまして。 Access初心者でとても困っています。 Access2000で他の入力者が裏をいじれないようにShiftキーの設定をしていました。ネットで教えて頂いた構文で動いていたのですが Public Function ShiftkeyChange(st As Boolean) Dim DB As Database Dim PRO As Property Dim BLN As Boolean Set DB = CurrentDb BLN = False For Each PRO In DB.Properties If PRO.Name = "AllowBypassKey" Then PRO = st BLN = True Exit For End If Next PRO If BLN = False Then Set PRO = DB.CreateProperty("AllowBypassKey", dbBoolean, st) DB.Properties.Append PRO End If Set PRO = Nothing DB.Close Set DB = Nothing End Function Access2007に変更したら型が一致しませんと出て動かなくなりました。 DAOとADOの違いだということまではわかったのですが、参照設定でMicrosoft Offic 12.0 Access database engine object をチェック、Microsoft Visual Basic for Applications Extensibility5.3をチェックしています。構文で直さないといけない箇所が分かりません。型式が一致しないとでるのはFor Each PRO In DB.Propertiesです。教えて頂きたいです。。。とても困っています。

質問日時: 2020/01/09 10:14 質問者: ゆかくる

ベストアンサー

3

2
Access フォーム条件付き書式自分の設定した色がわからなくなってしまうのはしかたないのですか

Accessのフォームで、テキストボックスに、条件付き書式を設定します。例えば、[フィールド1]　に　"あああ" という文字列が含まれていたら、そのフィールドの背景色とフォントの色を変えるということにしましょう。（下の画像の例では、青っぽい背景色と、オレンジ色っぽいフォントの色）設定すれば確かに設定した通りの動作をします。しかし、後になってこの条件付き書式の設定を見ると、背景色は、カラーパレットの一番上の「自動」という白い四角い部分がピンクっぽい色で囲われているだけで、自分がどの色を選択したのかわからなくなってしまいます。また、フォントの色は、RGBが（64,64,64）となっています。もちろん、プレビューというところを見れば大体の色はわかりますが、正確にどの色を選んだのかはわからなくなってしまいます。これは致し方ないことなのでしょうか。（当方のAccessは２０１３）

質問日時: 2020/01/08 03:23 質問者: mm326

解決済

1

0
ACCESSのサブクエリについて

ACCESSのサブクエリについて地域 ID 収入東京 1 100 東京 2 50 東京 3 50 東京 4 60 大阪 1 120 大阪 2 80 大阪 3 20 札幌 1 90 札幌 2 70 札幌 3 60 札幌 4 50 ACCESSのサブクエリにについて教えてください。 in(select 地域 from テーブル1 where 収入>=100) この条件で、IDの１が、100以上を追加したいのです。検索結果が、東京 1 100 東京 2 50 東京 3 50 東京 4 60 大阪 1 120 大阪 2 80 大阪 3 20 こんな結果にしたいのですが、どのように記載したらいいのでしょうか？お手数ですが、ご教示してください。よろしくお願いします。

質問日時: 2020/01/07 16:44 質問者: naonaokeikei

ベストアンサー

1

0
ACCESS クエリについて

時間変更: TimeSerial(0,0,[時間])という数式で、秒数を変更しています。時間のフィールドは数値型です。 TimeSerial(0,0,[32700])⇒9:05:00 TimeSerial(0,0,[32800])　#Num! 32800になった瞬間にエラーになるのですが、なぜ、エラーになるのかわかりませんお手数ですが、エラーの理由をご教示していただけないでしょうか？

質問日時: 2020/01/04 14:29 質問者: naonaokeikei

ベストアンサー

2

0
ハイパーリンクのインポートについて

エクセルのデータをアクセスに取り込むに当たって、HYPERLINK関数のフィールドをアクセスのHYPERLINK形式でインポートしたのですが、表示文字列のみインポートされてジャンプできません。エクセル：＝HYPERLINK（”Ａ”,”Ｂ”）アクセス：表示文字列：Ｂ　アドレス：Ａとなるようにインポートするにはどうすれはよいのでしょうか。よろしくお願いします。

質問日時: 2019/12/27 11:18 質問者: eHiro401

解決済

2

1
ACCESS VBA INPUTBOXの質問です。

Private Sub コマンド6_Click() Dim pw As Variant pw = Application.InputBox(Prompt:="開発者用設定のためパスワードを記入してください",Type:=2) If pw <> "abcdefg" Then MsgBox "PWが違います" Exit Sub Else DoCmd.OpenForm "F_入力" End If End Sub メゾット、またはデータメンバーが見つかりませんとなります。 Excelなら、 Dim pw As Variant⇒ Dim pw As Rangeでできるとおもうのですが、 ACCESSは、Typeの設定ができるのでしょうか？お手数ですが、ご教示をおねがいします。

質問日時: 2019/12/25 14:58 質問者: naonaokeikei

ベストアンサー

3

0
Access においてデータベースに接続すると言った場合、vbaの画面の左側のウィンドウに出てくるテ

Access においてデータベースに接続すると言った場合、vbaの画面の左側のウィンドウに出てくるテーブルを扱うということで良いですか？何か他の場所にもデータベースがありますか？

質問日時: 2019/12/24 20:34 質問者: ynlgpGjt

ベストアンサー

1

0
アクセスでレコード内の最大値の顧客名を取得したいのですが

マイクロソフトアクセスでトラックの請求システムを作成しています ①得意先テーブルはID、顧客名、距離のフィールドです ②入力テーブルに行先CD１～10まであります。入力テーブルはトラックごとに入力します ①②からメインクエリを作成して行先IDを入力して１０個の行先から最大値(もっとも遠い)の距離を取得して金額を出すようにしています。ここまではできています（と言ってもどこかで聞いたのですが）その距離に該当する得意先を取得、表示することはできるでしょうか。下記SQL表示です ================== SELECT [メイン入力].ID, [メイン入力].日付, [メイン入力].便数, [メイン入力].車番, 車番.車種, [メイン入力].運転者ID, 社員.社員氏名, [メイン入力].助手ID, 社員_1.社員氏名, [車種] & [決定距離] AS 運賃CD, DLookUp("運賃","運賃テーブル","分類='" & [運賃CD] & "'") AS 運賃, Val([運賃]) AS VAL運賃, FNC(True,[得意先]![距離],[得意先_1]![距離],[得意先_2]![距離],[得意先_3]![距離],[得意先_4]![距離],[得意先_5]![距離],[得意先_6]![距離],[得意先_7]![距離],[得意先_8]![距離],[得意先_9]![距離],[得意先_10]![距離],[得意先_11]![距離],[得意先_12]![距離],[得意先_13]![距離],[得意先_14]![距離]) AS 最遠地距離, [メイン入力].経由キロ, [最遠地距離]+[経由キロ] AS 決定距離, [メイン入力].助手人数, IIf([助手人数]=0,0,DLookUp("助手割増料","助手","距離=" & [決定距離]))*[助手人数] AS 助手料金, [メイン入力].積み合せ, 積み合せ料金.積合割増料金, [メイン入力].[２階上げ], 二階上げ料金.二階上げ割増料金, [メイン入力].待機, 待機料金.待機料金, [メイン入力].休日, IIf([休日]=1,[運賃]*0.1,0) AS 休日割増運賃, [メイン入力].[フェリー], [フェリー]*1000 AS フェリー料金, [助手料金]+[積合割増料金]+[二階上げ割増料金]+[待機料金]+[休日割増運賃]+[フェリー料金] AS 付帯計, [VAL運賃]+[付帯計] AS [運賃+付帯計], [運賃+付帯計]+[その他料金] AS 請求額, [メイン入力].[その他], [メイン入力].[その他料金], [メイン入力].行先1, 得意先.略称, 得意先.距離, [メイン入力].行先2, 得意先_1.略称, 得意先_1.距離, [メイン入力].行先3, 得意先_2.略称, 得意先_2.距離, [メイン入力].行先4, 得意先_3.略称, 得意先_3.距離, [メイン入力].行先5, 得意先_4.略称, 得意先_4.距離, [メイン入力].行先6, 得意先_5.略称, 得意先_5.距離, [メイン入力].行先7, 得意先_6.略称, 得意先_6.距離, [メイン入力].行先8, 得意先_7.略称, 得意先_7.距離, [メイン入力].行先9, 得意先_8.略称, 得意先_8.距離, [メイン入力].行先10, 得意先_9.略称, 得意先_9.距離, [メイン入力].行先11, 得意先_10.略称, 得意先_10.距離, [メイン入力].行先12, 得意先_11.略称, 得意先_11.距離, [メイン入力].行先13, 得意先_12.略称, 得意先_12.距離, [メイン入力].行先14, 得意先_13.略称, 得意先_13.距離, [メイン入力].行先15, 得意先_14.略称, 得意先_14.距離, IIf([行先1]>0,1,0) AS 行先1判定, IIf([行先2]>0,1,0) AS 行先2判定, IIf([行先3]>0,1,0) AS 行先3判定, IIf([行先4]>0,1,0) AS 行先4判定, IIf([行先5]>0,1,0) AS 行先5判定, IIf([行先6]>0,1,0) AS 行先6判定, IIf([行先7]>0,1,0) AS 行先7判定, IIf([行先8]>0,1,0) AS 行先8判定, IIf([行先9]>0,1,0) AS 行先9判定, IIf([行先10]>0,1,0) AS 行先10判定, IIf([行先11]>0,1,0) AS 行先11判定, IIf([行先12]>0,1,0) AS 行先12判定, IIf([行先13]>0,1,0) AS 行先13判定, IIf([行先14]>0,1,0) AS 行先14判定, IIf([行先15]>0,1,0) AS 行先15判定, [行先1判定]+[行先2判定]+[行先3判定]+[行先4判定]+[行先5判定]+[行先6判定]+[行先7判定]+[行先8判定]+[行先9判定]+[行先10判定]+[行先11判定]+[行先12判定]+[行先13判定]+[行先14判定]+[行先15判定] AS 件数 FROM ((((((((((((((((((((メイン入力 INNER JOIN 車番 ON [メイン入力].車番 = 車番.車番) INNER JOIN 社員 ON [メイン入力].運転者ID = 社員.社員ｺｰﾄﾞ) LEFT JOIN 社員 AS 社員_1 ON [メイン入力].助手ID = 社員_1.社員ｺｰﾄﾞ) LEFT JOIN 得意先 ON [メイン入力].行先1 = 得意先.顧客番号) LEFT JOIN 得意先 AS 得意先_1 ON [メイン入力].行先2 = 得意先_1.顧客番号) LEFT JOIN 得意先 AS 得意先_2 ON [メイン入力].行先3 = 得意先_2.顧客番号) LEFT JOIN 得意先 AS 得意先_3 ON [メイン入力].行先4 = 得意先_3.顧客番号) LEFT JOIN 得意先 AS 得意先_4 ON [メイン入力].行先5 = 得意先_4.顧客番号) LEFT JOIN 得意先 AS 得意先_5 ON [メイン入力].行先6 = 得意先_5.顧客番号) LEFT JOIN 得意先 AS 得意先_6 ON [メイン入力].行先7 = 得意先_6.顧客番号) LEFT JOIN 得意先 AS 得意先_7 ON [メイン入力].行先8 = 得意先_7.顧客番号) LEFT JOIN 得意先 AS 得意先_8 ON [メイン入力].行先9 = 得意先_8.顧客番号) LEFT JOIN 得意先 AS 得意先_9 ON [メイン入力].行先10 = 得意先_9.顧客番号) LEFT JOIN 得意先 AS 得意先_10 ON [メイン入力].行先11 = 得意先_10.顧客番号) LEFT JOIN 得意先 AS 得意先_14 ON [メイン入力].行先15 = 得意先_14.顧客番号) LEFT JOIN 得意先 AS 得意先_13 ON [メイン入力].行先14 = 得意先_13.顧客番号) LEFT JOIN 得意先 AS 得意先_12 ON [メイン入力].行先13 = 得意先_12.顧客番号) LEFT JOIN 得意先 AS 得意先_11 ON [メイン入力].行先12 = 得意先_11.顧客番号) LEFT JOIN 積み合せ料金 ON [メイン入力].積み合せ = 積み合せ料金.積合件数) LEFT JOIN 二階上げ料金 ON [メイン入力].[２階上げ] = 二階上げ料金.[二階上げ件数]) LEFT JOIN 待機料金 ON [メイン入力].待機 = 待機料金.待機時間; ======================== よろしくお願いします。

質問日時: 2019/12/24 18:13 質問者: zulhiroiwa

解決済

2

0
アクセスでレコード内の最大値の顧客名を取得したいのですが

マイクロソフトアクセスでトラックの請求システムを作成しています ①得意先テーブルはID、顧客名、距離のフィールドです ②入力テーブルに行先CD１～10まであります。入力テーブルはトラックごとに入力します ①②からメインクエリを作成して行先IDを入力して１０個の行先から最大値(もっとも遠い)の距離を取得して金額を出すようにしています。ここまではできています（と言ってもどこかで聞いたのですが）その距離に該当する得意先を取得、表示することはできるでしょうか。よろしくお願いします。

質問日時: 2019/12/24 15:36 質問者: zulhiroiwa

解決済

1

0
Access2013で、CSV出力時にカンマ区切りがおかしくなり、文字化けが発生します

Access2013で、次の流れでデータを集計する仕組みを作っているのですが、なぜかランタイムでの別の環境になると、カンマ区切りがおかしくなり、文字化けが発生します。 ※数量の手前の「,」が「・」になります。 ※文字コードの関係か、商品名も文字化けします。いろいろと試したのですが、うまく行かず、八方塞がりの状況です。早めに解決できれば嬉しいです。お手数ですが、よろしくお願いいたします。 ■Accessの仕組み・元のCSVを集計、レイアウト変更し、別のCSVに出力（全てマクロで実行しています）１．CSVをAccessに取り込み２．クエリでレイアウト変更及びデータ集計３．CSVを別ファイルで出力 ■現象・Access2013が入っているWin７の開発環境では、問題なく動作します。・Win10のランタイム環境になると、必ず現象が発生します。・現象のイメージ　＞元データ商品コード,商品名,数量,規格・型番,仕入日,仕入先ｺｰﾄﾞ,仕入単価,仕入金額,税率,伝票番号 102,ホルモン　冷凍,1.021,2021.10.31,20191101,999,1425,1455,2,10 102,ホルモン　冷凍,1.033,2021.10.31,20191101,999,1425,1472,2,10 　＞集計後のデータ商品コード,商品名,数量の合計,規格・型番,仕入日,仕入先ｺｰﾄﾞ,仕入単価,仕入金額の合計,税率,伝票番号 102,繝帙Ν繝｢繝ｳ縲蜀ｷ蜃・1.021,,20191101,999,1425,1455,2.00,10, 102,繝帙Ν繝｢繝ｳ縲蜀ｷ蜃・1.033,,20191101,999,1425,1472,2.00,10, 　＞＞＞希望する正しいイメージ＜＜＜商品コード,商品名,数量の合計,規格・型番,仕入日,仕入先ｺｰﾄﾞ,仕入単価,仕入金額の合計,税率,伝票番号 102,ホルモン　冷凍,1.021,,20191101,999,1425,1455,2.00,10, 102,ホルモン　冷凍,1.033,,20191101,999,1425,1472,2.00,10,

質問日時: 2019/12/21 07:05 質問者: mini1959

ベストアンサー

1

1
Access DlookUPの複数条件抽出

クエリで計算した勤続年数をもとにした勤続区分と勤務区分を利用し付与日数を引っ張ってきたいですいくつか試したのですが上手くいきませんでした。御指南頂けますと幸いです。付与日数: DlookUp("付与日数","T_付与日数t","勤続区分=" & [勤続区分] And "勤務区分='" & [勤務区分] & "'")

質問日時: 2019/12/20 13:04 質問者: elpa_pityo

ベストアンサー

2

0
Access/重複しているデータ以外を抽出する方法

選手名佐藤一郎佐藤一郎田中太郎 … という選手名が重複したデータがあります。「田中太郎」のように唯一(ユニーク)選手名だけ抽出したいです。ご教示お願いします。

質問日時: 2019/12/18 21:53 質問者: yamamon_

解決済

1

0
Access はインストールしたことないのに…

先ほど別件で[コントロールパネル]を覗いたら、[プログラムのアンインストールまたは変更]のリストに、次の Microsoft Access database engine が最近インストールされていることに気付きました。私が使用中の Win10 Pro デスクトップＰＣには Excel 2019 (MS Office の中ではソレだけを単体購入＆インスト)はあるけど、Access を含むその他の Officeアプリはインストールしたこともないのに「Access database engine」とやらが存在しているのはなぜでしょうか？教えてください

質問日時: 2019/12/17 23:08 質問者: mike_g

ベストアンサー

1

0

←前の結果
1
...
5
6
7
8
9
10
11
12
13
14
15
...
20
次の結果→

【Microsoft Office】に関するカテゴリ

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

質問する（無料）

【Access（アクセス）】に関するコラム/記事

弁護士が解説！あなたの声を行政に届ける「パブリックコメント」制度のすべて

社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」

「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
釣りと密漁の違いは？知らなかったでは済まされない？事前にできることは？

知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
カスハラとクレームの違いは？カスハラの法的責任は？企業がとるべき対応は？

東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。この動きは自治体...