- ベストアンサー
VBAでその月の最大値を取得する方法
kichikumaの回答
- kichikuma
- ベストアンサー率18% (202/1080)
フィールド1と2のデータが繋がっていて不親切ですね。 という事でそれなりの回答をします。 最大値を変数に入れて指定したら良いです。 最大値に関しては、そう言う関数もあるかもしれないですが、比較して大きい方を保存することを繰り返せば最大値がわかりますよ。
noname#231195
関連するQ&A
- フィルタ後のテーブルのレコード数を取得したい
アクセスｖｂａです。 フィルタ後のテーブルのレコード数を取得したいのですが Debug.Print DCount("[フィールド１]", "テーブル1") だと、フィルタ前の数が取得されてしまいます。 フォーム1にテーブル1を紐付けて、 更にフィルタをしているのですが、 元のテーブル１のレコード数が10として、 フィルタ後が3なら、3を取得するVBAコードを教えてください。
- ベストアンサー
- オフィス系ソフト
- VBAでWeb上のテーブル内の値を取得
IEで開いているWeb上にテーブル(表)があります。 テーブル上の指定の場所の値を取得したいのですが、「VBAを使って取得＆エクセルに貼り付け」って出来ますか？ フォーム内の値なら、ソースに「NAME」などがあるので値を取得することが出来るのですが テーブルの場合、そういうのが無いので困っています。 宜しくお願いします。
- 締切済み
- Visual Basic
- レコード数を重複を省いて取得するには
テーブルAccessにあるフィールドuser_idの値が$userであるフィールド数を取得したいのですが、 同テーブルのフィールド ip もしくは uid の値が重複しているものを省いた数を取得したいです。 ipとuidの値が他のフィールドに存在していないuser_idだけカウントしたいです。 このようなカウントをすることは可能でしょうか。 クエリ文をご教示頂けると幸いです。 よろしくお願い致します。
- 締切済み
- MySQL
- 日付と文字列を条件としてDLookup関数で抽出さ
日付と文字列を条件としてDLookup関数で抽出させたいです。アクセスです。 テーブル１のデザイン フィールド名 ＩＤ（数値型） フィールド１（テキスト型） 取得日時（日付/時刻型） テーブル１のデータ ID フィールド1 取得日時 1 あ 2013/01/05 2 い 2013/01/05 この条件でｖｂａでＩＤの値を抽出したいのですが MsgBox DLookup("[ID]", "テーブル1", "[取得日時] = #2013/01/05#") だと、１が返ってきちゃうのでフィールド１でもフィルタをかけたいのですが どうやればいいでしょうか？ MsgBox DLookup("[ID]", "テーブル1", "[取得日時] = #2013/01/05#" And "[フィールド1] = 'あ'") にすると、型が一致しません。(Error 13)になります。 ご教授よろしくお願いします。
- ベストアンサー
- その他（プログラミング・開発）
- SQL文。特定の月間の値のみを表示したい
Access VBAを利用しています。フォームにテキストボックスを置いてユーザーに日付を入力してもらおうとしています。Accessのテーブル、Table1のDateフィールドには日付が入っています。2009/10/01みたいに８桁で入っています。 やりたいことは、フォームのテキストボックスに日付を2009/10みたいに入力してもらいます。実行ボタンを押すと、そうすると2009/10/1から2009/10/31までの１０月の値のみをselect文でひっぱってきたいと思っています。ここで指定の日付のみをひっぱってくるselect文が思いつきません。2009/10/1のみの値を引っ張ってくるselect文はわかるのですが、１０月の間、１１月の間など月指定の場合、どうやって引っ張ってくるのかご教授お願いいたします。
- ベストアンサー
- SQL Server
- DLookup Excel→Access
エクセルＶＢＡからアクセスのデータベースへ接続し テーブルの値を取得したいのですが エクセルVBAで mystr = DLookup("[フィールド]", "Tテーブル", "[名前] = '検索文字'") と言うコードでアクセスのデータを取得することはできませすか？ テーブル名とフィールド名は指定できたのですが ファイル名の指定はどうすればいいのでしょうか？ オフィス２０１０です。
- ベストアンサー
- オフィス系ソフト
- ACCESS2003：2番目に大きい値を1レコードのみ抽出
氏名、ポイントと２つのフィールドをもつテーブル1をもとにクエリ1を作成し、クエリデザインでDMax("[ポイント]","クエリ1","[ポイント]<=" & DMax("[ポイント]","クエリ1"))といった2番目に大きい値（1番目の値が2つ以上ある場合はその値で可）を抽出する式をつくりました。抽出条件に任意の氏名を指定した結果、2番目に大きい値は抽出できましたが、ポイントのデータ数ぶんだけ複数のレコードを表示してしまいます。できれば別のクエリを作成したりせずに、1つのレコードのみ表示させたいのですがどのようにしたらよいか分からず困っております。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 【Excel VBA】フィルタで指定した値を取得したい
行列 値 1 A1 選択▼ 2 A2 1 3 A3 1 4 A4 2 5 A5 3 A2～A5の値をフィルタを利用して絞り込みます。 この時、絞り込んだ値（つまり選択した値）をVBAで取得したいのですが、どうのようにコーディングすればよろしいでしょうか？ 目的としては、 A列には1～31の数字が入力されており（←日付として）、 その選択された日付により印刷範囲をコントロールしたいのです。 よろしくお願いします。
- 締切済み
- オフィス系ソフト
- 数じゃなくてレコードが存在するかどうかを取得したい
アクセスです。 数じゃなくてレコードが存在するかどうかを取得したいのですが myStr = DSum("[日付]", "T食べ物", "[日付] = #2016/07/19#") をすると、85140が返ります。 DSumではないメソッドを使うのだと思いますが テーブルにレコードが存在するかどうかを取得するＶＢＡコードはありますか？ myStr = Nz(DSum("[日付]", "T食べ物", "[日付] = #2016/07/19 #"), "無し") でなしは取得できましたが やりたいのはこういう事じゃないです。
- ベストアンサー
- オフィス系ソフト
- Accessですでに入っている値をNULLにしたい場合にVBAでどのように書けばよいのでしょうか？
Access2003とPostgreSQL8を使っています。 AccessをGUI環境としてデータリンクでテーブルを開いています。 Accessでフィールドに対してNULL（空文字でなく）をセットする方法が知りたいです。基本的に入力しなければ良いのですが、すでに入っている値をNULLにしたい場合に手で変更する方法とVBAプログラムで変更する方法が知りたいです。
- 締切済み
- オフィス系ソフト