Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

430 / 500 ﾍﾟｰｼﾞ

←次へ　｜　前へ→


	【4584】エクスポート時のファイル名について

桜坂 - 05/3/15(火) 12:03 -


	引用なし

	パスワード

みなさん、今日は。

マクロにてデータをエクスポートしています。
その際、ファイル名に環境変数より取得した値を設定したいのですが、
可能でしょうか？

・ツリー全体表示


	【4583】SQLで非表示

Ｔ - 05/3/15(火) 11:11 -


	引用なし

	パスワード

非表示項目をSQL側で制御したいのですが、そのような事は可能でしょうか？たとえば AテーブルのB項目とC項目の内容が B　　　C -----　----- 11111　22222 11111　33333 （B,C共にテキスト型で文字数は５文字とする。） SQLを書くと　→　SELECT B,C FROM A; これだと出力結果が B　　　C -----　----- 11111　22222 11111　33333 となるのですが、これを B　　　C -----　----- 11111　22222 　　　 33333 としたいのです。よろしくお願いします。

・ツリー全体表示


	【4582】Re:別システムの立ち上げ

Gin_II - 05/3/15(火) 10:44 -


	引用なし

	パスワード

>ただ、ネットワーク上の他のパソコンからこのコマンドを押下してもエラーになります。
>ネットワーク上の他のパソコンからもエラーにならないように設定するにはどうしたらよいのでしょうか。
>
>なお，立ち上げるＭＤＢは同一パソコン内にあります。

パスの指定は、どのようにしていますか？

\\コンピュータ名\パス名\ファイル名
とかのようにしたら、どうでしょうか？

・ツリー全体表示


	【4581】Re:別システムの立ち上げ

かめ - 05/3/15(火) 10:37 -


	引用なし

	パスワード

▼Gin_II さん：
>ハイパーリンクサブアドレスにフォーム名を指定すれば、そのフォームが起動します。

ありがとうございました。出来ました。

ただ、ネットワーク上の他のパソコンからこのコマンドを押下してもエラーになります。
ネットワーク上の他のパソコンからもエラーにならないように設定するにはどうしたらよいのでしょうか。

なお，立ち上げるＭＤＢは同一パソコン内にあります。

・ツリー全体表示


	【4579】閉じるボタンを消す方法

Ｔ - 05/3/15(火) 10:26 -


	引用なし

	パスワード

実行時にフォームの閉じるボタンはプロパティで消せるのですが
Accessの閉じるボタンは消せません。
これを消すためにはどうしたらよいでしょうか？

・ツリー全体表示


	【4578】Re:別システムの立ち上げ

Gin_II - 05/3/15(火) 9:42 -


	引用なし

	パスワード

>コマンドボタンで別アクセスファイルを立ち上げるＶＢＡを知りたいのですが。

VBAじゃないとダメですか？
コマンドボタンのハイパーリンクアドレスプロパティを使えば、別のmdbファイルを
起動することができます。

ハイパーリンクサブアドレスにフォーム名を指定すれば、そのフォームが起動します。

・ツリー全体表示


	【4577】別システムの立ち上げ

かめ - 05/3/15(火) 9:26 -


	引用なし

	パスワード

コマンドボタンで別アクセスファイルを立ち上げるＶＢＡを知りたいのですが。

・ツリー全体表示


	【4576】Re:CurrentRecord

らせつ - 05/3/15(火) 8:53 -


	引用なし

	パスワード

お礼遅くなりました。hatenaさん、色々とありがとうございます。
この方法でできそうな気がしてきました。
結果が出次第お知らせしようと思います。

▼hatena さん：
>>1.テーブルにデータを書き込む。
>>2.また違うデータを書き込む
>>3.なにかあった場合、1.のデータを消す。
>>recordcountで総数はとれるのですが、それをとってもあまり意味がないので違う方法があったらいいなと。。。
>>1.と2.で条件になるような違いがないので、
>>これでわかりますでしょうか。
>
>おそらくそういうことだと思いました。
>
>AbsolutePosition ですと、レコード削除すればずれてしまいますし、
>インデックスで並べ替えられたりする可能性もあり、
>必ず元のレコードを取得できる保証はありません。
>
>このような場合は、BookMarkプロパティを使います。
>両方のキーワードでヘルプを参照してみて下さい。
>
>下記は AbsolutePosition のヘルプトピックからの抜粋です。
>--------------------------------------------------------------
>AbsolutePosition プロパティは、レコード番号の代わりとして使用
>するためのものではありません。特定の位置を保持したり特定の位置
>に戻ったりするには、ブックマークを使用します。また、ブックマー
>クは、すべてのタイプの Recordset オブジェクトでカレントレコー
>ドの位置を設定する唯一の方法です。
>--------------------------------------------------------------

・ツリー全体表示


	【4571】Re:コンボボックスの値を自動表示

hatena - 05/3/14(月) 10:18 -


	引用なし

	パスワード

>コンボボックスをクリックして表示される値を、操作する方法について質問します。
>コンボボックスに最初の一文字を入力すると、その文字を先頭とする入力候補
>をテーブルの値から自動的に抽出し表示させたいのですが、どのようにしたらいいでしょうか？

自動拡張が「はい」になっていれば、先頭一致するデータを検索して
拡張表示しますが、それではだめですか。

リストを抽出したいのでしょうか。
もしそうなら、まずコンボボックスの価集合ソースの抽出条件を
Like [コンボボックス名] & "*"
と設定して置いて、変更時イベントを下記のように設定します。

Private Sub コンボボックス名_Change()
Dim p As Integer
　　p = Me.コンボボックス名.SelStart
　　Me.コンボボックス名.Value = Me.コンボボックス名.Text
　　Me.コンボボックス名.Requery
　　Me.コンボボックス名.SelStart = p
End Sub

・ツリー全体表示


	【4570】複数のコンボボックスによる絞込み

Andy - 05/3/13(日) 7:32 -


	引用なし

	パスワード

以下のようなテーブルがあります。

顧客ID　　商品ID　　個数
１　　　　1　　　　5　
１　　　　2　　　　10
１　　　　3　　　　3
１　　　　4　　　　1
１　　　　5　　　　20
２　　　　1　　　　10
２　　　　2　　　　2
３　　　　6　　　　100
・　　　　・　　　　・
・　　　　・　　　　・
・　　　　・　　　　・

顧客数は6000、商品は2000ほど。上の例では省略していますが、各顧客向けの商品数は、10～30種類ほどあります。
フォーム上で、コンボボックスで商品とある数量以上（任意の数量を入れて）の購入顧客をサブフォームに表示させています。

ひとつのコンボボックスではできるのですが、これを複数（できれば5個）のコンボで商品と量の組み合わせで絞り込んでサブフォームに表示させたいのです。

よろしくお願いします。

・ツリー全体表示


	【4569】Re:コンボボックスの値を自動表示

Gin_II - 05/3/12(土) 16:22 -


	引用なし

	パスワード

>コンボボックスに最初の一文字を入力すると、その文字を先頭とする入力候補
>をテーブルの値から自動的に抽出し表示させたいのですが、

そのようになっていませんか？

・ツリー全体表示


	【4568】コンボボックスの値を自動表示

fanny - 05/3/12(土) 12:27 -


	引用なし

	パスワード

コンボボックスをクリックして表示される値を、操作する方法について質問します。コンボボックスに最初の一文字を入力すると、その文字を先頭とする入力候補
をテーブルの値から自動的に抽出し表示させたいのですが、どのようにしたらいいでしょうか？

・ツリー全体表示


	【4567】Re:フロッピィのフォーマットの仕方

YU-TANG

- 05/3/11(金) 21:02 -


	引用なし

	パスワード

こんばんは、YU-TANG です。
横レス失礼します。

> COMMAND.COM△/C△FORMAT△A:

9x 系、とはどこにも書いていないようでしたので、NT 系の可能性も
あるかと。
その場合は CMD.EXE ですね。

・ツリー全体表示


	【4566】Re:フロッピィのフォーマットの仕方

MJM - 05/3/11(金) 18:12 -


	引用なし

	パスワード

ん～？

VBAじゃないですよね？
マクロですよね？

アプリケーションの実行で、
コマンドラインに、
COMMAND.COM△/C△FORMAT△A:
△：スペース
の指定で動作しませんか？

・ツリー全体表示


	【4565】Re:SQL文でエラー

hatena - 05/3/11(金) 17:24 -


	引用なし

	パスワード

>SELECT * FROM AFILE;
>
>っていうSQL文を
>
>SELECT * FROM ( SELECT * FROM AFILE ) ;
>
>ってな具合に変えるとエラーになるのですが
>
>何が原因なんでしょう？

おいらのところではエラーにならないけど（WinXP AC2003）

どんなエラーメッセージがでますか。
OS とバージョンも教えて下さい。

・ツリー全体表示


	【4564】Re:クエリ抽出条件の式

☆ｍａｙｕｍｉ☆

- 05/3/11(金) 17:12 -


	引用なし

	パスワード

ありがとうございました

・ツリー全体表示


	【4563】Re:フロッピィのフォーマットの仕方

nemotake - 05/3/11(金) 16:14 -


	引用なし

	パスワード

▼MJM さん：
>コマンドラインに、
>COMMAND.COM /C FORMAT A:
>でしょうか。

やってみましたが”ＲｕｎＡｐｐ/アプリケーションの実行”
アクションを使ってアプリケーションを起動できません。
になってしまいます。
宜しくお願いします

・ツリー全体表示


	【4562】累計?積算?について

takataka - 05/3/11(金) 16:13 -


	引用なし

	パスワード

累計値を設定値(任意に変更可）でブレイクし、再度累計していく場合どの様にすれば宜しいでしょうか?
Do Until rs.EOF
　If rs!所属コード = syozoku Then
　　 ruikei = rs!センチ + ruikei
　if ruikei > 1750 then
　　 ruikei = 0
　Else
　　 ruikei = rs!センチ
　End If
Else
　　 ruikei = rs!センチ
　End If

　rs.Edit
　rs!センチ = ruikei
　rs.Update
　　
　syozoku = rs!所属コード
rs.MoveNext
Loop
宜しくお願いします。

・ツリー全体表示


	【4561】Re:フロッピィのフォーマットの仕方

nemotake - 05/3/11(金) 15:54 -


	引用なし

	パスワード

▼MJM さん：
ありがとうございます。
早速やってみます

・ツリー全体表示


	【4560】Re:クエリ抽出条件の式

MJM - 05/3/11(金) 14:47 -


	引用なし

	パスワード

こんにちは。

False または 0(ゼロ)

逆にYesの場合は、

True または -1

・ツリー全体表示


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

430 / 500 ﾍﾟｰｼﾞ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free