teratail header banner
teratail header banner
質問するログイン新規登録

質問編集履歴

3

VBA参照設定追加

2019/06/13 07:17

投稿

tera_taro
tera_taro

スコア46

title CHANGED
File without changes
body CHANGED
@@ -212,4 +212,8 @@
212
212
 
213
213
  ### 補足情報(FW/ツールのバージョンなど)
214
214
 
215
- Windows10,ACCESS2016
215
+ Windows10,ACCESS2016
216
+ **2019/6/13 追記**
217
+ VBA参照設定
218
+ 1.Visual Basic For Applications, 2.Microsoft Access 16.0 Object Library,
219
+ 3.OLE Automation, 4.Microsoft Office 16.0 Access database engine Object Library, 5.Microsoft Internet Controls, 6.Microsoft ActiveX Date Objects 6.1 Library, 7.Microsoft Office 16.0 Object Library

2

値集合ソースに条件を追加したがうまくいかなかった。

2019/06/13 07:17

投稿

tera_taro
tera_taro

スコア46

title CHANGED
File without changes
body CHANGED
@@ -188,6 +188,28 @@
188
188
 
189
189
  ```
190
190
 
191
+ **2019/6/13 追記**
192
+ 値集合ソースに条件を追加したらうまくいくかと思ったが、グラフ自体が表示されなくなった。指定の仕方が悪いのだろうか?
193
+
194
+ グラフの値集合ソース 
195
+ ```VBA
196
+ TRANSFORM Format(Sum([KINGAKUの合計]),"\#,##0") AS KINGAKUの合計の合計
197
+ SELECT Format([NOHIN_YM],"yyyy\年mm\月") AS 日付
198
+ FROM que_busho_kingaku
199
+ GROUP BY Format([NOHIN_YM],"yyyy\年mm\月")
200
+ PIVOT que_busho_kingaku.BUSHO_NAME;
201
+ TRANSFORM Format(Sum([KINGAKUの合計]),"\#,##0") AS KINGAKUの合計の合計
202
+ ```
203
+ ↓修正
204
+ ```VBA
205
+ TRANSFORM Format(Sum([KINGAKUの合計]),"\#,##0") AS KINGAKUの合計の合計
206
+ SELECT Format([NOHIN_YM],"yyyy\年mm\月") AS 日付
207
+ FROM que_busho_kingaku
208
+ WHERE (((que_busho_kingaku.KAMOKU_KBN) Like "[フォーム名].[cmb_KAMOKU_KBN]")) '修正
209
+ GROUP BY Format([NOHIN_YM],"yyyy\年mm\月")
210
+ PIVOT que_busho_kingaku.BUSHO_NAME;
211
+ ```
212
+
191
213
  ### 補足情報(FW/ツールのバージョンなど)
192
214
 
193
215
  Windows10,ACCESS2016

1

タイトル変更

2019/06/13 06:50

投稿

tera_taro
tera_taro

スコア46

title CHANGED
@@ -1,1 +1,1 @@
1
- 【ACCESS】検索条件を指定した内容でそのままグラフに反映させたい。
1
+ 【ACCESS】検索条件を指定しそのままグラフに反映させたい。
body CHANGED
File without changes