access97 雑木林　掲示板

HIRO - 04/05/24 15:53:14
コメント:
こんにちは。
久しぶりによってみました。

popo - 03/07/23 19:22:44
コメント:
以前の書き込みにもありましたが別のタイプのライセンスの問題です。 Windows2000 SP3 + OFFICE2000の環境で、ACCESS97をインストールする。インストール中は一回エラーメッセージが出て、「*.mdbへの関連づけに失敗しました。」とでる。その後、インストールされたACCESS97を起動すると　「このコンピューターで実行するためのライセンスがないため、Microsoft Accesssを起動できません。」とエラーメッセージが出て、まったく起動しない。何か知っていることがありましたらおしえてください。

mack - 03/07/01 17:50:45
電子メールアドレス:tsukita-yoshikazu@meti.go.jp
コメント:
初めて書き込みをさせていただきます。 access97のレポートで宛先ラベル印刷をすると印刷順序がデーターの順序に関係なくチャランポランの順序で印刷されますよね。これは、封筒と中に文書を入れる作業の段階で非常に不便です。データーの順序にそってラベル印刷をする方法はあるのでしょうか？以上、よろしくお願いいたします。

うだうだ - 03/06/26 16:33:33
電子メールアドレス:uda2jp@yahoo.co.jp
コメント:
今回、Ａｃｃｅｓｓ２．０のＤＢをＡｃｃｅｓｓ２００２に移行することになりました。基本的には直接の移行は出来ないと考えていますので、２．０→９７→２００２の手順で移行を考えております。他にも何か考慮すべき点はありますでしょうか？また、この作業を行うに当たって参考になる良い書籍がありましたら教えて下さい。よろしくお願いします。

ミヤゴ - 03/06/09 15:58:12
電子メールアドレス:m3854@mitaniopt.co.jp
コメント:
はじめての投稿です。Office2000Premiumがインストールしてある環境にACCESS97をインストするにはどうしたらいいんですか？。ACCES2000を削除して97を入れるのですが、何度やっても2000が起動するみたいで。バージョンダウンは再セットしか道はないんでしょうか？誰かお教えください。

まーたん - 03/03/01 14:21:13
コメント:
日付の設定で関数 formatとformat$で意味が異なるんでしょうか?

tuzzy - 03/02/23 16:29:09
電子メールアドレス:tuzzy@po.inetmie.or.jp
コメント:
初めましてこんにちは！！私は切削加工の仕事をしているのですが、図面の管理で悩んでいます。最近、元受の会社から紙ベースの図面を受け取り仕事がくるたびコピーして使っているのですが、製品の種類が沢山あって探すのに手間取るし、何度もコピーして使っていると図面が汚れたり破れたりしてしまいます。だから、スキャナーで図面を取り込み、仕事が発注されたらその製品の図面をまとめて印刷したいと思っています。発注製品の品名や図番のデータはあるのでそのデータを元にＡＣＣＥＳＳでまとめて印刷したいと思っているのですがどうしたらスキャンデータをアクセスで管理、印刷できるでしょうか？出来れば製番や、ロット数を一緒に印刷したいのですが・・・・良い方法を教えてください！！お願いいたします。

ゆき★ - 03/01/29 22:04:33
コメント:
困っているのでどなたか教えてくださいませんか？業務上、部署内の資料や検索・入力システムを作成しています。データをレポート上ではなく、クエリーで上のレコードから順に累計を出したいのですが、どうすればいいのでしょうか？いい式があるのでしょうか？それとも無理でしょうか？よろしくお願いいたします。

森田延子 - 03/01/09 21:21:50
電子メールアドレス:nobuko7@abox7.so-net.ne.jp
コメント:
access97を使っています。複数のｍｄｂフアイルとテーブルのリンクを張っているのですが、作業中にどのドライブのどのフォルダにあるファイルとリンクをしているのか確認できたらより安心して作業を進められると感じます。2000や2002のver.ではそういう機能があるようですが、97ではどうなのでしょうか？組み込み機能としてはないようですが、VBAでコードを作成して、そういうことは出来ないものか、ご存知の方、教えて下さい。

hidbou - 02/12/17 01:47:29
電子メールアドレス:mikiko_chan@nifty.com
コメント:
こんにちは。access初心者です。OUTLOOK2000やexpressなどを使い、フォームから送られてくるメールの内容氏名、住所、電話番号などを抽出しデータベースに登録してゆくにはどうしたらいいでしょうか？

ijuni - 02/12/11 22:29:08
電子メールアドレス:isogai@tounichi-g.co.jp
コメント:
初めて投稿させていただきます。どうしても分かりません。 ACCESS97で起動時にフォームを起動するシステムを作成したのですが、不正な処理のメッセージで落ちるようになってしまいました。シフトキーを押しながら起動して、その最初に起動するフォームを直接起動するとエラーは出ないんです。別システムから最適化かけた直後もエラーはでないのですが、2回目以降はエラーがでます。どなたか原因わかりませんでしょうか？？？？？？？？

トロ - 02/08/15 15:47:02
電子メールアドレス:wakana@mes.kta.ntt-me.co.jp
コメント:
教えて下さい。レポート作成でフィールドはいくつまで指定可能ですか？

やまだ - 02/03/19 20:46:45
電子メールアドレス:ko-ok@f5.dion.ne.jp
コメント:
Access上のローカルテーブルをプロシジャ内にてOpenRecordsetで開きEofまで１レコードづつ参照－更新を繰返し処理をしています。現在ローカルテーブル内の実レコードは３５，０００件あります。この処理を実行すると時折「共有ロック数の制限を越えています」旨でエラー中断してしまいます。OSはWIN2000。CPUはPentiumⅢ800MHz、MEMは128MBの環境です。レジストリ内のJetに関するMaxLocksPerFile値（デフォルト9500）も上げてみたりしていますが現象が解決されません。この制限を解くには、又、制限に引っかからないよう処理を行う為にはどのような手段があるでしょうか？ご存知な方教えて下さいませ。

やまだ - 02/03/19 19:14:40
電子メールアドレス:ko-ok@f5.dion.ne.jp
コメント:
実行中のマクロ名やクエリー名を表示させたいのですが、アクティブといいますか現在実行中内容を把握・表示するのに何か良い方法はないでしょうか？具体的にはマクロから呼び出されたプロシジャ内で自分を呼んだマクロの名称を取得して表示又は配列ストックしたいのですが。ACCESS側でマクロ内エラー発生時に表示するメッセージボックスには実行マクロ名がしっかり表示されているのでどこかで管理されているのでしょうが、どこのコネクションなりオブジェクトを参照して良いものやら．．．ご存知な方いらっしゃいましたら教えて下さい。

Ryu - 01/12/27 10:53:53
コメント:
はじめまして。Ryuと申します。分類を分け説明させていただきます。１．仕様環境　Access97 ２．実現したいこと　テキストボックスとコンボボックスを変換したい。３．問題点　テーブルを下記のように作成しております。 Key(Indexkey) NyuryokuHonbun(ユーザが入力する文字列) NyuryokuMode(テキストかコンボで選択させるか?1=テキスト,2=コンボ) ComboBoxList(NyuryokuModeがコンボボックスのときの表示する選択文字) 入力の際NyuryokuModeがテキストボックスの場合はテキストを表示させ NyuryokuModeがコンボボックスのときはコンボボックスを表示させたいのです。そのため、PGによりテキストボックスとコンボボックスの切り替えを行いたいのですがどうしてもうまくいきません。４．現状の経緯　コンボボックスとテキストボックスを重ねておいてVisibleのプロパティをそれぞれ切り替え表示、非表示とし入力させようとしました。ですが、サブフォーム(帳票)で入力しているため切り替えたイベントで表示している全てのテキストボックスがコンボボックスに (また、その逆も)なってしまっております。おわかりの方どうぞよろしくお願いします。

ＡＫＯ - 01/10/08 11:47:12
電子メールアドレス:sue-ｔｙａｎ@mth.biglobe.ne.JP
コメント:
みなさん、はじめまして。Access９７のメイン・サブフォームについて教えて頂きたい事があり、今回おじゃまさせて頂きました。ところで内容ですが、メインフォームを開いたときにサブフォームのレコードを新規レコードに設定させるようにするにはどうしたら良いのでしょうか? （メインフォームのサブフォームに現在２０件ほどのレコードがあるのですが、新規に入力する際、スクロールしなければならないのでその手間を省きたい）どなたかご存知の方がいらっしゃいましたら教えて頂きたく思いますのでどうか宜しくお願いします。

YU-TANG - 01/10/04 20:42:48
コメント:
Lovery さんへ Access 2000、Access 2002 ともに 2 GB です。ただし安定運用できるかどうかは環境に依存しますので、アップグレードしたからと言って必ずしも安心できるわけでは有りません。むしろ後発バージョンのほうが高スペックを要求されるので、環境もいっしょに上げない限りは Access 97 よりかえって不安定になる可能性がありますよ。

Lovery - 01/10/03 22:41:51
電子メールアドレス:loverychan@hotmail.com
コメント:
どなたか教えて下さい。現在、Access97で開発したシステムがあるのですがMDBのサイズが既に１ＧＢを超えてしまいました。 Access2000、Access2002に乗せ変えようと思うのですが、それぞれのMDB最大サイズはいくつなのか？ご存知の方、教えて下さい。

こば - 01/09/19 14:11:19
電子メールアドレス:kobayashi@les.metro.tokyo.jp
コメント:
生年月日を入力すると自動的に定年年月日が計算されるようにするにはどのようにしたらよいのでしょうか。ご存知の方がいらっしゃいましたら教えてください。（早生まれの人は６１年後の３月３１日、遅生まれの人は６０年後の３月３１日）

TK - 01/07/14 15:42:35
電子メールアドレス:tubukata@.rmail.ne.jp
コメント:
いまさらながらAccess９７をどうしても入手したいのですが,何か好い方法があれば教えてください！！

popo - 01/05/10 11:22:30
電子メールアドレス:junko@happy.email.ne.jp
コメント:
access初心者です。エクセルに入力したものをアクセスにインポートできますよね。それを自動化するにはどの様なマクロを組めばよいのでしょうか？教えてください。

popo - 01/05/10 11:20:23
電子メールアドレス:iw7j-nmym@asahi-net.or.jp
コメント:
access初心者です。エクセルに入力したものをアクセスにインポートできますよね。それを自動化するにはどの様なマクロを組めばよいのでしょうか？教えてください。

てて - 01/04/16 19:11:04
コメント:
はじめまして。Access 97でとってもとっても初歩的なことだと思うのですが、誰も解決してくれなくて困っています。レプリカを作ろうと思い、普通に[ツール]→[レプリカの作成]をしました。そして「正しく作成しました」と出て、一旦閉じました。それから今度はレプリカを開くと「モジュールが見つかりません。」と言われてしまうのです。一体どうしてなのでしょうか？他のファイルのレプリカはちゃんと作れるので、きっとこのファイルのどこかに問題があるのだとは思うのですけど、このデータベースは辞められた先輩が作ったので、何がどうおかしいのか検討がつきません。どうぞよろしくおねがいします。

よっちゃん - 01/03/13 19:39:35
電子メールアドレス:takahashiy@ntt-dq.co.jp
コメント:
はじめまして。 ACCESS97を使用していますが、パラメータクエリーをテキストファイルとしてエクスポートするときに、「結果パラメータが少なすぎます。１を指定して下さい。」と表示されてしまいます。その結果エクスポートウィザードが開きません。対処方法を教えて下さい。

ぴよぴよ - 01/03/01 09:49:42
コメント:
雫失疾勺のシート未鮖慊蠅靴徳ccessのテーブルにインポートする方法が分かりません。コードを教えてください。

加藤憲司 - 01/02/19 12:50:36
電子メールアドレス:kenji.katou@to.ksknet.co.jp
コメント:
みなさまお疲れ様です。 Access97でちょっと分からない点があります。内容は以下の通りです。生年月日を入力したら、自動計算をして現在の年齢を表示させるにはどの様にすればよいのでしょうか？また、年齢を日々更新させる（１年経つと１つ増える）様にするにはどうすればよいのですか？以上の内容なのですが、Excelなら分かるのですがどうしても分かりません、御存知の方お手数ですが御口授下さい。宜しくお願い致します。

HIRO - 01/02/08 09:39:31
コメント:
taro様へ ME.年月日を日付型に変換して比較すればよろしいのでは？ #はつけなくてOKかと。（日付型でとってるから）

taro - 01/02/06 15:27:46
コメント:
日付の比較をしたいのですが、日付には＃をつけなければならないのでしょうか？下記のように判断させたいのですが、うまくいきません。教えてください。よろしくおねがいします。 Dim area As Date area = #2/6/2001# If Me.年月日 = "# " & area & " #" Then　　’Me.年月日はフォーム上で2001/02/06を入力します。 MsgBox ("ok") End If

matsu - 01/01/23 14:47:41
電子メールアドレス:kouichi@syc.toppan.co.jp
コメント:
こんにちは。いつも拝見させていただいてます。実は、困っている事があって書き込みさせていただきました。テキストボックス内に「あいうえお」と表示しているとして、マウスで、その中の「いう」反転させて選択します。その状態のときにモジュールで、反転している文字列「いう」を取得したいのですが、可能でしょうか？どなたか教えてください。お願いします。

nagai - 00/12/28 11:09:01
コメント:
カナの全角、半角を判断することはできるのでしょうか? フォーム上でチェックさせるのではなく、既にあるデータを読んでチェックしたいのですが。おわかりの方いたら、教えてください。

KAZU - 00/12/26 18:12:09
電子メールアドレス:yoshinok@sogw.nitsuko.co.jp
コメント:
HIRO様アドバイスありがとうございました。フォームでうまく行きました。また何かありましたら、宜しくお願いします。

k - 00/12/26 18:10:07
コメント:
HIRO

HIRO - 00/12/26 09:37:49
コメント:
KAZU様へ時間をセットする項目名を”更新時間”とすると、クリック時のイベントにて ME!更新時間 = Time() とすればよろしいかと・・・

KAZU - 00/12/25 16:59:53
電子メールアドレス:yoshinok@sogw.nitsuko.co.jp
コメント:
はじめて、Access97初心者です。テーブルであるセルをクリック（アクション）するとそのクリックした時間をそのセルに表示したいのですが、テーブルでは、設定できないのでしょうか？恐らくフォームでセルのプロパティでクリック時の所に式、マクロ、コードビルダで簡単に出来るような気がするのですが、どう入れたら良いのか判りません。どなたか教えて頂けませんでしょうか？宜しくお願い致します。

ととろ - 00/11/20 00:41:08
ホームページアドレス:http://www.hk.airnet.ne.jp/kitazawa/mm.htm
電子メールアドレス:kitazawa@hk.airnet.ne.jp
コメント:
はじめまして。最近自分のサイトにアクセスのシェアウェアをアップしました。アクセスでメールの管理ができます。（送受信可）興味のある方はよろしければお越しください。

HIRO - 00/10/27 17:26:36
コメント:
ヒロシ様へ
もうちょい具体的に書かないと・・・
インポートはどうやっているのか？
手動でやっても同じか？
件数は？
インポート元ファイルはXLS？

など

まこ - 00/10/26 17:00:48
電子メールアドレス:polonpolon@hotmail.com
コメント:
HIRO様へ。本日のホームランです（＾＾私もその意見には同感いたします。また何かの機会にお会いできたらと思っております。それでは・・・

ヒロシ - 00/10/26 13:13:48
コメント:
Access97でExcel97のデータをインポートしてもテーブルに取り込めないのですが、どうしてでしょうか？テーブルを開いても表示されないのに、エクスプローラでサイズを確認すると取り込めている感じがするのです。初心的な質問ですがよろしくお願いします。

HIRO - 00/10/25 10:10:12
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
けい様へ
自動は無理では・・・
ＡＰＩで解像度を取得して自分で調整するとかしないと・・・？

HIRO - 00/10/25 10:00:59
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
まこ様へ。
こんにちは。
試してみました。そのとおりですね。９７では通ってしまいました。
２０００では読取り専用の為なんたらかんたらとエラーが出ました。
共存は関係ないと思いますが、２０００がおかしいというより９７がおかしかったのでは？？
２０００では、より厳密になったということではないのでしょうか。（融通がきかなくなった？？）

まこ - 00/10/23 16:36:06
電子メールアドレス:polonpolon@hotmail.com
コメント:
hiro様。ありがとーございます。この件につきましてはモジュールにてファイル名を変更するほかに無さそうなのでがっくしきてました・・・しかし！！私は今、97と2000の環境を共存させて使っているのですが 97では正常に作動してしまいました。いやはや、これは共存が悪いのか2000がおかしいのかわかりません（ＴＴ何か知っていたら教えていただけます？？

森の熊さん - 00/10/21 23:33:18
電子メールアドレス:koz@info-niigata.or.jp
コメント:
当方、access2000を使用しておりますが、メモ形式で作成したデーター（MAX約5,000字）をクエリーでキーワード検索し、レポートを作成しています。　印刷時点の見やすさ等を考え、改行幅を持たせたレポートにすべく、レポートデザインの改行幅に数値を入力しました。改行幅に数字を入力すると、データーのある部分から以降が印刷されません。　なんとか、見やすい状態にするよう苦慮しております。　どなたか、解決策をご存じの方はお教えください。よろしくお願いいたします。

けい - 00/10/18 20:08:39
電子メールアドレス:aki_kei@hotmail.com
コメント:
スクリーンの解像度が異なるパソコンで共有してもフォームサイズを自動調整する方法を教えて下さい。

hiro - 00/10/16 12:07:25
コメント:
まこ様へやはりインポートする前にインポート元となるテキストファイルに拡張子をつけないとダメだと思いますけど・・・

まこ - 00/10/13 17:11:35
電子メールアドレス:polonpolon@hotmail.com
コメント:
はじめましてー。これは初歩的な事かも知れないのですが、この馬鹿な私目にお教えいただけると幸いと思いカキコさせていただきました。あるテキスト形式のファイルをインポートする際に拡張子の無いデータをインポートさせるにはどのようにしたら可能になるのかなーと思いまして・・・いろいろ試してみようと思いまして、一度拡張子を勝ってにつけて(txt形式) インポート定義を作成後、マクロを組んで実行！なんと！最初は気持ちよく動いてくれたのですが、次回からのインポートでは読込みの出来ない状態になっていました。いわゆるオブジェクトの認識がされていない状態でした。そしてまた拡張子(txt)を付けて再度、実行させてあげたところ動くではありませんか！ってことで拡張子の無いファイルは読み込んではいけないのでしょうかね～(^^;？つまらないことを聞いてしまいましてすいません(ｍ_ _ｍもし、わかる方がいらっしゃいましたら教えてくださいまし。

toru - 00/09/06 11:27:31
電子メールアドレス:terui-toru@kmisuzu.co.jp
コメント:
すみません。下の発言取り消します。今改めて確認したら、読み込み成功しました。昔、やったときにはエラーでたのに。一体なんだったんだろ？もし、今後作成していて判らない事がありましたら、宜しくお願いします。ありがとうございました。

toru - 00/09/06 11:16:16
電子メールアドレス:terui-toru@kmisuzu.co.jp
コメント:
お返事ありがとうございます。この読込むファイルを一度テキストファイル形式に変えて試したことがありましたが、同じエラーが出てしまいました。マクロ形式にしても同じ結果でした。そこでいろいろ他の端末で試したのですが、うまく読込んでくれるのがWindows98の端末で、エラーが出てしまうのがWindows95の端末の様なのですが。。。もし、何かわかることがありましたら、教えて下さい。宜しくお願いします。

hide - 00/09/04 13:42:42
電子メールアドレス:hideko@osiplus.co.jp
コメント:
Access97からAccess2000への移行作業をしていて同じような問題にぶつかりました。私の場合、transferTextでエクスポートする箇所がエラー3027になってしまいました。コードは DoCmd.TransferText acExportDelim,"abcエクスポート定義","abc","c:\tmp\abc" で、出力ファイル名abcに拡張子をつけ"c:\tmp\abc.txt"としたところ、うまく動きました。インポートでも同じようにファイルに拡張子をつければうまくいくかもしれませんので、よかったらお試し下さい。

toru - 00/08/19 10:02:48
電子メールアドレス:terui-toru@kmisuzu.co.jp
コメント:
はじめまして。どうしても分からないので書き込みさせて戴きました。 ACCESS97のVBAを使って、一連の作業を行なうプログラムを作ったのですが、同じファイルでも使用するパソコンによって実行可能だったり、エラーが発生したりします。その箇所というのが、FDのデータを読み込むだけのコマンド、 DoCmd.TransferText acImportFixed, "あ", "い", "a:\Mx00rsou", False　なのですが、エラー番号3027"データベースまたはオブジェクトは読取り専用であるため、更新できません"と表示されます。特にセキュリティは設定していません。どこか設定があるのでしょうか？お判りになられる方がおりましたら教えて下さい。よろしくお願いします。

TAK - 00/08/04 19:14:37
コメント:
みっちゃん様申し訳ありません。私の知っている知識にないので。何か分かったらここに書いておきます。

みっちゃん - 00/08/03 08:38:15
電子メールアドレス:murai@nsknet.or.jp
コメント:
回答ありがとうございました。説明が不足していたようです。ＯＳでＷＩＮ２０００を使用したときにＡＣＣＥＳＳ９７のシステムでエラーがよく起きるようになったという内容です。特にレポート関係を操作したときによく起きます。特にあるシステムはレポートのデザイン自体をも開くことができません。内容的には　「　エラーが発生したため　MSACCESS.EXE　を終了します。プログラムをもう一度開始する必要があります。　」　です。よろしく御教示のほどお願いいたします。

TAK - 00/07/31 11:48:03
コメント:
みっちゃん様まちがえました（－－） Windows98 から Windows2000ですよね Win2000 の SPを割り当てるしか方法がないのでは？憶測でゴメンナサイ（m_m)

TAK - 00/07/31 11:42:35
コメント:
みっちゃん様 ACCESS2000を入れた後に SQL SERVER 7.0 SR-2を入れましたか？ひょっとしたらSQL SERVER7.0 SR-2をインストする事によって回避できるかもしれません。ただSQL SERVER7.0 SR-2 は MSDEの修正なので、OFFICE2000 の SR-1 が必要かもしれません。やっぱ ACCESS2000 って致命的なバグが多いですか？

みっちゃん - 00/07/26 13:44:16
電子メールアドレス:murai@nsknet.or.jp
コメント:
久しぶりの登場です。みなさま是非御教示のほどを。最近パソコンを買い換えたためＯＳがＷＩＮ９８　ＳＥから　ｗｉｎ２０００に変更になりました。ところがこれまで正常に動作していたＡＣＣＥＳＳのシステムがよくエラーで止まってしまいます。これを回避する技、御教示下さい。

つるとん - 00/07/13 08:50:49
電子メールアドレス:turuton@yahoo.co.jp
コメント:
↓のデータ件数に誤りがありました。正しくは、1,002バイト 335,240件です。

つるとん - 00/07/13 08:49:04
電子メールアドレス:turuton@yahoo.co.jp
コメント:
ACCESS97をwinnt_server4.0_sp5環境で使用しています。オラクル7.3.4にあるデータをインポート（リンクではなくて）したいのですが、 1,002バイト35,240件の大量データのためか、インポート進捗メータが完了した時点でハングしてしまいます。一晩ほっときましたがダメでした。メモリ不足とはおもえないし、パフォーマンスを見ても物理360MBの仮想700MBのうち237MB使用でしたしＮＴでもリソース不足が出るんでしょうか？ ACCESS97の扱えるデータ量は１ギガと聞いてますし、どうしたもんでしょう？何か回避策はあるでしょうか？まー少しずつ刻んでやればいいことですが、なにが原因でハングしたのかも知りたいですし、こうすれば出きるじゃない？ってかたいましたら教えて下さい。

kya - 00/06/16 18:12:11
電子メールアドレス:kya@infoibis.ne.jp
コメント:
フォーム作成上の問題ですが、インテルマウスのホイールを制御したいのですが？誤ってホイールを動かすと入力したデータが飛んじゃって（上に動いて表示しなくなる）。いろいろ調べたけどわかりませんでした。どなたか解決策をお分かりでしたら、教えてください。

さり - 00/06/07 18:32:49
電子メールアドレス:なし
コメント:
こんにちは。困り果ててしまい「書き込み」をさせていただきました。はぁ～。入力したデータを、［製品名］でグループ化し、さらに［変更番号］の最新のものだけを抽出したいのですがどうしても上手くいきません。クエリーの［集計］で、グループ化・最大の設定をしました。この時、［備考］や［変更理由］と言ったものまで設定をしないとクエリーを作成することが出来ず、しぶしぶ設定するとこれが抽出条件に引っかかってしまい上手くいかないのです。フォームの方は［メイン／サブ］でサブの方にこのクエリーを使っています。どうしたら上手く抽出できるのでしょうか？クエリー以外でもできるのでしょうか？おわかりになる方がいらっしゃいましたら教えて下さい。よろしくお願いします。

ZENA - 00/06/02 14:24:50
コメント:
解決しました。原因　ACCESS95の以下のモジュール記述の箇所でエラーとなっていることが判りました。　→　DoCmd.OutputTo acTable, sTbl, acFormatXLS, sXLS1 & "GP110.xls", False 上記はご存知かと思いますが、ACCESSのテーブルデータをEXCELワークシートへエクスポートするものです。ここで私のPCで色々試したところ、sXLS1に実際に存在しないパス名をセットした場合で予約済みエラーを再現できました。問題のPCは、XLS1のパス名に相当するディレクトリィ構造が存在しませんでした。セットアップミスでした。

ZENA - 00/05/30 14:12:35
電子メールアドレス:a_zena@yahoo.co.jp
コメント:
初めて投稿させていただきます。 ACCESS95で申し訳ないのですが質問させて下さい。 ACCESS95のテーブルのデータをVBA及びクエリーで編集し、その編集データをEXCEL95で作成した帳票フォームに貼り付ける処理の途中で、「予約済みエラー」が発生してしまいます。ちなみにシステムの構成は、ACCESS95のmdb及びEXCEL95のxlsファイルはともにサーバーで管理しており、各クライアント（Win95）にはACCESS95のmdbへの接続用アイコンを配布しているのみです。またこのエラーはあるクライアントのみで発生します。不思議な現象ですが、回答頂ければ幸いです。なお参考に、「予約済みエラー」のエラーステータスは以下のモジュール記述で採取しました。 ----------------------------------------------------------------------------------- If Err.Number <> 0 Then sMsg = "エラー番号 " & Str(Err.Number) & Err.Source & _ " でエラーが発生しました。 " & Chr(13) & Err.Description MsgBox sMsg, , "エラー", Err.HelpFile, Err.HelpContext End If ----------------------------------------------------------------------------------- 以上

まる - 00/05/19 11:09:16
電子メールアドレス:malulu_@hotmail.com
コメント:
セキュリティで悩んでいます。ＬＡＮで、たくさんの人と共有します。初心者の私がやっとなんとか完成しました。そこでセキュリティ設定しようと思っています。管理者は作成した私自身で、その他がユーザーなんですが、そこで、管理者側でユーザーの設定はしたんですが、個々にユーザー側で設定って要りますよね。たぶん・・・何をすればいいんでしょうか？わからず、「実験、実験」って思ってユーザー側で開いてみると、普通通り・・・（涙）根本的なことがわかってないかもしれません。すみませんが、どなたかお教えください。よろしくお願いします。

いかいか - 00/04/21 13:55:54
電子メールアドレス:ikari@evolex.co.jp
コメント:
すいません、メールアドレスを書き忘れてしまいましたので、もう一度書き込みます。どもども、またまた質問します。ピボットフォーム（フォームの新規作成でピボットウィザードから作成されるフォームです）で、ウィザードから作成されたピボットフォームに検索条件（またはフィルタ）を設定することはできるのでしょうか？何かご存知の方がいらっしゃいましたら、ぜひ一報のほうをよろしくお願いします。

いかいか - 00/04/21 13:55:49
電子メールアドレス:ikari@evolex.co.jp
コメント:
すいません、メールアドレスを書き忘れてしまいましたので、もう一度書き込みます。どもども、またまた質問します。ピボットフォーム（フォームの新規作成でピボットウィザードから作成されるフォームです）で、ウィザードから作成されたピボットフォームに検索条件（またはフィルタ）を設定することはできるのでしょうか？何かご存知の方がいらっしゃいましたら、ぜひ一報のほうをよろしくお願いします。

いかいか - 00/04/21 13:55:47
電子メールアドレス:ikari@evolex.co.jp
コメント:
すいません、メールアドレスを書き忘れてしまいましたので、もう一度書き込みます。どもども、またまた質問します。ピボットフォーム（フォームの新規作成でピボットウィザードから作成されるフォームです）で、ウィザードから作成されたピボットフォームに検索条件（またはフィルタ）を設定することはできるのでしょうか？何かご存知の方がいらっしゃいましたら、ぜひ一報のほうをよろしくお願いします。

- 00/04/21 13:54:46
コメント:
どもども、またまた質問します。ピボットフォーム（フォームの新規作成でピボットウィザードから作成されるフォームです）で、ウィザードから作成されたピボットフォームに検索条件（またはフィルタ）を設定することはできるのでしょうか？何かご存知の方がいらっしゃいましたら、ぜひ一報のほうをよろしくお願いします。

いかいか - 00/04/20 11:26:53
電子メールアドレス:ikari@evolex.co.jp
コメント:
・またまた質問です。Access97で現在開発を行っているのですが、PIVOT句の実行結果をフォームに表示する事が出来ずに困っています。SQL文の実行結果としましては、列数が可変となりますので、サブフォームには変更することが出来ず（サブフォームの列数を可変長最大列数にしても、作成されていない列の表示は?Nameと表示されてしまいます）、難儀しています。（どうしてもDoCmd.OpenQueryで表示される画面ではなく、実行結果をフォーム上にGrid形式で表示したいのです）・Access97でサブフォームの列数を可変長にする方法や、クエリーの実行結果を直接フォームにGrid形式で表示出来る方法をご存知の方がいらっしゃいましたら、ぜひ一報をお願いします、また、「それは不可能」など、どんな意見でも構いませんので、ぜひ意見をお聞かせ下さい。

いかいか - 00/04/20 11:26:47
電子メールアドレス:ikari@evolex.co.jp
コメント:
・またまた質問です。Access97で現在開発を行っているのですが、PIVOT句の実行結果をフォームに表示する事が出来ずに困っています。SQL文の実行結果としましては、列数が可変となりますので、サブフォームには変更することが出来ず（サブフォームの列数を可変長最大列数にしても、作成されていない列の表示は?Nameと表示されてしまいます）、難儀しています。（どうしてもDoCmd.OpenQueryで表示される画面ではなく、実行結果をフォーム上にGrid形式で表示したいのです）・Access97でサブフォームの列数を可変長にする方法や、クエリーの実行結果を直接フォームにGrid形式で表示出来る方法をご存知の方がいらっしゃいましたら、ぜひ一報をお願いします、また、「それは不可能」など、どんな意見でも構いませんので、ぜひ意見をお聞かせ下さい。

TAK - 00/04/14 19:05:22
コメント:
いかいか様環境ＷｉｎｄｏｗｓＮｔＳｅｒｖｅｒ４．０ＳＱＬＳｅｒｖｅｒ６．５Ｗindows ＮｔＷｏｒｋｓａｔｉｏｎ４．０＋ＳＰ３ ACCESS９７システムＤＳＮにＯＤＢＣ接続を宣言（ダミー用フォームに使用）これをやるのでしたら、ＳＱＬ文にＯＤＢＣ接続宣言をする必要があります。が・・・これはこれで少しやっかいな点があります。と言うのも私の会社のサーバーのメモリーが少ない為かもしれませんが、うまく接続できる時と、出来ない時があるのです。ＯＤＢＣｋｎｔｄｂの接続に失敗にしましたとメッセージが出る事が多々あるので仕方なく、ダミー用フォームを一つ、リンクテーブルを一つ設定。Ａｕｔｏｅｘｅｃでダミーフォームをオープン、そしてすぐにクローズ、その後メインのフォームをオープン、こうすると何故かメインのフォームでｋｎｔｄｂの接続に失敗しましたとでないのです。処理コードをコンボで選択商品区分を手入力コンボで選んだコードと商品区分に該当するものを Me.RowSourceとして宣言以下は接続文字（ＳＱＬ宣言） SELECT コード,取引先名 FROM m_torihiki IN "" [ODBC;DATABASE=kntdb;UID=Admin;PWD=;DSN=Kntdb;]; Me.C_品番.RowSource = "SELECT m_shohin.品番,品名 FROM m_shohin,m_shourit " _ + "IN '' [ODBC;DATABASE=kntdb;UID=Admin;PWD=;DSN=Kntdb;]" _ + "WHERE(" _ + "m_shohin.商品区分=1 AND " _ + "m_shohin.品番 = m_shourit.品番 AND " _ + "m_shohin.商品区分 = m_shourit.商品区分 AND " _ + "m_shourit.枝番=1 AND " _ + "m_shourit.得意先ID=" + CStr(Me.C_コード) + ") " _ + "ORDER BY m_shohin.品番;" 何故 FROM m_shohin,m_shourit となっているか？それは、ＳＱＬＳｅｒｖｅｒに接続するには INNER JOIN 句は好ましくないからです。そもそも INNER JOINと言うのは、ACCESS独自の表現であって、ＳＱＬＳerverでは認識してくれません。（UPDATE,DELETE 時） SELECT では可だが、分かりにくいので標準的な文法で記述。ＡＣＣＥＳＳ９７でグリッドを使って接続する方法 JET OLE DB PROVIDER と SQL OLE DB PROVIDER ２通りの接続方法教えます。但しグリッドはＭＳ社標準のグリッド使用とします。使用するコンポーネント Microsoft Data Grid Control6.0 (OLE DB) Microsoft ActiveX Data Objet ReordSet 2.0 Library Microsoft ActiveX Data Objet ReordSet 2.0 Libraryがセットされてない時はＭＳ社のＨＰからＭＤＡＣ_TYP.ＥＸＥをダウンロードしてセットアップしてください。但しAC９７で使用するのでしたら、MDAC_TYP.EXEのバージョン２．０です。 JET OLE DB PROVIDER 3.51 がこの中に入ってます。 JET OLE DB PROVIDER 4.0 でしたらバージョン２．１を最新は確かバージョン２．５だと思います。 Global cn1 As ADODB.Connection 'Access97用 Global rs1 As ADODB.Recordset 'Access97用 Global cn2 As ADODB.Connection 'SQL Server用 Global rs2 As ADODB.Recordset 'SQL Server用 Set cn1 = New ADODB.Connection cn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51; Data Source=" _ + "c:\E_temp.mdb" cn1.Open Set cn2 = New ADODB.Connection cn2.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=True;Initial Catalog=kntdb;" _ & "Data Source=ntsv01;Locale Identifier=1041;Connect Timeout=120;" _ & "Use Procedure for Prepare=1;Auto Translate=False;Packet Size=4096;" _ & "Workstation ID=ntsv01; User ID=kawadb; Password=kawadb" cn2.Open MySQL = "SELECT * FROM m_shohin WHERE(コード=1);" Set Rs = NEW ADDOB.Recordset rs2.Open MySQL, cn1, adOpenStatic, adLockOptimistic Set DataGrid2.DataSource = rs2

いかいか - 00/04/13 10:26:20
電子メールアドレス:ikari@evolex.co.jp
コメント:
はじめまして、Access97初心者のいかいかです。今、仕事でAccess97を使って、SQLServerと接続を行ない、DAO3.51のRecordsetでデータをとってきて、それをサブフォームに表示したいのですが、（Grid形式の表に表示したいわけです。 Gridコントロールを追加したくありませんので）フォームのRecordSourceにRecordsetを代入することが出来ずに困っています。 Access2000ですと、フォームに!Recordsetプロパティがあるようなんですが、 Access97ではどういうふうにコーディングすれば、Recordsetオブジェクトを使って、サブフォームに取得情報を表示することが出来ますか？または、効率よく、Gridにクエリー、リンクテーブルを使わずに、表示する方法はあるのでしょうか？何かご存知の方がいらっしゃいましたら、どんなことでも構いませんので、一報をお願いします。

MABU - 00/04/03 19:22:26
コメント:
HIROさんありがとうございますさっそく活用させていただきます

HIRO - 00/03/30 14:11:11
コメント:
すいません。名前間違えました。ＭＡＢＵ様でした。

HIRO - 00/03/30 14:09:35
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
久しぶりに訪れました。
またちょくちょく寄らせて頂きます。

ＭＡＲＵ様へ
サブフォームのフォーカス喪失時イベントで
DoCmd.GoToRecord , , acFirst
を発行すると大丈夫みたいです。

MABU - 00/03/24 18:18:02
コメント:
はじめましてMABUですメインフォームで条件を指定したあと再クエリーをすると、条件に合ったデータが単票形式でサブフォームに表示するようにしていますが,サブフォームでn件目を参照したあとでメインフォームで違う条件を指定後再クエリーをすると,サブフォームにn件目のデータが表示されてしまいます必ず1件目のレコードが表示されるようにしたいのですが,レコードの移動を使用するとサブフォームではエラーが出てしまいレコードの移動が自動化できません何かいい方法ありませんでしょうか？

ＨＡＭＡ - 00/03/19 14:46:31
コメント:
オクさんこんにちは。ご質問は「改行していないテキストデータを切り分けてレコードに登録したい」という事でしょうか？
テキストデータ内のメールアドレスの件数が２５６件以下で更新頻度が少ない場合は直接Ａｃｃｅｓｓにインポートせずに、Ｅｘｃｅｌを使って加工したデータをインポートさせるならできるのでは・・・
テキストデータをＥｘｃｅｌに読み込みます。おそらくすべてのデータが１行目に読み込まれるので１行目をすべて選択してコピーを実行します。その後セルＡ２を選択して右クリックで「形式を選択して貼り付け」をクリックします。ダイアログボックス内から「行列を入れかえる」をチェックして「ＯＫ」ボタンをクリックします。するとデータの行と列が入れ替わりますので１行目を削除して体裁を整えて保存します。それをＡｃｃｅｓｓにインポートします。半年や月１程度の更新ならこのほうが簡単だと思います。Ｅｘｃｅｌ９７で実験しました。
それ以上のデータ量があったり、更新の頻度が多い場合はＥｘｃｅｌでもめんどくさくなりますので、プロシージャを使って処理をするしかないようです。

as - 00/03/16 10:30:29
コメント:
オクさんこんにちは。アドバイスありがとうございました。でも、教えて頂いた方法では、問題があってできないのです。 Mailだしてもいいですか？それでは。

オク - 00/03/15 12:55:40
電子メールアドレス:link@ceres.dti.ne.jp
コメント:
メールのアドレスが、TXT形式、あるいは、HTML形式で保存してあるファイルがあります。このファイルを、アクセスで管理したいのですがいい方法はありますか？どのような感じになっているかといいますと以下に示す通り、メアドとメアドの間には”；”（セミコロン）で区切ってます。区切りの記号はどんな形にも置き換えることはできるのですが、すべてを一つ一つのデータに置き換えることがわかりません。ただ単にメールを送信知るのであればすべてコピーしてあて先に入れればよいのでしょうが、各カテゴリー別にメアドを管理して同じメアドがあった場合には、抽出して整理したいと思ってます。ファイルはこんな感じです。 link@ceres.dti.ne.jp ;link@ceres.dti.ne.jp ;kijuyh@bbb.dti.ne.jp; kkk@diury.ne.jp;sss@jdiru.dk.ne.jp;・・・・・・とこのように以下たくさんのアドレスがある場合、どうすれば変換できますかどなたかよろしくお願いします。

ＨＡＭＡ - 00/03/13 22:27:54
コメント:
asさん　こんにちは
「合計欄が０の人は非表示にする」というのは、「合計欄が０以外の人だけ表示する」という意味でしょうか？先にクエリーで「合計欄が０の人」を表示しないようにしたほうが良いと思いますのでこれを試してはいかがでしょうか。まず「生保データ」テーブルから選択クエリーを作成して「合計欄」の式をクエリーのフィールドとして追加します。その「合計欄」フィールドの抽出条件を半角文字で「＜＞０」とします。このクエリーをレポートのレコードソースとして使えば「合計欄が０の人」が非表示にできます。

ＨＡＭＡ - 00/03/13 22:28:11
コメント:

壁村敏郎 - 00/03/13 20:45:10
電子メールアドレス:kabemura@peach.ocn.ne.jp
コメント:
たくさんある銘柄の中から一つだけを選び出し一番新しいものの中から２番目に新しいものを引いて差を出したいのですがどうしたらいいでしょうか？

ａｓ - 00/03/11 00:21:27
コメント:
こんにちは。またおじゃまさせていただきます！早速、質問ですが、レポートで、生命保険金額の合計欄が０の人を非表示にしたいのですが、うまくいきません。レポートopen時処理にいれたいのですが、どうしたらいいのでしょうか？そのレポートは生保データというテーブルを参照していて、合計はコントロールソースに式を設定しています。助けてください！よろしくお願いします。

TOKU - 00/03/02 17:15:20
電子メールアドレス:stokunaga@xcat.co.jp
コメント:
asさん良かったですね。私もあまり詳しくないのですが、私でわかることがあればお教えいたします。お互いにがんばりましょう。

- 00/03/02 13:32:38
コメント:
TOKUさんこんにちは。どうもありがとうございました。やってみたらできました。でも、" "ではエラーがでてしまい、Nullにかえたら上手くいきました。ほんとに、初心者でわからないことだらけですので、またお願いします。

TOKU - 00/03/01 12:03:22
電子メールアドレス:stokunaga@xcat.co.jp
コメント:
as さんこんにちは。下の質問で私がわかる範囲でお教えします。持株口数の入力フィールドのイベントプロシージャでコードを記述すれば大丈夫だと思います。具体的に言うと、入力フィールドのプロパティの中のイベントタグの中でコードを記述。なんのイベントでもいいのですが、例として更新後処理にに記述してみました。そこで IF [持株口数]=0 THEN [持株口数]　="" END IF と記述するとうまくいったようです。しかし私の場合はフォームのレコードソースとしてテーブルを使っているので ASさんのケースと一緒かどうかわかりません。何かの参考にでもなればいいんですけど。

as - 00/02/29 13:04:21
コメント:
データ入力フォームで持株口数が０と入力されると、自動的に空白になるようにしたいのですが、どうやってやったらいいのかわかりません。とても、困っています。どうか教えて下さい。宜しくお願いします！

ＨＡＭＡ - 00/02/25 21:42:28
コメント:
TAK様こんにちは。プログレスバーコントロールの件ですが、レジストリを変更する方法以外で使えるようにする方法がわかりました。
マイクロソフトのサイトでダウンロードできる「Visual Basic Version 5.0 Control Creation Edition SP2 日本語版無償ダウンロード」（以下VB5CCE）をインストールすると使用出来るようになりました。
VB5CCEをインストールすると「Comctl32.ocx」と「Comdlg32.ocx」で使えるActiveXコントロールが使用できます。
注意点としては、いくつかのファイル（ｏｃｘファイルなど）がバージョンアップするため、単独で使用するには問題ありませんがネットワーク全体で使う場合やｍｄｂファイルなどを配布する場合はその使用するコンピュータにも同じバージョンのｏｃｘファイルが参照できないと使えない事です。やたらにシステムを変更したくない場合もお勧めできる方法ではないんですが・・・簡単ではありますがご報告させていただきます。

TOKU - 00/02/18 13:56:01
電子メールアドレス:stokunaga@xcat.co.jp
コメント:
初めまして。早速ですが質問があります。レポートで１枚のページに２件のデータだけを表示したいのです。例えば顧客管理の帳票などで、Aというお客さんは何日にどこの店で○○という商品を買った、 (Aさんという人は一人しかいないが、Aさんが買った商品はいっぱいある、可変です。）というデータを１ページに２件表示したいのです。もっと詳しく言うと、１枚目のページにAさんとBさん、２枚目のページにCさんとDさん、というように表示したいのです。うまく説明できたかわかりませんが、何か知っていることがあれば教えてください。

TAK - 00/02/16 08:14:19
コメント:
え～っと、私がかなり前に買った参考書は当時Ａｃｃｅｓｓ2.0全盛期だった頃のやつです。ですから今のＡｃｃｅｓｓ９７やＡｃｃｅｓｓ２０００に直接移植しようとすると、戸惑うかも知れません。ですがかなり詳しく載っていますので、参考になるかもしれません。本の名前はアプリケーション開発者のためのＡｃｃｅｓｓＢａｓｉｃＳＱＬと言う題名です。出版社はアプライドナレッジで小島政行著です。当時定価３２００円でした。（税込み）内容はかなり幅広くＳＱＬ文の書き方、パラメータークエリーを使ったＶＢＡの記述の仕方、他にはＳｎａｐＳｈｏｔ，ＤｙｎａＳｅｔ，ｏｐｅｎＴａｂｌｅの違いを解説していたりしてかなりお買い得な本でした。今でもなかなかここまで書かれた本はないと思います。よかったら本屋に行って直接目を通してみてはいかがでしょうか。値段は少し高めですが、基本を確実に押さえられると言う意味では買いだと思います。

もこもこ - 00/02/15 19:33:22
コメント:
ＡＣＣＥＳＳとは直接関係ないのですが、ＴＡＫさんの説明のもととなるデータベースは、何を基本としているのですか？何か参考書についているのでしょうか？前回質問したことを詳しく書いた参考図書があれば教えてください。よろしくお願いします。

もこもこ - 00/02/15 19:18:13
コメント:
ありがとうございました、とりあえずやってみます。又わからないことがあったら教えてください。

Tak - 00/02/15 18:48:21
コメント:
え～っと要はあれかな？パラメータークエリーを作っておいて、それをレコードセットとして呼び出すってやつですか？だとしたら下記のやり方で出来ますよ。 DIM QDF_1 As QueryDef DIM Mydb_1 As Database DIM MyTable_1 As Recordset Set Mydb_1 = DBEngine.Workspaces(0).Databases(0) Set QDF_1 = Mydb_1.QueryDefs("Q_出荷数") QDF_1.Parameters("[Forms]![F_出荷保守_2]![取引先コード]") = Me!取引先コード Set MyTable_1 = QDF_1.OpenRecordset()

ＨＡＭＡ - 00/02/13 12:33:48
コメント:
もこもこ様　こんにちは。
パラメータクエリーを使ってクエリーやフォームを表示する場合、「パラメータの入力」で入力した値（抽出条件の実際の値）を取得する方法が分からないため、パラメータクエリーのままでは後の「別テーブルへのデータ保存」ができないと思われます。
別のテーブルへデータを保存するには、「RunSQL」メゾットで「更新クエリー」や「追加クエリー」を実行すれば出来ると思います。
問題はパラメータクエリーでの抽出条件を取得する方法が分からないので、パラメータクエリーは使わず「フォームフィルタ」を利用して、フィルタで実行した値を抽出条件として利用する方法しか思いつきませんでした。
パラメータクエリーのままでも「RunSQL」メゾットは実行可能ですが、実行時に新たに「パラメータの入力」で抽出条件を聞いてきます。
「RunSQL」メゾットの詳細はＡｃｃｅｓｓヘルプファイルの「RunSQLメゾット」を参照して下さい。
追伸：パラメータクエリーの「パラメータの入力」で入力された値（プロパティ）の取得が出来るのならば、もこもこ様の御希望の処理に近いことができると思いますが・・・どなたか分かる方がいらっしゃいましたら、お教え下さい。（逆に質問してすみません）

さち - 00/02/12 20:13:59
電子メールアドレス:co9506@cis.fukushima-nct.ac.jp
コメント:
クエリーの抽出条件で、ビルド式を設定し、これをマクロで実行させ、プラス次のフォームを開くようにアクションを指定し、引いてきたフィールドやデータを次のフォームで表示させたいのですが、出てくれません。出したいフィールドは画像でなのですが、これを表示できないのは、結果を表示させるフォームのボックスまたはコントロールソースが悪いのでしょうか？

さち - 00/02/12 18:25:54
電子メールアドレス:co9506@cis.fukushima-nct.ac.jp
コメント:
はじめまして。今、Access97で服のカラーコーディネートDBを作っているのですが、マクロの使い方が分からず苦戦しています。そこでぜひ教えて頂きたいと思いここに載せて見ました。いちよう中身を説明します。データベースの動きについては、まず好きなトップスアイテム（4種類中から、カットソー、シャツ、ニット、アウター）を選びます。例えばシャツのコマンドボタンをクリックするとフォームが移り、シャツのアイテムが選べる詳細や画像がみれるフォームに移ります。そこで、好きなシャツを選ぶと、次のフォームで今選んだ服の画像とそれに調和するボトムが選ばれて表示されるようにします。（詳細や画像）そこでボトムが選ばれる条件については、カラーコーディネータでは大切な理論（ムーンスペンサーの色相環）を利用して、R,G,Bの表をつくりそれぞれの値を組み合わせてあります。それらの値は24個に分け、もしトップのアイテムの色が2のグループに属していれば、それに調和するグループは3，と4と9と....というようにきめられています。それを選択クエリーで、フィールドのところにその調和値（レコード一つ一つに対して入力してある）をいれ、抽出条件にビルトで以下のようにいれました。 [シャツ]![調和値] Or IIf([シャツ]![調和値]+2>=24,[シャツ]![調和値]+2-24,[シャツ]![調和値]+2) Or IIf([シャツ]![調和値]+3>=24,[シャツ]![調和値]+3-24,[シャツ]![調和値]+3) Or IIf([シャツ]![調和値]+8>=24,[シャツ]![調和値]+8-24,[シャツ]![調和値]+8) Or IIf([シャツ]![調和値]+9>=24,[シャツ]![調和値]+9-24,[シャツ]![調和値]+9) Or IIf([シャツ]![調和値]+10>=24,[シャツ]![調和値]+10-24,[シャツ]![調和値]+10) Or IIf([シャツ]![調和値]+11>=24,[シャツ]![調和値]+11-24,[シャツ]![調和値]+11) Or IIf([シャツ]![調和値]+12>=24,[シャツ]![調和値]+12-24,[シャツ]![調和値]+12) Or IIf([シャツ]![調和値]+13>=24,[シャツ]![調和値]+13-24,[シャツ]![調和値]+13) Or IIf([シャツ]![調和値]+14>=24,[シャツ]![調和値]+14-24,[シャツ]![調和値]+14) Or IIf([シャツ]![調和値]+15>=24,[シャツ]![調和値]+15-24,[シャツ]![調和値]+15) Or IIf([シャツ]![調和値]+16>=24,[シャツ]![調和値]+16-24,[シャツ]![調和値]+16) Or IIf([シャツ]![調和値]+21>=24,[シャツ]![調和値]+21-24,[シャツ]![調和値]+21) Or IIf([シャツ]![調和値]+22>=24,[シャツ]![調和値]+22-24,[シャツ]![調和値]+22) このパラメータクエリを、例えばシャツで好きなレコードをコマンドボタンで選択したとき、マクロ実行して次のフォームに行く際、この調和値にあったレコードたちと、好きなレコードの画像をそのまま持って引き継ぐためにはどのようにマクロをせっていしたらよいのでしょか？わかりずらい説明でもうしわけありません。

もこもこ - 00/02/10 21:55:39
電子メールアドレス:mokomoko@mx4.tiki.ne.jp
コメント:
はじめまして、アクセス初心者のものです。どうしてもわからないので教えてください。 4種類のテーブルからパラメータクエリーを利用して、必要なデータを一つのフォームに表示できるようにしているのですが、このフォームに表示したデータの必要なデータだけを別のテーブルに保存するにはどのようにしたらよいのでしょうか？フォーム上でボタンを押すと別のテーブルにデータを保存できるようにしたいのですが・・・お手数ですが、ぜひとも教えてください、よろしくお願いします。

ＨＡＭＡ - 00/02/09 22:19:58
コメント:
TAK様　回答ありがとうございます。
自分なりに「Ｗｉｎ９５」と「Ｗｉｎ９８」でのプログレスバーコントロールのレジストリの違いを調べてみようと思います。
また何か分かりましたら、教えて頂きますようお願い申し上げます。ありがとうございました。

TAK - 00/02/09 12:51:51
コメント:
HAMA様プログレスバーコントロールの件ですが、Ｗindows９８で標準サポートかどうかは分かりませんが、ただ分かることとしましたら、レジストリにラインセンスキーなるものがありますので、そのラインセンスキーを変更して頂ければいいと思います。レジストリのどこにあるかは分かりませんが。私が実際に経験したことは、ＤataGridコントロールがＷin９５（他）にインストールされてもそれを使用することはできるが、デザイン編集はできないと言うことでした。これもやはりラインセンスキーの問題でした。何か分かりましたらまた書き込みさせていただきます。

ＨＡＭＡ - 00/02/07 23:04:45
コメント:
こんにちは。　どなたか、知っておられましたら教えて下さい。
「フォーム」で使用できる「ＡｃｔｉｖｅＸコントロール」の中に「ＰｒｏｇｒｅｓｓＢａｒＣｏｎｔｒｏｌ」というものがあります。これは、メーターを表示することが出来るコントロールです。（たとえば「コピーしています」などで出てくるメーターと同じような物です。）
このコントロールは何故かＷｉｎｄｏｗｓ９５（４．００．９５０Ｂ）で使おうすると「このＡｃｔｉｖｅＸコントロールを使用するライセンスがありません。」というメッセージが出て使うことが出来ません。ところがＷｉｎｄｏｗｓ９８の場合は問題なく使用できます。
このコントロールをＷｉｎｄｏｗｓ９５で使う方法があるのでしょうか？また「ライセンス」に付いて知っている方がいらっしゃいましたら、教えて下さい。使用する環境はＷｉｎｄｏｗｓ９５（４．００．９５０Ｂ）＆Ｏｆｆｃｅ９７Ｐｒｏです。よろしくお願い致します。

わたたに - 00/02/07 14:34:08
コメント:
ことぶき様へ　　出来ました、ご指導ありがとうございます。結合タイプが”「最新の購入部品＿ＫＥＹ」の全レコードと「仕入部品」の＜部品コード＞を結合”だとエラーになってしまうため、”両方のテーブルの結合フィールドが同じ行だけを含める」でうまく行きそうです。　この方法で更に絞り込む、例えば”各「部品コード」毎の最新「購入日」かつ、最低「金額」時の「担当者」のレコード”なんて場合には、もう一つクエリーが必要になりますよね。クエリー一発で・・・なんて出来ないでしょうか？難しいです。

ことぶき - 00/02/07 08:44:30
コメント:
わたたに様へ　　すいません。２／４のＲｅ：宛名を書き忘れてしまいました。うまく改行されていなくてすいません。

ＨＡＭＡ - 00/02/05 10:40:54
コメント:
おっきー様へ　こんにちは。「サブフォームのコントロールを使用不可にしたい」の件ですが、確かにエラーが発生するのが確認できました。あまり良い方法とは思えませんが、エラーを防ぐ方法を２つほど考えてみました。　　１つは、サブフォームのどこかに非連結のテキストボックスを作成して、そこにＳｅｔｆｏｃｕｓメゾットを使ってフォーカスを移し、その後他のコントロールを使用不可にする方法です。（このテキストボックスは使用可能のままにしておく事）　　もう１つはサブフォーム内のコントロールを使用不可にするのではなく、サブフォームそのものを使用不可にする方法です。ただし、サブフォームを使用不可にしても、見た目が全然変わらないため使用不可にしたのかしないのかがクリックしないと分からないという欠点があります。これを区別するためにメインフォームのタイトルバーなどに「サブフォーム使用不可」などと表示させるなどの工夫が必要になります。

ことぶき - 00/02/04 14:14:11
コメント:
ご希望の結果を得るには、ちょっと邪道かもしれませんがそのクエリーの前にもうひとつクエリーを作る必要があります。（例）　　＊．元のテーブル（又はクエリー）を仮に「仕入部品」とし、＜部品コード＞＜購入日＞＜金額＞の　　　　フィールドがあるとします。　　　　ここから、その目的のクエリーを「最新の購入部品」という名前で作ると仮定します。　　１．まず、クエリーの新規作成で「仕入部品」から＜部品コード＞＜購入日＞を選択します。　　　　集計にして＜部品コード＞をグループ化、＜購入日＞を最大にします。　　　　これを仮に、「最新の購入部品＿ＫＥＹ」というクエリ名で作るとします。　　２．次に、クエリーの新規作成で「仕入部品」と「最新の購入部品＿ＫＥＹ」をテーブル表示します。　　　　「仕入部品」の＜部品コード＞　→「最新の購入部品＿ＫＥＹ」の＜部品コード＞を結合します。　　　　結合のタイプは、”「最新の購入部品＿ＫＥＹ」の全レコードと「仕入部品」の＜部品コード＞を結合” 　　　　にします。それと同様に＜購入日＞も結合します。結合タイプも同じです。　　　　＜部品コード＞フィールドを「最新の購入部品＿ＫＥＹ」からデザイングリットに選択します。　　　　＜購入日＞、＜金額＞フィールドを「仕入部品」からデザイングリットに選択します。あとは、クエリーをビューして下さい。ちょっと、説明がくどかったかもしれません。わかりづらいようでしたらサンプル．ＭＤＢがありますのでメールしても構いません。ｐｓ：この説明文の改行がうまくされていなかったらすいません。

わたたに - 00/01/31 15:32:40
コメント:
ことぶき様へ、　パソコンが壊れてしまいお礼の返事が遅くなりました、ありがとうございます。「DMax」関数を試して見ました。それで最新の[日付]のレコードを抽出することは出来たのですが、[部品番号]ごとの最新の日付となると出てきてくれません。[部品番号]をグループ化した上で、それぞれ[部品番号]毎の最新の[日付]のレコードを抽出するにはどうすればよいのでしょうか？「MAX」関数などいろいろ試しているのですが、どうも使い方を間違っているようで、うまくいきません。もう少しご伝授願えませんでしょうか？

ことぶき - 00/01/31 08:52:32
コメント:
ＨＡＭＡ　様へ回答ありがとうございました。希望どおりの結果を得ることが出来ました。いろいろなところで活用させていただきます。

ＨＡＭＡ - 00/01/29 19:53:56
コメント:
ことぶき様へ　（選択クエリーの・・・）の件ですが、組み込み関数ではこの機能に該当するものはなさそうです。そこでユーザー関数を作ってみました。内容は次の通りです。プロシージャ　　Public Function myNumber(myRecord) As Long　　　Dim dbs As Database　　　Dim rst As Recordset　　　Set dbs = CurrentDb()　　　Set rst = dbs.OpenRecordset("クエリー名")　　　rst.FindFirst "フィールドＡ = " & myRecord　　　myNumber = rst.AbsolutePosition + 1　　　End Function　　　　この関数の構文は次の通りです。　myNumber([フィールドＡ])　　補足：”クエリー名”は実行するクエリー名を打ちこんで下さい。　　　プロシージャと構文内の［フィールドＡ］には実行するクエリー内に使われているフィールドであり、値が重複しないものを選択して下さい。（主キーなど）該当するフィールドがない場合は、オートナンバー型フィールド等で作成して下さい。　　　この関数をクエリーに入力したら、一度保存してから閉じてもう一度開きなおした時から有効になります。クエリーの内容（データの変更・追加・削除・並べ替え・フィルタ）を変更した場合は、再度開き直さないと番号は振り直されません。１レコードごとに一回プロシージャを実行するためかなり処理が遅くなります。　　（注意）この関数フィールドに絶対並べ替えや抽出条件を設定しないで下さい。エラーが連発して強制終了で終わる方法しかありません。　　Ｗｉｎｄｏｗｓ９８ＳＥ＆Ａｃｃｅｓｓ９７で動作確認をしています。見にくくてすみません。

ことぶき - 00/01/28 11:58:30
電子メールアドレス:p_taro@mail.goo.ne.jp
コメント:
ＨＡＭＡ様　回答ありがとうございました。用途としてはクエリー結果をテキスト変換して他のシステムに転送するといった方法をとりますのでその、「関数を使用して・・・」が知りたいです。もし差し支えなければ大変恐縮ですが、サンプル.mdbなどメール頂けるとありがたいです。もし面倒であれば、使用する関数名だけでも教えて下さい。よろしくお願いします。

ＨＡＭＡ - 00/01/27 21:47:18
コメント:
ことぶき様へはじめまして。（選択クエリーの・・・１～順番に番号を付番したいのですが・・）の件ですが、レポートに連番をつけたいのであれば、テキストボックスの［集計実行］プロパティを使えば出来ます。非連結でテキストボックスを［詳細］セクションに作りテキストボックスプロパティの［コントロールソース］は＝１を入力（半角で）、［集計実行］は”全体”を指定して下さい。詳しくはＡｃｃｅｓｓヘルプファイルの”ＲｕｎｎｉｎｇＳｕｍプロパティ”を参照して下さい。ちなみに［集計実行］はレポートのみに使えるプロパティです。追伸：クエリーのフィールドとして番号を付ける方法は見つけましたが、ユーザー関数を使う方法のため処理がかなり重いのです。それでもよろしかったら・・・説明文も長いので・・・

ことぶき - 00/01/24 08:20:19
コメント:
わたたに様へ　私の場合、最大の日付を抽出した結果を集計する場合は、集計に最大を指定するのではなく、抽出条件にＤＭＡＸ関数を使用しています。記述例は、DMax("日付","抽出の元になるテーブルまたはクエリー名")　　です。これは、日付のフィールドをクエリーに選択してそこにこの抽出条件をかませばいけると思います。それでは_/_/

わたたに - 00/01/21 09:10:53
電子メールアドレス:watatani@yh-nemcom02.ccgw.nec.co.jp
コメント:
☆ある条件を満たすレコードの抽出方法を教えてください（Ａｃｃｅｓｓ９７です）。みなさん初めまして、よろしくお願いします。早速ですが、それぞれの[部品番号]ごとに最新の[日付]で購入したときの[価格]のレコードのみを取得を目的として、選択クエリーで色々試しているのですがうまくいきません。例えば集計行の指定で、[部品番号]＝グループ化　[日付]＝最大　[価格]＝先頭とやってしまうと[価格]と[日付]のレコードがちぐはぐになってしまいます。 [部品番号]＝グループ化　[日付]＝最大　[価格]＝グループ化　にすると複数の価格が出てきてうまくありません。何とかならないものでしょうか？初心者ですので、わかりやすく教えていただけるとありがたいのですが・・・

たくや - 00/01/18 10:54:00
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
久々の書き込みです。今回はファイルのバージョン情報の取得方法が分からなくて弱ってます。ＥＸＥファイルの検索をして、一致したファイルがあったばあい、そのバージョンの情報を取得したいのですがそれの取得方法が分かりません。どなたか知っている方いましたら教えてください。

ことぶき - 99/12/24 13:42:31
コメント:
はじめまして。ＡＣＣＥＳＳ９７をＮＴ４．０で使用しています。選択クエリーの出た結果によってそのレコードの[行№]というフィールドに１～順番に番号を付番したいのですが出来るでしょうか？そのクエリー結果は一定ではなく元のテーブルにデータが追加されるとクエリー結果もレコード件数が変動するため行№を決め打ちできないのです。クエリーのデザインビューでフィールドに数式等を入れて出来ないのであれば、あとはそのクエリー結果をもとに新しいテーブルへ１件ずつ行№を付番して書込むモジュールを作るしかないのかなと思うのですが、如何せん初心者なもので・・・・・。どなたかよい方法がございましたらご伝授願いたいのですが。

tak - 99/12/15 08:50:12
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
泰造様へやれない訳ではないですが、少しモジュールを組まないとマクロとクエリーだけでは苦しいような気がします。テーブルとしてはもう一つ集計用のテーブルを作成しておかないと辛いです。構造---> 場所(主キー) 名前種類数を TMP_TABLE2(一時テーブル)とします集計元テーブルを TMP_TABLEとします Dim db As Database Dim tb1 As RecordSet Dim tb2 As RecordSet Set db = Currentdb Set tb1 = db.openrecordset("TMP_TABLE",dbopentable) Set tb2 = db.openrecordset("TMP_TABLE2",dbopentable) tb2.Index = "PrimaryKey" Docmd.runsql "Delete TMP_TABLE2.* From TMP_TABLE2" Do Until tb1.EOF tb2.Seek "=",tb1!場所 if tb2.Nomatch Then tb2.AddNew tb2!場所 = tb1!場所 tb2!名前 = tb1!名前 tb2!種類数 = 1 tb2.Update Else tb2.Edit tb2!名前 = tb2!名前 & tb1!名前 tb2!種類数 = tb2!種類数 + 1 tb2.Update End if tb1.MoveNext Loop tb1.Close tb2.Close Set tb1 = Nothing Set tb2 = Nothing

泰造 - 99/12/13 19:52:39
電子メールアドレス:__hide_@excite.co.jp
コメント:
初めまして！突然質問で申し訳ないのですが私は最近Accessを始めたのですが、分からないことがあるので教えて下さい。あるテーブルに下のようなデータがあったとして　コード　　　場所　　　名前　　　　 0100　　　AAAA　　　バス　 0101　　 AAAA　　　タクシー　 0102　　　AAAA　　　自転車　 0103　　　BBBB　　　トラック　 0104　　　BBBB　　　３輪車このテーブルを何とかして下のようにしたいです。　　場所　　　　　　名前　　　　　　　　　種類数　　AAAA　　　バス,タクシー,自転車　　　　　３　　BBBB　　　トラック,３輪車　　　　　　　２と言うようにしたいのですがどうしても思いつきません。 Access97では無理なのでしょうか？何かいい方法は無いでしょうか？教えて下さい。　

おっきー - 99/12/13 13:26:58
電子メールアドレス:okishima@ryukyu.ne.jp
コメント:
こんちは。初心者的質問ですみませんがどなたか教えて下さい。サブフォーム付きのフォームがありまして、このサブフォームのテキストやコンボは全てEnabled=False Locked=true の状態です。で、メインフォーム上の[入力]というコマンドボタンを押すと、こいつらのEnabled, Locked が解除になって使用できる状態になり。サブフォームの一番最初のコントロールにフォーカスが移るようにしています。ここまでは問題ないんですが・・・。サブフォームにデータを入力したあと、[入力終了]というボタンがメインフォームにありまして、こいつを押すと入力終了ということでサブフォームのコントロールを使用不可にしたいのです。で、VBAで組んでみたのですが、いざ実行してみると、エラー番号２１６４、「コントロールがフォーカスを取得しているときは、コントロールを無効にすることはできません」というエラーが出ます。この処理を実行するプロシージャの一番先頭の行で、Me.Setfocus と指定しているのですが、サブフォーム内のコントロールは密かにフォーカスを得ている状態のようで、どーしてもフォーカスを消すことができません。 DoCmd.GoToControl でも試してみたのですが、ダメでした。どなたかいい方法をご存じでしたら、教えて下さい。

おが - 99/12/03 13:04:24
コメント:
はじめての質問です。現在、ACCESS97を使用しています。一つのデータベースをテーブルのみのバックエンドと、テーブル以外全てのフロントエンドデータベースに分割してあります。バックエンドをパソコンサーバーに置き、フロントエンドは各自のパソコンに入れて、LAN環境で使用しています。そこで、質問です。テーブルは多数ありますが、それぞれリレーションシップをとってあり、参照整合性を持たせています。ところが、ある日久しぶりにリレーションシップ画面を開いてみたら、余分なテーブルが追加されているのです。１対多で設定してある、１側に全てテーブルのコピーができているのです。これはいったいどういうわけなのでしょうか？どなたか、お教え願えませんでしょうか？（クエリーグリッド画面で、同一テーブルを追加したときに表示されるように、「テーブル名_1」が、それぞれ追加されていたのです）

6t@ - 99/12/03 12:50:10
コメント:
2

みっちゃん - 99/11/17 17:28:22
電子メールアドレス:murai@nsknet.or.jp
コメント:
いつも質問ばかりでごめんなさい。ＡＣＣＥＳＳのＶＢＡで他のアプリケーションのファイルをファイル名を指定して開くなんてことできるのでしょうか。　　お教え下さい。

たくや - 99/10/29 15:05:50
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
関係ないかもしれませんが、今日発見した事です。Ｗｉｎｄｏｗｓアプリそのものの話です。私が今日地域を日本以外にしてアプリを立ち上げようとしたらエラーが出てしまいました。これはそもそもアプリ側が日本語で作られていた為、他の言語モードで開こうとすると内部的に処理できないみたいです。ちなみに、ＡＣＣＥＳＳ９７のＭＤＥファイルこの為に壊れました；；追記どなたか知ってましたら教えてください。ＡＣＣＥＳＳ９７でファイルメーカーのデータは操作できるでしょうか？また逆の事も可能でしょうか？

HIRO - 99/10/29 09:35:49
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
たかこ様へ
おはようございます。
そのフォームがテーブルと連結されているかどうかによりますが、
連結されていなければ
一つの例としては
DIM DB AS DATABASE
DIM RS AS RECORDSET
DIM SQL AS STRING
SQL = "SELECT テーブル名.* FROM テーブル名 WHERE " & 条件文
SET DB = CURRENTDB
SET RS = DB.OPENRECORDSET(SQL)
ME!名前１ = RS!フィールド名１
ME!名前２ = RS!フィールド名２
RS.CLOSE
DB.CLOSE
こんなところですかね。

もし連結されているなら
FILLTERやBOOKMARKが使えると思います。

たかこ - 99/10/29 00:47:43
コメント:
下の記述はHIROさんにでした・・・・書くの忘れました。

たかこ - 99/10/29 00:46:23
コメント:
そうそう、その通りです。一つのフォームがあり、そのフォーム上に検索条件の入力項目と検索された結果を表示するいくつかの項目があるというイメージです。ちなみにSQLを使うのが一番簡単ですか？

HIRO - 99/10/28 09:46:52
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
たかこ様へ
その前に、具体的に言うと．．．
一つのフォームがあり、そのフォーム上に検索条件の入力項目と
検索された結果を表示するいくつかの項目があるというイメージでよろしいのかな？

たかこ - 99/10/28 01:31:08
コメント:
HIROさんへちょっと下の書き込み、書きこみすぎですね.....。おまけにめっちゃ読みづらい。すみません。気にしないで下さい。もし、何かアドバイスありましたら教えてください。

たかこ - 99/10/28 01:28:14
コメント:
HIROさんへ >検索条件をＷＨＥＲＥ句で指定したＳＱＬ文でレコードセットをオープン >するのがよいのでは具体的な記述をできたら教えてください。 >結果というのは条件のレコードが存在するかどうかということですか？ >それとも対象のレコードを表示ということ？対象のレコードですね。検索文字列に入力した文字と同じものを探す、ということです。ちょっと、私なりに考えてみたんですけどね、以下のような記述でできそうな気もするんですけど、（ヘルプの使用例を参照）私も初心者なもんで、どこをどう変えるところなのかよく分からなくて… Dim dbsNorthwind As Database Dim rstCustomers As Recordset Dim strCountry As String Dim varBookmark As Variant Dim strMessage As String Dim intCommand As Integer Set dbsNorthwind = OpenDatabase("Northwind.mdb") Set rstCustomers = dbsNorthwind.OpenRecordset( _ "SELECT CompanyName, City, Country " & _ "FROM Customers ORDER BY CompanyName", _ dbOpenSnapshot) Do While True ' ユーザーからの入力を取得して ' 検索文字列を組み立てます。 strCountry = _ Trim(InputBox("Enter country for search.")) If strCountry = "" Then Exit Do strCountry = "Country = '" & strCountry & "'" With rstCustomers ' レコードセットを配置します。 .MoveLast ' 検索文字列に該当する最初のレコードを検索します。 ' 該当するレコードが存在しない場合、ループを抜けます。 .FindFirst strCountry If .NoMatch Then MsgBox "No records found with " & _ strCountry & "." Exit Do End If Do While True ' カレントレコードのブックマークを格納します。 varBookmark = .Bookmark ' ユーザーは使用するメソッドを選びます。 strMessage = "Company: " & !CompanyName & _ vbCr & "Location: " & !City & ", " & _ !Country & vbCr & vbCr & _ strCountry & vbCr & vbCr & _ "[1 - FindFirst, 2 - FindLast, " & _ vbCr & "3 - FindNext, " & _ "4 - FindPrevious]" intCommand = Val(Left(InputBox(strMessage), 1)) If intCommand < 1 Or intCommand > 4 Then Exit Do ' 選択された Find メソッドを使用します。 ' 検索が失敗した場合、最後のカレントレコードに戻ります。 If FindAny(intCommand, rstCustomers, _ strCountry) = False Then .Bookmark = varBookmark MsgBox "No match--returning to " & _ "current record." End If Loop End With Exit Do Loop rstCustomers.Close dbsNorthwind.Close End Sub

HIRO - 99/10/26 21:05:07
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
たかこ様へ
こんばんわ
検索条件をＷＨＥＲＥ句で指定したＳＱＬ文でレコードセットをオープン
するのがよいのでは
結果というのは条件のレコードが存在するかどうかということですか？
それとも対象のレコードを表示ということ？

たかこ - 99/10/24 15:33:24
コメント:
ACCESS初心者です。モジュールを使って、検索をするようにしたいのです。検索文字列にキー入力（複数項目）して、その結果を表示させたい。記述の仕方がわかりません。教えてください。

NAGAI - 99/10/13 16:09:54
コメント:
ACCESS2000でMSDEを使っています。SQLサーバーのプロシージャ、ヴューをMSDEに移行して使いたいのですが、エラーで、うまく移行できません。移行はできないのでしょうか？どなたか教えて下さい。

ヤスカナ - 99/10/04 18:35:42
電子メールアドレス:yasukana@anet.ne.jp
コメント:
アクセス2000を使用しています。自分自身の最適化を行います。（以下の文） SendKeys "%TDC", False 以前は最適化実行後、立ち上がり、AUTOEXECが実行されました。しかし！アクセス2000に変わってから、立ち上がりが行われません。これを実行させるにはどうすれば良いでしょう。

たくや - 99/10/01 08:42:28
コメント:
cyberyoshi様＞やってみたらうまく出来ました。ありがとうございました。また何か分からない事があったら教えてください。本当ありがとうございました。

cyberyoshi - 99/09/30 18:07:42
コメント:
たくや様 : はじめまして、ＮＴを使用してモジュール内でコマンド実行する場合は、ＣＯＭＭＡＮＤ．ＣＯＭでなくＣＭＤ．ＥＸＥを使用してみてください。

NAGAI - 99/09/29 19:58:52
コメント:
たくや様 : 同期が取れると便利ですね。今まで、同期が取れなくて、そうゆうもんだと思ってましが、やってみたらうまくいきました。アドバイスありがとうございました。んー、ACCESSは奥がふかい・・・。

たくや - 99/09/29 11:54:18
コメント:
NAGAI様）残念ながらShell関数を用いて実行します。但しShell関数では同期ができない。すなわち、Shell関数で完全にコピーし終わらないうちに次のステップに移ってしまうので、 API関数を宣言して、API関数内で実行させてます。 API関数をここに書くと長くなるので遠慮させていただきます。

NAGAI - 99/09/28 19:44:31
コメント:
たくやさんに質問です。モジュール内でコマンドを書くにはどうすればよいのですか？ COMMAND.COM /C Copy D:\XXX.mdb D:\YYY.mdb だけで OKですか？反対に質問しちゃってすいません。

たくや - 99/09/28 19:30:27
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
下に書いたことですが、MS-DOS の８．３形式でやるとうまくいきます。しかし、どちらかが８．３以外９．３や１０．３でやるとコピーができませんでした。どうもロングファイル名は上手く処理できないようです。原因は不明ですが。

たくや - 99/09/28 18:11:52
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
知っている方いたら教えてください。 Win95 OSR2,Access97 の環境で COMMAND.COM /C Copy D:\XXX.mdb D:\YYY.mdb という具合にMS-DOS コマンドをモジュール内で指定すると、うまくコピーができるのですが、WinNT4.0 SP3,Access97の環境でやるとパラーメータが多すぎますと出てきて、うまくコピーできません。 Win95とWinNT4.0のMS-DOS コマンドの差異一覧ってのはあるのでしょうか？

NAGAI - 99/09/28 17:09:16
コメント:
HIROさまへ：おそくなりまして、サブレポートの件です。サブレポートのレコードソースはパススルークエリーなんです。で、そのままやると、サブフォームが表示されないのです。で、そのパススルークエリーからテーブルを作って、それをレコードソースにすると表示されるのです。思うに、パススルーはサブレポートのソースにできないのではと。。。解りましたら、よろしくお願いいたします。

HIRO - 99/09/20 13:07:56
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ny様へ
共有にすればできるのでは？
共有の仕方が分からないという事ですか？

ny - 99/09/17 18:45:59
電子メールアドレス:akc@pastel.ne.jp
コメント:
アクセス初心者ですが、かなり悩んでいます。環境：Windows98,ACCESS97。ＮＥＣ－ＰＣとＮＥＣノートをハブで接続しています。普段はプリンタの共有だけです。ＮＥＣ－ＰＣのほうでデータベースを作成したのですが、それをノート（クライアント？）のほうから使用（ファイルの共有）できないでしょうか？宜しくお願いします。

ny - 99/09/17 18:38:23
コメント:
2

しゃすら - 99/09/16 20:14:52
コメント:
ＨＩＲＯ様へ
やはり、それしかありませんか（笑）わっかりました♪ どうも、ありがとうございます<(_ _)>

HIRO - 99/09/16 11:27:25
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
しゃすら様へ
新規作成時に二つのテーブルの何れかのフィールド（又はダミーフィールド作成）
に何らかの値（""とか" "）をセットしてしまう。というのはいかがですか。
新規作成時にすでにレコードが作成されてしまうという欠点はあります。
こんな方法しか思い浮かびません。
もっと良い方法があれば皆さんお願いします。

あやめ様へ
私もわかりません。
私のところでは「ブリーフケースレプリケーション」をインストールしてください。なんて
メッセージがでますが。
サービスリリース当ててますか？当てたら直ったりして？そんなことないだろうな。

しゃすら - 99/09/15 12:46:07
電子メールアドレス:syhuthra@mail.goo.ne.jp
コメント:
初めまして。私もここへ、神頼みしに来ました（笑）どうぞ、よろしくお願いします。
ACCESS97、Win98で作っています。さて、二つのテーブル、個人住所録、会社住所録というものを、主キー"登録番号"（オートナンバ）で連結しています。この二つのテーブルのレコードをクエリーから、フォームにて表示、レコードの削除（Access97マクロ）、新規作成（Access97マクロ）をしています。
ここで、新規作成をし、個人住所録or会社住所録のみにレコードを入力すると、入力した方だけの"登録番号"が番号が振られ、してない方の登録番号は何も表示しません。個人と会社の関係を示す為にも、入力してない方の番号も増やしていきたいのですが、どうすればよろしいのでしょうか？
すいませんが、、、教えて下さいませ。

あやめ - 99/09/15 08:49:15
電子メールアドレス:stc0003@seagreen.ocn.ne.jp
コメント:
Access97でレプリカを作ろうとしたら「このデータベースをデザインマスターに変換することはできません。コンテナTable中のオブジェクトのMSysCmdbarsをレプリケート可能にすることができません。」というメッセージがでちゃいました。Helpを見たら「新しいヘルプファイルを入手して下さい」だって！！。何がいけないのか、誰か教えて下さい。

HIRo - 99/09/13 11:44:14
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
NAGAI 様へ
レポートでサブレポートって使った事無いんですがちょっとやってみました。
クエリーで抽出したものをサブレポートのレコードソースにセットし、それを
メインのレポートでサブフォームとして表示する。ってやってみましたが、
ちゃんと表示されました。（ただの選択クエリーだからかな？）

だめでしたというのはどういう感じでだめなのでしょうか？

NAGAI - 99/09/08 19:20:16
コメント:
サブレポートのレコードソースをクエリーにすることはできないのでしょうか？やってみたのですが、だめでした。レコードソースをテーブルにするとできるんですよねー。

HIRO - 99/09/08 17:27:53
コメント:
みっちゃん様へ

処理中の最適化は無理かな。
でも、AutoExecを使って自動で起動させるようにすれば可能のような気がしますが
見栄えがわるそうですね。

HIRO - 99/09/08 15:41:04
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
以下の質問ですが分かりました。
といっても教えてもらったのですが．．．
調べて下さった方々すいませんでした。
知りたい方がいれば乗せますが
では

HIRO - 99/09/07 14:24:19
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
久々の質問です。誰か教えて下さい。
テーブルと連結されているサブフォームで連番を付けたいのですが
どうすればいいのか知っていますか？
ＷｉｎＮＴ＆Ａｃｃ９７です。

みっちゃん - 99/09/06 06:31:32
電子メールアドレス:murai@nsknet.or.jp
コメント:
> みっちゃん様へなんらかの処理の途中で最適化をしたいということですか？それはどんな処理？？なんらかの大きなテーブルが１つあって（例　ＴＢＬ１）、新たにエクセルからリンクしたテーブルがあるとします（例　ＴＢＬ２）。ＴＢＬ１とＴＢＬ２の差分をとった後、ＴＢＬ２からＴＢＬ１を作成します。この場合１度目はできますが２度目はメモリーが不足でできません。ここで最適化を挟むと可能となります。　　という処理です。よろしくお願いします。

たくや - 99/08/31 16:20:53
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
知っていたら教えて下さい。アタッチテーブルを削除しようとしたり、テーブルを開こうとする時に勝手にＡ：（ＦＤ）を見に行って、が、が、が、が、が、とアクセス音が終わった後に、操作が出来るのですが、このＡドライブに見に行くのを解除する方法はないでしょうか？本当、作業がはかどりませんので。

HIRO - 99/08/31 10:14:49
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
みっちゃん様へなんらかの処理の途中で最適化をしたいということですか？それはどんな処理？？

みっちゃん - 99/08/30 13:57:30
電子メールアドレス:murai@nsknet.or.jp
コメント:
ＨＩＲＯ様　ＶＢＡでの最適化についての解答ありがとうございました。でも、最適化の後ＶＢＡを続行できませんが、どうすればよろしいでしょうか

虫麻呂 - 99/08/30 11:36:02
コメント:
今日は。
以前カキコした坊ちゃんの職業は「街鉄（がいてつ）」の運転手でした。
松山から帰ってのはなしです。昔の都電になるんでしょうね。

虫麻呂 - 99/08/30 11:30:34
コメント:
おはよう。
坊ちゃんの職業前に電鉄ってかいたけど、ホントは「街鉄（がいてつ）」でした。
昔の都電になるんでしょうね。

ゆな - 99/08/27 16:59:55
コメント:
たくや様＞お返事ありがとうございました。なんか目の前が開けてきた感じです！これからも開発頑張ります。また何かあったら、お願いします！

たくや - 99/08/27 14:47:56
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
ゆな様＞環境は office97Pro Windows95 OSR2 です簡単に示すとこうなりますテキストボックス１：書式日付 (L) テキストボックス２：書式日付 (L) テキストボックス３：書式数値＝テキストボックス１－テキストボックス２（コントロールソース）のようにすると 1999年1月1日 - 1998年12月30日 = 2 と表示されました追記テキストボックス３の書式を数値でなく、 yy や mm や dd 言う具合に設定したらうまくいきました。

たくや - 99/08/27 14:43:43
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
ゆな様＞環境は office97Pro Windows95 OSR2 です簡単に示すとこうなりますテキストボックス１：書式日付 (L) テキストボックス２：書式日付 (L) テキストボックス３：書式数値＝テキストボックス１－テキストボックス２（コントロールソース）のようにすると 1999年1月1日 - 1998年12月30日 = 2 と表示されました

makoto - 99/08/27 12:24:41
コメント:
はじめまして！初心者の私にリンクについて教えてください。テキストファイルをリンクしたのですが、その時フィールド名をひとつひとつ入力するのが面倒だったので、他のファイルからフィールド名をひろい、テキストファイルにコピーし、先頭行をフィールド名にしました。ここまではよかったんですが、テキストファイルを更新してテーブルを見ると一番最初のレコードが消えてしまいます。これを消えないようにするには、やはり、一つ一つフィールド名を入力し、やり直さないとダメなのでしょうか？

ゆな - 99/08/26 22:41:02
コメント:
はじめまして。初心者の私ですが、どうぞ教えてください。病院で、人間ドックのDBを作成しているのですが、うまくいかなくて悩んでいます。フォームに、最終検査日（日付フィールドyy/mm/dd）があります。 Date()関数を使って、今日で、最終検査日からどれだけの期間が経っているか計算させたいんです。半年以上きてない人、１年以上きてない人にはがきを出すためです。分からないので、単純に年－年とか、月－月とか引き算をするフィールドをわけたのですが、０年以下のような場合だとおかしくなってしまいました。例：最終検査日→９８／１０／３１今日の日付→９９／０８／２５私のやりかただと、年は９９－９８で１年月は、１０－８で２か月で、検査日から１年２ヶ月きてないという結果が出てしまうのですが、実際は、１０ヶ月・・・。どうか教えてください・・・。難しいです・・・。ほかのHPを見ても、プロシージャーを組む方法はあっさり書かれているのですが、関数や式を使った方法が分からないんです・・・。単純に、99/08/25-98/10/31=10と求めたいのですが・・・。 Mozilla/4.0 (MSIE 4.0; Windows 95) [202.224.152.29] kyt-p9.hi-ho.ne.jp

たくや - 99/08/25 17:51:47
コメント:
ＨＩＲＯ様＞先日のドライブ情報とかを表示する話ですが、どうもWIN32 APIを使用するしかなさそうな気がします。

覇我亜怒（はわあど） - 99/08/25 16:54:05
コメント:
お初にお目にかかります。現在会社で何故かシステムを組まされています。さて、お聞きしたいのはグラフへの出力なんですが、この時のデータの並び方を設定する事はできますでしょうか？クロス集計クエリーではなく、選択クエリーです。今やっているのはこういうことです。ひとつのフィールドに「A」「B」「C」というデータが、複数入っています。例えばABBCACABCCCBと入っているとします。この集計を出すわけです。データの集計としては「A」が3、「B」が4、「C」が5あります。このままグラフを作ると名前順なので「ABC」順のグラフになります。ところが、「BCA」の順番で出す必要があるのです。最悪多い順に出して上司を妥協させようかとも考えていますが（苦笑）これを解決する方法が有りましたら、どなたか御教授下さい。宜しくお願い致します。

たくや - 99/08/24 08:00:50
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
ActiveXコントロールを参照設定で登録したにも関わらず、ＯＬＥサーバーが登録されてません。ＯＬＥサーバーを再セットアップして下さいと出てくるのですが、いかんせんそんな事 officepro では載ってないのでさっぱり分かりません。やはりActiveXの専門書を買った方がいいのでしょうか？話変わって￥１５０を百五十円也に変換する方法のコツ例えば１２３４５６７８９０１０という具合に数字が並んでいたとしますではこれを下記に示すような方法でやると以下の点に気が付きます。１２３４５６７８９０１０千百十千百十千百十億万見て分かるようにある共通性があります。十、百、千は必ず繰り返され万、億は５桁ずつ上がった時に発生する事が。あと一十、一百、一千と言う呼び方はおかしい事が分かりますよね。一の後には必ず０が付く事も。後はこれを分解して、ロジックを組むのです。以上一口講座でした。ｍ＿ｍ

たくや - 99/08/23 21:13:40
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
ＨＩＲＯ様お手数かけてすみません。どうも最近はＡｃｃｅｓｓの限界に挑戦しているような事ばっか考えてしまうので。例えばＭＳのテクニカルサポートのＨＰに載っている、Ａｃｃｅｓｓ９７でＯｕｔｌｏｏｋのメール作成ですが、これに、後Ｏｕｔｌｏｏｋのアドレス帳操作が出来るようになれば、かなり良いものが作れるような気がするのですが。ま～、そこまでやると悪い事も出来てしまいそうで恐いですが。

HIRO - 99/08/23 19:52:54
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
たくや様
ドライブ情報ですか。わたしもわかりません。
Ａｃｔｉｖｅｘでありそうですが．．．
もう少し調べてみます。

みっちゃん様
１．SendKeys "%"
SendKeys "{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{RIGHT}{DOWN}{ENTER}"
２．SendKeys "%TDC", False
３．SendKeys "%TD{Down}{Enter}", False
以上の３つのやりかたなら知ってますが、これでいいのかしら？
基本的にすべてメニューにある最適化を動かしているようです。
それぞれに違いがあるようですがわたしには？？（AutoExecが起動するものとしないものとか）

みっちゃん - 99/08/23 13:28:42
電子メールアドレス:murai@nsknet.or.jp
コメント:
ＨＩＲＯ様　また御教示お願いいたします。下記の質問欄にもよく似た質問がありましたがＡＣＣＥＳＳ　ＶＢＡ　で自分自身を最適化する方法を教えて下さい。よろしくお願いします。

たくや - 99/08/21 13:11:23
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
どうもすんません、そのまま貼りつけたら改行関係なく繋がってしまいました。もし欲しいとか参考にしたいと言う方がいれば、メールで参考程度に欲しいとカキコして来て下さい。ま～いるのかな？（笑）

たくや - 99/08/21 13:01:56
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
参考程度にプログラムを作成してみました。ロジック的に未熟な部分があると思うのでここをこうしたらさらに良くなると言うアドバイスがありましたら教えて下さい。＾＾ Dim A(1 To 3) Dim B(1 To 9) A(1) = "万": A(2) = "億": A(3) = "兆" B(1) = "一": B(2) = "二": B(3) = "三" B(4) = "四": B(5) = "五": B(6) = "六" B(7) = "七": B(8) = "八": B(9) = "九" Dim Mojia, Mojib, Mojic Dim Mojix, X, Y If Me.値 < 0 Then '絶対値に変換 Mojix = Abs(Me.値) Else Mojix = Me.値 End If Dim W As String X = Len(Mojix) '文字数取得 Y = 1 '桁数カウントに使用 Do Until X = 0 '文字数オーバーになるまで実行 If Mid(Mojix, X, 1) > 0 Then Mojia = B(Mid(Mojix, X, 1)) Select Case Y Case 2, 6, 10, 14 Mojib = "十" Case 3, 7, 11, 15 Mojib = "百" Case 4, 8, 12, 16 Mojib = "千" Case Else Mojib = Null End Select If Mid(Mojix, X, 1) > 0 Then Select Case Y Case 5 To 8 Mojic = A(1) A(1) = Null Case 9 To 12 Mojic = A(2) A(2) = Null Case 13 To 16 Mojic = A(1) A(2) = Null End Select End If If Not IsNull(Mojib) And Mojia = "一" Then W = Mojib & Mojic & W Else W = Mojia & Mojib & Mojic & W End If End If Y = Y + 1 X = X - 1 Loop If Me.値 < 0 Then W = "▲" & W & "円也" Else W = W & "円也" End If Me.テキスト3 = W

Ｋｅｉ - 99/08/20 16:20:53
電子メールアドレス:akiyama-k@cknet.co.jp
コメント:
どなたか教えて下さい。　Ａｃｃｅｓｓ９７で数字を漢数字へ変換するような関数とかあるんでしょうか？（例）￥５０，０００－　漢数字へ変換すると　⇒　一金五萬圓也　となります。

たくや - 99/08/20 14:38:43
電子メールアドレス:yamamoto@toyo.macnet.or.jp
コメント:
Access97 でドライブ情報を表示する方法を教えて下さい。例えばVisual Basice で言うところのドライブリストボックスとデイレクトリリストボックスですが、Access97ではこのような機能はないのでしょうか？それともＡｃｃｔｉｖｅＸコントールの中に何か代わりになるようなものがあるのでしょうか？

ぽんちっちー - 99/08/19 13:01:04
コメント:
＞ゆき様
HELPで逃げましたけど。(笑)
リンクテーブルはよく使っているので
そこらへんであればまた聞いてください。

ゆき - 99/08/18 13:08:02
電子メールアドレス:yuki@presto.or.jp
コメント:
こんんちはぽんちっちー様　アドバイスありがとうございます。参考になりました。HELPを参照しながら、開発中です。アクセスの機能について知らないことが多い事を実感。もっと頑張らないとね。

ぽんちっちー - 99/08/18 09:00:47
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
＞ゆき様
こんにちわ。
リンクテーブルとゆうのでできます。（要HELP）
MDBを２つ作成して（データとプログラム）
プログラムのMDBのテーブルの所でリンク先を
データのMDBから持ってくればよいと思います。

ゆき - 99/08/17 15:22:54
電子メールアドレス:yuki@presto.or.jp
コメント:
こんにちは。データとプログラムを分けて作成したいのですが、どのような方法がありますでしょうか？どなたか教えてください。

ぽんちっちー - 99/08/12 18:27:04
電子メールアドレス:印刷の待ち中♪
コメント:
こんにちわ。下の忍者服部様の文字化けに
対するHIRO様のコメントにうけちまいました。
明日からお盆休み。お墓をピカピカにしちゃるぞー！
（っと、関係のないレスしてしまった。）
暑い毎日ですが、仕事のみなさんがんばって。

HIRO - 99/08/12 13:51:39
コメント:
文字化けしとるぞーい！

ＥＸＣＥＬとの連携みたいだけど
ちょっと？？

服部 - 99/08/11 13:30:10
電子メールアドレス:ninja@lime.ocn.ne.jp
コメント:
Access97のフォームのテキストボックスい匹�蘆佑鯑�呂掘VBAでExcelの特定のBookのセルに代入し、予め Excelの計算式が入っているセルから、Access97のフォームの出力用のテキストボックスい匹坊彁桟覯未鮟侘呂たいのですがどうも上手くいきません。どなたか、教えてください。宜しくお願い致します。

ゆき - 99/08/10 15:13:58
電子メールアドレス:yuki@presto.or.jp
コメント:
ＨＩＲＯ様　さっそくコメント有難うございました。大変助かりました。うかつにも、プロポーショナルフォントを指定していたため、文字数が合わなくて、随分時間をかけてしいまいました。^_^; でも、うまくいったのでよかったです。

HIRO - 99/08/10 09:37:17
コメント:
固定でとってしまいましたが、こんなんでどうですか？
例えば５つのテキストボックスを作ってそれぞれ１５文字入るとします。（ＴＥＸＴ１～５）
表示したい文字（ＭＥＭＯ）の長さが５０とすると５０／１５で３あまり５です。
ＬＥＦＴ（ＭＥＭＯ，１５）－＞ＴＥＸＴ１
ＭＩＤ（ＭＥＭＯ，１６，１５）－＞ＴＥＸＴ２
ＭＩＤ（ＭＥＭＯ，３１，１５）－＞ＴＥＸＴ３
ＭＩＤ（ＭＥＭＯ，４５，１５）－＞ＴＥＸＴ４
”以上”－＞ＴＥＸＴ５

ゆき - 99/08/10 08:54:25
電子メールアドレス:yuki@presto.or.jp
コメント:
ＨＩＲＯ様　こんにちは。コメントありがとうございました。現在は、印刷時拡張を使用して、その文が終ったら「以上」という文字がすぐ下につくようになっているのですが、テキストボックスを複数使用した場合は、どのようにすれば、よいのでしょうか。「以上」はすぐ下につけられるのでしょうか？

HIRO - 99/08/09 14:00:21
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ゆき様へ
こんにちわ！暑い日が続いてます。
確かプロパティーなどでの設定ではできなかったと思います。
テキストボックスを複数に分けてそれぞれを抜き出してセットする
という方法かな？
もっと簡単な方法がありましたら教えて下さい。

ゆき - 99/08/06 10:58:14
電子メールアドレス:yuki@presto.or.jp
コメント:
こんにちは。別の質問なのですが、印刷時に一つのテキストボックスに入力した文字の行間は設定できないのでしょうか。現在、ＦＡＸ送信表を作成しているのですが、行間が狭くて見にくいといわれるのです。どなたか教えてください。宜しくお願いします。

ゆき - 99/08/04 16:58:25
電子メールアドレス:yuki@presto.or.jp
コメント:
すみません、わかりました。どうも、最初フォームヘッダー部分にあったものを詳細のタブ付フォームに移動したからのようです。お騒がせしました。

ゆき - 99/08/04 16:41:43
電子メールアドレス:yuki@presto.or.jp
コメント:
こんにちは。３回目ぐらいです。（HIRO様には以前お世話になりました。有難うございました）タブ付きフォームを使って作成しています。このとき、現在３ページなのですが、コマンドボタンの中に３ページとも同じ位置に表示されるものがあります。自分で作ったのですが、どうしてそうなったのかわかりません。^_^; どなたか教えてください。お願いします。

ぽんちっちー - 99/08/04 13:06:11
コメント:
>nyomoさんへ。
体調が悪くてつらかったですねー。
僕も野菜ジュース飲んでがんばってます。＞お昼
さて、そういえば僕がバージョンUPしたPGはDAOは
鬼のようには使ってません。だから、でなかったのかもです。
とにかく、遅くなった部分のモジュール等見なおすしかない
でしょうねぇ。関数とかも変わってたりするだろうし・・・。

nyomo - 99/08/03 15:14:43
電子メールアドレス:nyomo@hotmail.com
コメント:
ぽんちっち様ご回答ありがとうございました。感謝しながらも、当方の体調不良＆検査等で返事が出来ませんでした。悪しからず。本来は、ぽんちっちさんのおっしゃる変更を施しておるのですが、単純コンバートとして、９５で実績のあったものが、９７では反映されていないのです。ＤＡＯに９５では早くても９７では遅い、とかいったものがあるのでしょうか？ご経験があれば、お教えください。本当に、遅れてすみませんでした。これからも参考にさせていただきます。

nyomo - 99/08/03 15:07:16
電子メールアドレス:nyomo@hotmail.com
コメント:
HIRO様へご回答ありがとうございます。お返事が遅れて大変申し訳ございません。コンパイル＆最適化を試しました。が、芳しい結果が得られません。モジュール内がＤＡＯの嵐になっているせいでしょうか？ (95では速くなったんですけど…) 当方もその他調べて、原因らしきものが掴めましたら、ご連絡します。ありがとうございました。本当に遅れてすみません。

HIRO - 99/07/30 09:49:20
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
おはようございます。
今日も、もりもり暑いです。
でも、ガンバルゾー。

余計な書き込みをしてしまいました。
なんとなく書き込みしたかった。

ぽんちっちー - 99/07/27 12:53:59
コメント:
＞HIRO様
僕もなるべくがんばりますわ♪
夢にまでリリース版のこととか出てくるなんて(笑)

HIRO - 99/07/27 09:24:17
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
はい。元気です。でも暑いよー。
ぽんちっちー様お久しぶりですねー。
ちょっと（しばらく）寝てました。
これからも一緒にお答えできるようがんばりましょう。
ということで、私が寝ている間夢を見ました。サービスリリースを入れなさいと！！（なんてね）
なんか変だなと思ったらサービスリリースを当ててみよう！マイクロソフトのＨＰに今すぐＧｅｔ！！
ＡｃｃｅｓｓのＨｅｌｐでバージョンのところにＳＲ－２とかでていればＯＫ。
これで私の社内＆客先の変な現象は解消されました。
他にもバグがあるらしいのでＨＰで確認してみましょう。
ということでこれからもよろしくお願いします。

ＰＳ．夏ばてに気を付けよう！！

ぽんちっちー - 99/07/26 17:29:35
電子メールアドレス:2000年対応でやる気ナス。
コメント:
おおー！HIRO様！元気そうで、なにより。
御本家様がいないから僕は非常に苦戦しておりました。
誰かの質問に答えるのは大変だ♪
ちなみに「すみちゃん」様のはどう答えて良いやら
レスもできずじまいでした。

ぽんちっちー - 99/07/26 17:23:42
電子メールアドレス:答えられない質問ばかり♪
コメント:
nyomo様へ。
心当たりはないです！（じゃぁレスするなっちゅうねん！）
が、僕も何本かバージョンUPしてますが、極端に遅くなった事は
ありません。何なんだろう・・・？僕は遅いときはいらないオブジェクト
を削除したりモジュールを使い過ぎないようにクエリーに直せるものは
直したりします。なるたけデータベースのサイズも大きくならないように
チュウイしたり・・・。以上、うーん役立たず！でしたー。(^_^;)

HIRO - 99/07/26 17:14:26
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
nyomo様へ
こんにちわ
１．モジュールをコンパイルして保存。
２．最適化。
でどうかな？変わらないかな？？

nyomo - 99/07/23 14:02:38
電子メールアドレス:nyomo@hotmail.com
コメント:
はじめまして。日頃、ＲＯＭに徹しておる者です。既にこちらでは、過去の問題かもしれませんが、是非、教えてください。 Access95で開発したシステムのmdbをAccess97のmdbに変換し、実行したところモジュールの速度が著しく遅くなりました。原因が分からず困っております。どなたかお心当たりのある方、何卒、宜しくお願い申し上げます。

すみちゃん - 99/07/09 23:28:37
電子メールアドレス:sumie@coral.ocn.ne.jp
コメント:
お昼までさくさく動いていたアタシのACCESS97。ほんのちょっと関数をいじってネットワークコンピュータと同期をとっただけのつもりなのですが、データ入力画面のフォームが使えなくなってしまいました。フォームを開くとマウスカーソルがチカチカ点滅を始め、サブフォームのデータはエラーとなり表示されず、あえてデータを入力しようとすると一般保護違反になります。2台のコンピュータで同じ症状です。同じフォームをもう一度作りなおしても結局一緒です。メインフォームのみ、サブフォームのみは問題ないのですが・・・

ｋａｓａ - 99/07/06 14:07:17
電子メールアドレス:kasam-ak@arpak.co.jp
コメント:
けんけんさんへ。やはりでてますか。実は、旧バージョンのacsess2では問題なく取り込めたのですが、acsess97では無理なんですね。結局、acsess2で取り込んでデータベース構築後、97に転換する方法しかないのか。acsess2000ではどの程度改良されるのか期待してまっています。

ぽんちっちー - 99/07/05 13:17:19
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
けんけん様
利用者ごとのパスと権限は何で設定されてるのでしょうか？
ACCESS97のセキュリティ辺りのツール利用でその問題は
起きているんでしょうか？
ならば残念ながら僕にはわかりません。(笑)
僕はテーブルにパス＆権限を持たせたのでうまくいきましたが
それではダメなんでしょうね。すみませーん。

けんけん - 99/07/03 01:18:11
電子メールアドレス:kenken@amiteck.co.jp
コメント:
>固定長テキストファイルからアクセスにインポートしようとしたところ、 >「先頭行のデータがおおきすぎるので、インポートダイアログが開けません」といって拒否されてしまいました。私も経験しましたよ。そのときは時間が無かったのでモジュールで細切れにしてテーブルに取り込みました。（＾＾；

ｋａｓａ - 99/07/02 11:04:11
電子メールアドレス:kasam-ak@arpak.co.jp
コメント:
初めてお便りします。アクセス97を使って統計データベースを作成しています。元データとして、データ長約750カラムの固定長テキストファイルからアクセスにインポートしようとしたところ、「先頭行のデータがおおきすぎるので、インポートダイアログが開けません」といって拒否されてしまいました。長カラムデータのインポートは不可能なのでしょうか。また、それなら、何カラムまでインポート可能なのでしょうか。どなたかご存じありませんか。

けんけん - 99/07/01 20:51:30
電子メールアドレス:kenken@amiteck.co.jp
コメント:
初めて書きこみします。 NTのネットワーク上にACCESS97が多数点在しています。その中の特定MDBだけに利用者毎のパスワードと権限を設定したいのです。いろいろと試したのですが、管理者のパスワードを設定すると、他のMDBを開いてもパスワードを要求されてしまいます。特定MDBだけにセキュリティーを設定して、他のMDBは何事もなく使えるようにしたいのです。どなたかご存知でしたら教えてください。

ぽんちっちー - 99/06/28 10:46:41
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
おはようございます。
FUKUMOTO様へ。
クロス集計の縦計算は僕にとっては非常に難しいです(^^;)
フォーム等では縦計の集計は簡単なので、今まで経験が
ありません。もっと分かる方が回答してくださればいいん
ですが。申し訳ないです。方法はあると思いますが・・・。

fukumoto - 99/06/26 17:34:39
電子メールアドレス:fukumoto@icc.ac.jp
コメント:
ぽんちっちー　様アドバイスありがとうございます。何とか、頑張ってみます。上手くいきましたら、メール入れます。クロス集計の縦の計算は、難しいことをやろうとしているのでしょうか？

ぽんちっちー - 99/06/25 09:23:30
電子メールアドレス:事後報告
コメント:
こんにちわ。先日僕が質問した件は解決いたしました。
すっかり、報告が遅れてしまいました。(^_^;)
FUKUMOTO様へ。
クロス集計クエリーでの縦計表示・・・分かりません(笑)！
で、以下はワカンナイナリに考えた方法です。
１．一旦TMPテーブルを作成する。（実行前にデータクリアする）
２．そこにクロス集計の内容を保存する。（追加クエリー等）
３．あと、縦計のクエリーも作っとく。
４．合体（２と３）させれば表示可能
とゆうことで、ダメでしょうか？クロスクエリーの内容がフォーム
のソースにでもなるのであれば、これで僕は逃げちゃいます♪

fukumoto - 99/06/23 08:15:49
電子メールアドレス:fukumoto@icc.ac.jp
コメント:
初めて、質問します。アクセスは約３年程利用していますが、技術的に進歩は全くなく、初心者のママです。初心者の質問に、どうかご回答下さい。クロス集計について、教えて下さい。各項目の縦列の一番下に合計を出したいのですが、どのようにすれば良いでしょうか。横行に対しては、ウィザードでクロス集計を作るときに集計値という形で、出すことは出来ますが。レポートを使うと、縦列に対して、合計を出すことが出来るようですが、クロス集計画面上で、縦列の合計を画面で確認したいのですが。よろしくお願いいたします。

ぽんちっちー - 99/06/17 15:50:07
電子メールアドレス:なぜ増えるの？
コメント:
takaさんへ。
takaさんのゆわれる通りメイン一つに対してサブ
フォームをたくさん作ることは可能だと思います。
それにしてもなぜ増えるのでしょうか？

taka - 99/06/17 13:31:18
電子メールアドレス:uema2883@m1.cosmos.ne.jp
コメント:
サブフォームを作成したら、メインフォームの数がサブフォームのデータの数だけふえてしまいます。メインフォームは１つにしてサブフォームのデータを入力することはできませんか。

ぽんちっちー - 99/06/16 11:37:00
電子メールアドレス:ひとつよろしくお願いします。
コメント:
こんにちわ。 MAINFORMから指示をしているのですが
サブFORMのレコードの移動が出来ません。
DoCmd.GoToRecord～を使ってみるとエラーになります。
何か方法はありますか？

guri - 99/06/13 00:55:11
コメント:
初めまして！ぐりです。まだ、あんまりホームページ読んで無いけどとりあえずカキコーーーじゃかじゃかのカキコあるの分かったからこれからはカキコにもいっぱい質問するからね～無知な僕に知識ちょーーだーーい(^^;;アセアセこれからもよろしくう(^○^)／

j-kato - 99/06/11 02:48:52
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
こんにちは
Accessの雑木林の管理人の　J-kato です。
日頃この掲示板への書き込みありがとうございます。
HIROさん　さおりさんその他の方々回答ありがとうございます。
特にHIROさんいつも強力な回答ありがとうございます。
　私一人の力では回答をすることができませんが皆様のご協力で運営することが出来ました。これからもよろしくお願いします。

PS
ＭＳチャットに結構行ってます、時間のある方は一度覗いて見てください。

ちゃみ - 99/06/10 18:21:19
電子メールアドレス:katosan@aurora.dti.ne.jp
コメント:
ｆｕｆｕ同様チャットでお世話になってるちゃみです！ Accessは単純なデータの編集作業にしか使ったことがない私ですが、 ExcelではいろいろとＶＢＡを駆使してアプリケーションを作ったりしています。ここの掲示板を見ていたら、今度は、Accessにも挑戦してみようと思いました。この場でみなさんのお役に立てるように、がんばって習得してみます。多分、そのまえにみなさんのお力を借りることになるでしょう・・・（笑）

nagai - 99/06/10 09:30:39
コメント:
Hiro様、ありがとうございます。確かに演算が簡単な時はオッケーなのです。が、少し複雑な計算（演算フィールドが多くなると）エラー表示されるのです。制限が有るのでしょうか？

HIRO - 99/06/09 13:46:17
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
nagai 様へ
例］フィールドA*フィールドBの結果をフィールドCにセット。
フィールドCの合計を取る時は、=SUM(フィールドC)ではなく、
=SUM(フィールドA*フィールドB)とする。
でどうですか。

HIRO - 99/06/09 13:15:05
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
みっちゃん様へ
またまた追記
もしかして書き方の問題ですか？
DoCmd.OpenReport stDocName, acPreview, , "[Q*不明１]![検索]='" & kensaku & "'"でいいのでは？

HIRO - 99/06/09 13:11:37
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
Ｋｅｉ様へ
追記
同フォルダでなおかつ、同ファイル名でした。
例］Access.mdbだったらAccess.bmpです

HIRO - 99/06/09 13:08:47
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
Ｋｅｉ様へ
タイトル表示の非表示は分かりませんが、
同フォルダにBMPファイルを入れておくと、
タイトル表示の変わりにBMPファイルが表示されるなんていう技があります。
これが利用できるのでは

HIRO - 99/06/09 13:03:58
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
みっちゃん様へ
検索条件を変数で取りたいと言うことですよね
出来ると思います。

nagai - 99/06/08 13:30:49
コメント:
レポートの明細を合計する簡単な方法は有りませんか？下記のようにしたいのですが。。１．詳細で、フィールド同士を演算させて、その結果を詳細のフィールド（A）として印字２．詳細のフィールド（A）を、グループフッターで合計して印字する。この際、=sum(A) とするとエラーになる。

Ｋｅｉ - 99/06/07 18:59:03
電子メールアドレス:akiyama-k@cknet.co.jp
コメント:
Ａｃｃｅｓｓ９７を起動した時に「Ａｃｃｅｓｓ９７」のタイトルが表示されないようにするにはどうすればいいのでしょうか？　どなたか教えて下さい。

みっちゃん - 99/06/06 08:04:42
電子メールアドレス:murai@nsknet.or.jp
コメント:
すいません　メールアドレスの入力忘れましたＨＩＲＯ様、先日は回答ありがとうございました。またまた質問ですが VBAでフォームがある印刷をする場合 stDocName = "レポート" DoCmd.OpenReport stDocName, acPreview, , "[Q*不明１]![検索]=Forms![フォーム]![項目]" のように書きますがフォームがない印刷で kensaku = rs!検索 stDocName = "レポート" DoCmd.OpenReport stDocName, acPreview, , "[Q*不明１]![検索]=kensaku" のように書くことはできますか

- 99/06/06 08:03:24
コメント:
ＨＩＲＯ様、先日は回答ありがとうございました。またまた質問ですが VBAでフォームがある印刷をする場合 stDocName = "レポート" DoCmd.OpenReport stDocName, acPreview, , "[Q*不明１]![検索]=Forms![フォーム]![項目]" のように書きますがフォームがない印刷で kensaku = rs!検索 stDocName = "レポート" DoCmd.OpenReport stDocName, acPreview, , "[Q*不明１]![検索]=kensaku" のように書くことはできますか

ふふ - 99/06/06 01:59:19
ホームページアドレス:../../HeartLand-Kaede/6036/index.html
電子メールアドレス:sefu@geocities.co.jp
コメント:
こんばんわ～♪チャットでお世話になってるｆｕｆｕでっす！
ここにこんなカキコをするのは、とても勇気がいったのだけど、カキコしに来ました(^-^)
ところで、ジャカジャカの名前結局わかんないままでした・・・では、またね( ^_^ )/~

HIRO - 99/06/02 14:33:28
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
taka 様へ
よく読まなかったのですが、表示でいいのですよね？
コントロールソースに
=Format(Date(),"ge.m.d")でいいのでは。

- 99/06/02 14:17:07
コメント:
ＨＩＲＯ様 format(date(),"ge.m.d")というのはどこに入力すれば言いのですか教えてください。

HIRO - 99/06/02 09:35:43
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
みっちゃん様へ
　リンクでは駄目なのですか。
　オブジェクトを挿入する時、リンクにチェックを付ける。
　ＴＩＦＦ表示のＡＣＴＩＶＥＸはわかりません。
　誰かのＲＥＳを待ちましょう。

taka 様へ
　format(date(),"ge.m.d")でどうですか？
　詳しくはFORMATのHELPをご覧になって下さい。
　詳細にテキストボックスを置き、それぞれの境界線スタイルを実線にセットする。
　ページフッターは隙間なく詳細にくっつける。
　これでエクセル風にでるのでは。

永井 - 99/06/01 21:01:55
コメント:
HORO様、ありがとうございました。さすがですね！今後ともよろしくお願いいたします。

taka - 99/06/01 13:58:16
電子メールアドレス:uema2883@m1.cosmos.ne.jp
コメント:
はじめましてtakaです。誰か助けてください。日付を入力する場合　たとえば平成11年6月1日だとしたら　H11.6.1と表示したいのです。今は,日付(S)の形式だと　11/6/1となってしまい、和暦が分かりません。それから、レポートで罫線の入った表形式を出力したい、たとえばエクセルでいうとセルを囲んだ状態ですね。その状態にしたいのですが,なんか線と線と間に空きがあいたり線がゆがんでしまったりとうまくいきません。何かいい方法はないですか。教えてください。

みっちゃん - 99/06/01 05:43:37
電子メールアドレス:murai@nsknet.or.jp
コメント:
HIRO様、おはようございます。ACCESSのデータベース上にOLEで画像を張り付けるとファイル自体が非常に重たくなってしまうことに気がつきました。画像のありかのパスだけをデータベース上に登録しACCESSで表示する方法はACTIVEXを使うしかないのでしょうか、お教え下さい。また、TIFFファイルを表示する場合、適当な ACTIVEXはなにかありませんでしょうか。

HIRO - 99/05/27 19:11:21
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
永井様へ
いいのがありましたよー、旦那！
format(-10,"+#,###;-#,###;0")でどうですか
これでご要望の通りに出るはずです。
詳しくはformatのHELPを見て下さい。

いやーこんな簡単にできるとは私も始めて知りました。
調べてみるものですねー
勉強になりやした
今度使おーっと
では

永井 - 99/05/27 18:51:35
コメント:
HIRO様、先程はありがとうございました。いいと思ったのですが、数値（計算結果）が正の時だけ＋を頭に付けたいのです。負の数の時は、－表示にさせたいのですが。できますでしょうか？再度、おねがいいたします。

永井 - 99/05/27 18:35:27
コメント:
HIRO様ありがとうございました。単純な質問ですみませんでした。

HIRO - 99/05/27 17:47:19
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
永井様へ
数字の頭などに＋を入れたいということですか。
例えば、FORMAT(123456,"+#,###")とすれば
+123,456となりますが、こういうことですか？

永井 - 99/05/27 11:11:06
コメント:
数字の表示で＋（プラス）表示をしたいのですが、format関数でできますか？うまい方法が有れば教えて下さい。

- 99/05/24 16:53:27
コメント:
HIRO様こんにちは。ご回答ありがとうございました。 HIROS様にいわれた通りに何度もチャレンジしたのですが、うまくいきませんでした。（すかさず、はずしたのに…(-_-;) 私のほうも、アイコンで表示されているのにもかかわらず、アイコン表示がチェックされていません。ちなみに私の環境はWｉｎ98で、ACCESS97なのですが、別のWin95で,ACCESS97はうまく表示されるのです。？？？打開策として、今はオブジェクト挿入のときに、新規作成でペイントブラシの絵にしまして、そこからファイル貼り付けしています。何かわかりましたら、また教えてください。

HIRO - 99/05/24 10:34:46
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ゆき様へ
良くは分かりませんが、ＯＬＥオブジェクト型の表示には画像の表示とアイコン表示があるみたいですね。
それを切り替えればいいらしい。（本当かな？）
方法としてはテーブルをデータシートビューで開き、ＯＬＥオブジェクト型のフィールドで右クリック。
パッケージオブジェクト－変換を選択します。
そうしますと変換ダイアログなるものが表示されるはずです。
そこでアイコンで表示というチェックボックスのチェックをはずす。
これでいいはずなのですが、私のところではアイコン表示されているにもかかわらず、
アイコンで表示がチェックされていません。どうしてなのでしょうか？（私だけ？）
そこで一度アイコンで表示のチェックボックスをチェックし、ＯＫする。
すかさずもう一度変換ダイアログを表示させると、チェックが付いているはずです。
そこでチェックをはずし、ＯＫする。ここで重要なのは”すかさず”というところですね。
レコードを移動してしまうとチェックボックスのチェックが外れてしまっているのです。
バグなのかな？はて？
参考になりますでしょうか？
私にも良く分かっていませんので、不確かですいません。

HIRO - 99/05/24 10:01:51
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ゆき様へ
試してみました。
挿入を行ったところ、私の環境ではパッケージと表示されました。
フォームで表示させてみると画像のものとアイコンのものがありました。
うーん？どういう事でしょう？
もうちょっと調べてみます。
分かったら教えて下さい！
分かる方教えて下さい！

因みに私の環境はＷｉｎＮＴ＆ＡＣＣＥＳＳ９７です。

ゆき - 99/05/19 17:31:20
電子メールアドレス:yuki@presto.or.jp
コメント:
こんにちは（すみません。リターン押したら送信してしまいました） OLE オブジェクトについて教えてください。今日、新しい画像をOLE オブジェクトに挿入しましたところ、画像が現れず、アイコンが表示されました。テーブルを見ますと、以前はビットマップ　イメージだったのに、今日はパーケージと表示されています。どちらも、ペイントブラシで作成した画像です。どこが違うのでしょうか？教えてください。お願いします。

ゆき - 99/05/19 17:30:10
電子メールアドレス:yuki@presto.or.jp
コメント:
2

ヤスカナ - 99/05/19 11:46:37
電子メールアドレス:yasukana@anet.ne.jp
コメント:
自己レスツール－オプションメニューから表示タブを選択し、表示オプションのシステムオブジェクトをチェックする。その中にMSysIMEXColumnsとMSysIMEXSpecsというテーブルがあり、そのこに定義が保存されています。これをインポートすれば使えるようです。

ヤスカナ - 99/05/18 14:07:12
電子メールアドレス:yasukana@ane.ne.jp
コメント:
出力定義の保存
オートメーションエラーから脱出するため、
ファイルをすべてコピーしたところテキスト変換
に使用する『エクスポート定義』は移動できませんでした。
この定義はファイル出力に必要なので他の場面でも
移動したいことがあるのですが、どなたか『出力定義』
を移動させる方法をご存知ではないでしょうか？

HIRO - 99/05/14 13:18:22
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
さおり様へ
試してませんが．．．
Shell関数の第二引数のことですね。
vbMinimizedNoFocusをセットすればいいのではと思います。
Shell関数のＨＥＬＰを見ましょう。他にも色々ありますよ。
それでは

さおり - 99/05/14 11:30:07
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
ＨＩＲＯ様、昨日はどうもありがとうございました。エクスポート出来ました！原因は、起動ファイル名と実行ファイル名の間に半角スペースが抜けてました。嬉しくて、嬉しくて・・・。
あの、もう一つ質問したいのですが・・・（すいません）。Shell関数を使って、２つのファイルを開くのですが、先に開いたファイルを最小化し、次のファイルを見せたいのですが可能ですか。ExcelファイルのOPEN/最小化はどのように記述すればよいのでしょうか。それとも、ACCESSでは無理ですか？おわかりでしたら教えて下さい。よろしくお願いします。

HIRO - 99/05/13 18:12:40
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
さおり様へ
勘違いするような書き方をしたみたいですね。すいません。
Call　Shell("xxx\xxx\Excel.exe " + Stappname,1)とすればＯＫでは。
起動ファイル名（Ｅｘｃｅｌ）と実行ファイルの間は半角の１ブランク空けて下さい。
実際にShellに渡される第一引数としては
"xxx\xxx\Excel.exe C\Window\デスクトップ\温度システム\温度グラフ.xls"となるようにします。

ＰＳ．改行文字は半角で打ちます。

さおり - 99/05/13 17:01:59
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
ＨＩＲＯ様、こんにちは。＜ＢＲ＞以前、ＡＣＣＥＳＳからＥＸＣＥＬを開くアドバイスをいただきありがとうございました。ＥＸＣＥＬが起動し喜んでいたのですが、指定したファイルが開いてなかったのです。何故実行出来ないのかがわかりません。＜ＢＲ＞Dim　Stappname　as　String＜ＢＲ＞Stappname="C\Window\デスクトップ\温度システム\温度グラフ.xls"＜ＢＲ＞Call　Shell("Excel.exeをフルパスで指定しました。"+"Stappname",1)＜ＢＲ＞ファイルがないと言うエラーメッセージが表示されるのですがファイル名は正しいと思いますし・・・。それと、”+.xls”と言うエラーメッセージもありました。おわかりでしたらもう一度教えて下さい。よろしくお願いします。

ゆき - 99/05/13 15:22:22
電子メールアドレス:yuki@presto.or.jp
コメント:
HIRO様　ヤスカナ様できました。ありがとうございました。開くときが駄目なら、読み込み時にやってみる。勉強になりました。このホームページを実は昨日知ったのですが、心強いアドバイザー達に出会え感激してます。今後とも宜しくお願いします。

HIRO - 99/05/13 13:38:43
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ゆき様へ
こんにちわ
ちょっと実際にやってみました。
開く時のイベントプロシージャでなく、
読み込み時のイベントプロシージャでDoCmdすると大丈夫みたいですね。
何故かと聞かれればそれは．．．ウーン、分かりません。
試してみて下さい。
では頑張って！

ヤスカナ - 99/05/13 11:56:23
電子メールアドレス:yasukana@anet.ne.jp
コメント:
自己レス＞currentdbプロパティのnameを使用することで、自分自身のアドレスと名前を取得することができました。

ヤスカナ - 99/05/13 11:54:23
コメント:
2

ヤスカナ - 99/05/13 11:49:41
電子メールアドレス:yasukana@anet.ne.jp
コメント:
>ゆき様:あさはかな回答でした。しってらっしゃる方がいれば回答お願いします。

しん - 99/05/12 23:17:21
電子メールアドレス:skuroki@cc.mbn.or.jp
コメント:
ＨＩＲＯ様　ありがとうございます。　検索の方は、やってみたら、すんなりできました。この前やったときできなかったような気がしたんだけど、どこかがまちがっていたんでしょう。　それともうひとつのほうは、自分で書いてみてわかりにくかったです。すいません。もう少し整理して、今度わかりやすい投稿をしたいとおもいます。また、よろしくおねがいします。

ゆき - 99/05/12 17:13:48
電子メールアドレス:yuki@presto.or.jp
コメント:
ヤスカナ様　アドバイスありがとうございました。掲示板にはじめてだして、返事がもらえてとても感激しています。アドバイスどおりに試してみたのですが、やはりうまくいきません。他になにかありいますでしょうか？

ヤスカナ - 99/05/12 14:24:05
電子メールアドレス:yasukana@anet.ne.jp
コメント:
アクセス97、OS WinNT4.0 FMv5133
VBAの関数curdirを使用して、実行ファイル
のパスを取得しようとすると、そのパスでは
なく、「C:\WINNT\Profiles\takata\Personal」
と結果が返ります。本当は
「C:\WINNT\Profiles\takata\デスクトップ」
のディレクトリで実行しています。
実行ファイルの場所を他のものに変えても
結果は同じでした。
VBにて行えば実行ファイルのパスを返します。
この違いを修正する方法はないでしょうか？

ヤスカナ - 99/05/12 14:21:56
電子メールアドレス:yasukana@anet.ne.jp
コメント:
カレンダーコントロールは使ったことはありませんが、
症状からみるに画面の再描画を行うだけでよさそうですね。
doコマンドを使用した後『form.refresh』を使って画面の
再描画を行えばきちんと表示するかもしれません。
一度試してみてください。

ゆき - 99/05/12 12:20:44
電子メールアドレス:yuki@presto.or.jp
コメント:
はじめまして。教えてください。カレンダーコントロールをホームに配置しまして、開くときに、DoCmd.GoToRecord , , acLast を使って最終レコードで開きたいのですが、そうすると、カレンダーコントロールの部分が白くなってしまいます。開いてから前か後ろに移動すると現れるのですが、どうしてでしょうか？

HIRO - 99/05/10 10:42:45
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
しん様へ
こんにちわ
クエリーでの抽出はLike "*○○*"で良いかと。（○○を含む）。
もう一つの方ですが、請求書フォームで顧客、社員、その他情報フィールドが有り、
顧客フィールドでは種別：１（顧客）の氏名を入力、
社員フィールドでは種別：２（社員）の氏名を入力したいと言うことですか？
理解できなくてすいません。

フッシー - 99/05/09 23:28:13
電子メールアドレス:fumio-f@pop21.odn.ne.jp
コメント:
HIRO様コメント有難う御座います。私が、したいと思っていた事は、住所の入力フォームを作り、そのフォームをいろいろなデータ入力用として、使い回したいと思っていました。例えば五つのテーブルにそれぞれ所在地を入力しなくてはならないときに、フォームを五つ作るのは無駄が多いいと考えていたからです。それとひとつのフォームにテキストボックスを多く作りすぎると、ツール---解析---パフォーマンスの最適化--でコントロールを減らすように指示がでます。この問題については使い回すフォームを非表示で開いてからフォームのレコードソース、コントロール名等を変更、設定しその後フォームを明示することにより解決致しました。初心者の質問で失礼しました。また、よろしくお願い致します。

しん - 99/05/09 00:03:57
電子メールアドレス:RXF12157@nifty.ne.jp
コメント:
よくばってもうひとつ質問ですが、おねがいします。で、質問なのですが、　テーブルは個人データフィールドは、氏名、種別・・・があります。（種別のデータは１顧客、２、社員、３両方の３種類です。）これを３つのクエリー（種別の１、２、３）それぞれで抽出しています。これら３つのくえりーをフォーム（仮に請求書とします。）でソースとするとエラーがでてしまいます。例）請求書フォームのデータ　　請求書番号　　顧客（コントロールソースは種別１のクエリー）　　社員（コントロールソースは種別２社員）　　その他、商品情報など・・・種別は、あとで変更される可能性があるため、テーブルは１つにしたほうがよいと考えました。この方法では、自分自身でも難しいのはなんとなくわかるような気がします。別の方法でもかまいませんので何かよい方法があればご指導ください。　質問ばかりで申し訳ありません。　（いつか、答えるようになりたいです。）

しん - 99/05/09 00:03:34
電子メールアドレス:RXF12157@nifty.ne.jp
コメント:
こんばんは。アクセスＶＢＡは、ほとんど素人です。質問なのですが、データ検索用のフォームを作ろうと考えています。テキストボックスに、キーワードを入力し、抽出されたデータをサブフォームで一覧表示させたいと思っています。　で、キーワードは、〇〇の文字が含まれるデータをすべて抽出する形をとりたいのです。　フィルタでは、＊を使うなどして抽出できるのですが、クエリーで抽出することができません。　どのようにしたらよいのでしょうか？

さおり - 99/05/07 14:25:22
コメント:
２度も失敗してしまいました。ごめんなさい。もう少し時間をおいてもう一度送らせていただきます。

さおり - 99/05/07 14:24:20
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
文字化けしてしまいました。迷惑かけてすいません。もう一度送らせていただきます。
ＨＩＲＯさん、ヤスカナさん、こんにちは。
だいぶ遅くなりましたが、以前エクセル起動（Shell関数・Sendkeys）のアドバイスと、抽出条件（２つ以上）のアドバイスを下さり、どうもありがとうございました。ようやく理解、利用できました（ようやく動きました！）。それで、エクスポートぜ遡笋任垢�澗犬犬任靴燭藏気┐堂爾気ぁBR> Transferspreadsheetの構文上で、Accessのテーブル名、Excelのファイル名を指定し実行すると、エクスポートい譟∋慊蠅靴薪xcel上にSheetが追加されます。再度、Access上でエクスポートい襪抜獷戮和減澆垢襪泙�任泙后弔旅洪掘米韻戞τheet上に）は可能なのか？ファイル名とSheet名を指定してエクスポートげ椎修覆里��気┐堂爾気ぁ��蠅い靴泙后

さおり - 99/05/07 14:21:26
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
ＨＩＲＯさん、ヤスカナさん、こんにちは。
だいぶ遅くなりましたが、以前エクセル起動（Shell関数・Sendkeys）のアドバイスと、抽出条件（２つ以上）のアドバイスを下さり、どうもありがとうございました。ようやく理解、利用できました（ようやく動きました！）。それで、エクスポートぜ遡笋任垢�澗犬犬任靴燭藏気┐堂爾気ぁBR> Transferspreadsheetの構文上で、Accessのテーブル名、Excelのファイル名を指定し実行すると、エクスポートい譟∋慊蠅靴薪xcel上にSheetが追加されます。再度、Access上でエクスポートい襪抜獷戮和減澆垢襪泙�任泙后弔旅洪掘米韻戞τheet上に）は可能なのか？ファイル名とSheet名を指定してエクスポートげ椎修覆里��気┐堂爾気ぁ��蠅い靴泙后

HIRO - 99/05/06 17:43:02
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
フッシー様。
こんにちわです。
はじめましてです。

もうちょい詳しく聞かせて下さい。
一つのフォームで、複数のテーブルでもっている住所フィールドを
表示、編集するのに使い回したいということですか？（つまり、テーブル毎にフォームを作るのはまずいということ？）
それとも．．．？
テーブルの構成、フォームのデザインなど教えて頂けるとうれしいのですが

フッシー - 99/05/05 01:16:26
電子メールアドレス:fumio-f@pop21.odn.ne.jp
コメント:
初めまして！始めてメールを送らせて頂きます。私はアクセスプログラムの初心者なのですが、フォームにデータを表示し、編集するのに躓いています。住所を入力するフォームを作り、そのフォームでいろいろなテーブル（連結していない）の住所を入力いたいのですがどのようにすればいいのでしょうか。一つのテーブルまたはクエリーからデータを表示することは出来るのですが、複数のリレーションが組まれていないテーブルのデータをひとつのフォームで編集する方法を教えて下さい。ユニオンクエリーを使いやってみたのですが、データの編集が出来ませんでした。よろしくお願い致します。何かいい方法は？？？？

ぽんちっちー - 99/04/29 08:57:24
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
＞HIRO様へ。（笑）
わざわざ、ありがとうございました～♪
事後報告ですが、HIROさんが、コメントして
下さった通りの状況でしてうまく伝わって
よかったでした。
質問等、聞いて下さるだけでも解決したりする
こともありますよね、感謝しています。
重ね重ねお礼まで。
P.S　個人的なレス使用ですみません＞管理人様

HIRO - 99/04/28 13:58:07
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
あれれのれー
しこしこ書いてるうちに解決してしまいましたか？
ちっ、遅かったか．．．
なんにせよ良かった良かった。
ではまた

HIRO - 99/04/28 13:53:56
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
すいません。改行とスペースがうまくいってませんでした。

ページヘッダー
得意先名ヘッダー
　　　　得意先名 <-- ラベル
詳細
　　　　得意先名 <-- テキストボックス
得意先名フッター
ページフッター

に置き換えてください。

HIRO - 99/04/28 13:50:11
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ぽんちっちー様へ
ここでやりたいことというのは得意先名がNULLの時、
そのセクション自体を表示したくないということでよろしいのですよね。
並び替え／グループ化を設定したということはイメージ的にこんな感じですかね

ページヘッダー
得意先名ヘッダー
得意先名 <-- ラベル詳細
得意先名 <-- テキストボックス得意先名フッター
ページフッター

でもって得意先名がNULLのときは
得意先名ヘッダーと詳細と得意先名フッターのセクションが表示されなければ良い。
ってことですよね？？？

ぽんちっちー - 99/04/28 13:11:42
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
HIRO様へ。出来ましたのでご報告差し上げます。
えっと、得意先名セクションのフォーマット時に次の
ように設定しましたらできたでございます。(^^;)

If IsNull(Me![得意先名1]) Then
Me.Section(9).Visible = False
Else
Me.Section(9).Visible = True
End If

以上。では、またおじゃまさせてくださいまし。
僕も反対に回答等でお手伝いできるようにしなくては！
と、思っています。

ぽんちっちー - 99/04/28 12:10:52
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
おおー、出来ました。
さて、最初のうちはHIRO様がおっしゃるようなエラーが表示されましたわけです。
しかし、そこから進歩したのか？後退したのか？（笑）もう、うんともすんとも
エラー表示さえも出ないわけなのです。
現状ではセクション番号は間違いなく9です。ACCESS97のヘルプでSECTIONプロパティの
一番下のやつをまねて調べましたので。うんとに、困ったもんです。

ぽんちっちー - 99/04/28 12:05:10
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
同じ名前のHIRO様へ。ことらこそ、また迷い込んでしまいました
まずは・・・改行の仕方ががわからないんですけど。（笑）
失敗したら恥でしょうが。

HIRO - 99/04/28 10:56:00
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ぽんちっちー（HIRO）様へ
こんにちわ。
ごぶさたしてます。HIROです。
Sectionプロパティーですか。初めてお目にかかるプロパティーですね。
ちょこっと試してみただけなのでよくわかりませんが、
”セクション番号の指定が不正です。”なんてエラーが出ますか？
もしやセクション番号５でうまくいきませんか。
違っていたらゴメンナサイです。

ぽんちっちー - 99/04/27 17:07:59
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
「レポート印刷時にあるセクション内の項目の値によってそのセクションまるごとの可視を変える方法について」レポートで並び替え／グループ化で「得意先名」グループヘッダーを自作しました。そのセクションには「得意先名」フィールドしかありません。印刷時に得意先名がNullならば非表示（セクションまるごと）に、Ｎull以外ならば表示（セクションまるごと）したいのですが、うまく設定できません。条件を設定してそのセクションの印刷時に得意先名がNullならば、Me.section(9).visible =falseとか設定しているのですが、どこが悪いのか？わかりません。よろしくご指導ください。

j-kato - 99/04/27 01:02:00
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
管理人からの　お詫びとお願い
この一週間（４月１４日以降）の間に管理人宛てにメールを出された方、恐れ入りますがもう一度管理人宛にメールをお出しください。
当方のミスでＨＤＤ内のデータすべて消失してしまいました。４月１４日以降バックアップとっていなかったのでよろしくお願いします。

HIRO - 99/04/26 13:47:29
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
さおり様へ
こんにちわ
OpenFormメソッドの第四引数ですよね。
SQL文でいうWHERE以降の文でいいはずなので、試していませんが
２つ以上の時は、それぞれの条件文を"AND"でつなげばいいのではないかと思います。

さおり - 99/04/23 15:27:58
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
こんにちは。ご存じの方は、私にアドバイス・方法をお教え下さい。
特定のレコードを設定してフォームを開きたいのですが、２つ以上の時記述になにか必要ですか？
Dim fname as string
Dim stlinkcriteria as string
Dim stlinkcriteria2 asstring
fname="養生温度メイン"
stlinkcriteria="[グループ名]="&"'"&ME![コンボ1]
stlinkcriteria2="[ループ名]"&"'"&ME![コンボ2]
docmd.openform fname,,,stlinkcriteria
これじゃーだめですよね。はぁ～、いまいちＶＢＡが使えません。

ヤスカナ - 99/04/22 17:49:41
コメント:
自己レス
Trim(string)で解決しました！
お騒がせしましてすみませ～ん！！

ヤスカナ - 99/04/21 09:41:35
電子メールアドレス:yasukana@anet.ne.jp
コメント:
スペース（空白ではなく）を多く含むデータからスペースを取り除いて
表示したいのですが、どのようにすれば出来るでしょうか？

永井 - 99/04/20 19:04:03
電子メールアドレス:ymn_mail@yahoo.co.jp
コメント:
日本語表示にすることができました。 j-katoさんありがとうございました。

j-kato - 99/04/20 02:14:25
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
永井さん　
ツール・オプション・プロパティの表示では？

永井 - 99/04/19 18:57:52
電子メールアドレス:ymn_mail@yahoo.co.jp
コメント:
Accessでの表示が英語で出てしまいます。日本語表示に直すにはどうしたらよいのでしょうか？

ヤスカナ - 99/04/15 14:38:59
電子メールアドレス:yasuakan@anet.ne.jp
コメント:
トップページに当たるmdbを作成したいのです。いくつかのmdbが既にあって、そのフォームを別の mdbから開くことが出来るのでしょうか？

ヤスカナ - 99/04/15 14:35:40
電子メールアドレス:yasukana@anet.ne.jp
コメント:
ああ、もう回答が載ってますね。僕も一応（ダサい）方法を書いておきます。
Sendkeysを使ったらなんでもアリですよね。ダサいけど。。
Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
oApp.Visible = True
SendKeys "%"
SendKeys "{Down}{Down}{Enter}"
SendKeys "C:\年間線引きスケジュール.xls{Enter}"

HIRO - 99/04/15 12:05:29
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
何か化けちゃいましたので、もう一回。
SHELL関数は実行可能プログラム(EXEとか?)を実行する為、実行可能プログラム名を渡してあげないとダメみたいですね。
Call Shell("excel " + Appname, 1)とか又はCall Shell("excel.exeをフルパスで指定 " + Appname, 1)
でできると思います。

HIRO - 99/04/15 11:48:39
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
さおり様へ
おはようございます。

SHELL関数は実行可能プログラム(EXEとか?)を実行する為、実行可能プログラム名を渡してあげないとダメみたいですね。
Call Shell("excel " + Appname, 1)とか又はCall Shell("excel.exeをフルパスせ慊" + Appname, 1)
でできると思います。

j-kato - 99/04/14 23:46:16
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
私自身も失敗しました。
半角文字と言うか　直接入力で　＜ＢＲ＞　ですね。

j-kato - 99/04/14 23:34:31
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
Ａｃｃｅｓｓの雑木林への書き込みありがとうございます。

　雑木林の手入れが中々行き届かずに皆様にご迷惑をかけてしまっています。
掲示板での強制改行は　半角で　　
　　を改行したい場所に挿入してください２行の改行なら　"

"　と二回書いてください。

このページのソースを参考になさったら良いと思います。
　これからもよろしくお願いします。

さおり - 99/04/14 16:53:48
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
すいません。改行間違えました。改行したいところで”を入れるのですよね。１つ？２つ？それとも、この改行はもしかしたら、ACCESSの質問での改行方法なのですか？だとしたら、恥ずかしい・・・。先ほどの質問のＶＢＡの"達は、関係ないです。Appname="c:\WINDOWS\デスクトップ\3月後半.xls"の”だけがあってよくて、あとはいらないです。すみません。（怖くて改行のテストい任④泙察爾鵝�

さおり - 99/04/14 16:44:21
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
ACCESSのフォームから、EXCELの特定のファイルを開きたいのですが上手くいきません。” SHELL関数を以下のように使いました。” Dim　Appname=As String" Appname="c:\WINDOWS\デスクトップ\3月後半.xls"" call shell(Appname,1)" 「引数が足りない、アプリケーションを開く事ができません。」とメッセージが表示されました。" 他の方法でもいいです。教えて下さい。

やすかな - 99/04/07 12:33:51
電子メールアドレス:yasukana@anet.ne.jp
コメント:
解決しました!! ＨＩＲＯ様大変申し訳ありません。迅速かつ的確なアドバイスありがとうございました。無知故にアドバイスのミソが十分理解できていませんでした。ページ設定で解決することが出来ましたことを報告します。

やすかな - 99/04/07 08:57:31
電子メールアドレス:yasukana@anet.ne.jp
コメント:
大変お騒がせしまして申し訳ありませんm(__)m
再掲載です
==========================================
　　　　　　昼飯レポート(旧)

人　飯　金

父　豚　100
母　鳥　 70
兄　水　 10
姉　草　 20
弟　芋　 50
妹　草　 40
僕　水　 9
友　牛　300
父　米　 90
母　卵 60
兄　水　120
姉　根　 60
弟　魚　290
妹　草　 12
僕　水　 20
==========================================
　　　　　　昼飯レポート(改)

人　飯　金　　人　飯　金　　人　飯　金

父　豚　100 妹　草　 40 兄　水　120
母　鳥　 70 僕　水　 9 姉　根　 60
兄　水　 10 友　牛　300 弟　魚　290
姉　草　 20 　父　米　 90 　妹　草　 12
弟　芋　 50 母　卵 60 僕　水　420
==========================================
このように印刷する方法はないでしょうか。

小波 - 99/04/06 16:02:45
コメント:
HIRO様、ありがとうございました。早速改行。
＞EXCELで「MODE」「MEDIAN」「ROUND」関数
というより「中間値」と「最頻度値」の出し方がわからなかったので、
どなたかご存知ないでしょうか。

HIRO - 99/04/06 15:53:50
コメント:
たびたびすいません。改行してしまいました。
えーっとどうすればいいのかな？？
改行したい場所で"BR"を"<>"で括弧ってください。
大丈夫かなー
えーぃ

HIRO - 99/04/06 15:50:23
コメント:
改行したい場所で”
”を入れるらしい。ホンとかな。

HIRO - 99/04/06 15:48:53
コメント:
すみません。
テストしてしまいました。
ごめんなさい。

やすかな - 99/04/06 14:05:14
コメント:
すみません。コメントの書き方から質問しないといけないですね(^^; 改行が反映してませんでした。改行を上手く入れるにはどうすればいいでしょう?(大汗)

やすかな - 99/04/06 14:02:04
コメント:
回答ありがとうございます。質問の書き方が適当でなかったと思います。m(__)m レポートの機能を使うのですが、3件のレコードを並べて印刷したいのです。テーブル「昼飯」があるとき、項目が「人」「飯」「金」とすると ========================================== 　　　　　　昼飯レポート(旧) 人　飯　金父　豚　100 母　鳥　 70 兄　水　 10 姉　草　 20 弟　芋　 50 妹　草　 40 僕　水　 9 友　牛　300 父　米　 90 母　卵 60 兄　水　120 姉　根　 60 弟　魚　290 妹　草　 12 僕　水　 20 ========================================== 　　　　　　昼飯レポート(改) 人　飯　金　　人　飯　金　　人　飯　金父　豚　100 妹　草　 40 兄　水　120 母　鳥　 70 僕　水　 9 姉　根　 60 兄　水　 10 友　牛　300 弟　魚　290 姉　草　 20 　父　米　 90 　妹　草　 12 弟　芋　 50 母　卵 60 僕　水　420 ========================================== このように印刷する方法はないでしょうか。

HIRO - 99/04/06 12:00:35
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
小波様へ「MODE」「MEDIAN」関数については分かりませんが、「ROUND」関数についてはＡｃｃｅｓｓではかってに四捨五入されるんだっけかな？私は対象数値に＋０．５してＩｎｔ関数で切り捨てると言う方法を良く使いますが参考になりますでしょうか？？

HIRO - 99/04/06 11:51:18
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
yasukana様へレポートのページ設定の中でレイアウトの設定をしてあげれば良いと思います。

yasukana - 99/04/05 18:38:46
電子メールアドレス:yasukana@anet.ne.jp
コメント:
非常に単純な作業だと思うのですがやり方が分かりません。項目数が3つくらいの単純なテーブルの内容を印刷する場合、アクセスのレポートだと無駄なスペースが出来てしまいます。スペース的には3行（3項目×3行）くらいは一度に印刷出来そうなのですがどのようにすればいいでしょうか。＜自分では項目数が9のテーブルに一度割り振ってから印刷を行っています。欠点としてはレコード数が増えると割り振りにやや時間がかかることと、縦方向の割り振りが出来ないことです。＞

小波 - 99/04/05 16:42:45
コメント:
はじめまして。いきなりなのですが、関数がわかりません。 EXCELで「MODE」「MEDIAN」「ROUND」関数をACCESSで使用する場合、どのような方法がありますでしょうか？

HIRO - 99/04/05 11:10:54
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
SAKI様へ改行の仕方が分からず横並びになってしまいました。とりあえず"。"で区切ります。 Dim dwk As Date。 Dim dret As Date。 Dim swk As String。 swk = Me![txt1]。 dwk = Left(swk, 2) + "/01/01"。 dret = CDate(Format(dwk, "yyyy/mm/dd")) + CInt(Right(swk, 3)) - 1。です。誰か改行にやり方教えて下さい！！

HIRO - 99/04/05 11:07:18
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
SAKI様へ日付テキストを日付ＴＸＴとして Dim dwk As Date Dim dret As Date Dim swk As String swk = Me![txt1] dwk = Left(swk, 2) + "/01/01" dret = CDate(Format(dwk, "yyyy/mm/dd")) + CInt(Right(swk, 3)) - 1 でＯＫでは。

SAKI - 99/04/05 10:34:38
電子メールアドレス:ask-tsn@po.harenet.ne.jp
コメント:
初歩的な事なのですが教えて下さい。旧システム（基幹システム）の日付がテキスト形式で97001,97300といったｙｙーｙ形式？になっておりましてこのデーターをｙｙｙｙ-mm-dd形式（例 19970101)に変更しようとしました。とりあえずテスト的にＲｉｇｈｔ関数で年間通算日のみを抽出し FORMAT関数で実行したところ上記のような001が1231と表示されてしまいます。 0101を期待したのですが。本当に初歩的なことですけど教えて下さい。

はんす - 99/03/30 21:52:35
電子メールアドレス:skuroki@cc.mbn.or.jp
コメント:
　ＨＩＲＯさんありがとうございます。さっそく試したら、できました。またなにかありましたら、よろしくお願いします。

HIRO - 99/03/29 10:42:14
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
はんす様へ入力を一つのフィールドで行うということでそのフィールドの定型入力で和暦日付(大正、昭和、平成)を選択。書式でgggee/mm/ddをセット。これで日付型の元号入力、元号表示となるのでＦＯＲＭＡＴなどで西暦を引っ張ってこれるのではと思うのですが．．．

HIRO - 99/03/29 09:30:25
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
mieko様へそのフィールドのデータ型はなんですか？オートナンバーでなければ自分で連番を振るしかないのでは。オートナンバーだとちょっと面倒だと思ったのですが．．．調べてみないと分かりません。

はんす - 99/03/29 00:22:39
電子メールアドレス:skuroki@cc.mbn.or.jp
コメント:
　こんにちは。　入力で元号（平成）と年月日（11/04/01）という風にしています。両方ともテキストです。（年月日は日付型のほうがいいのでしょうか？）これを日付型で西暦（1999/04/01）に変えたいんですが、どうしたらいいのでしょうか？　これを使って、年齢を算出したいと思っているんですが・・・　どうぞ、よろしくお願いします。

KAWA - 99/03/27 15:18:38
電子メールアドレス:kym00320@nifty.ne.jp
コメント:
アクセスにおいて、テーブルのデータ又は、抽出したデータ(レポート)をファックスに転送するには、どうしたらよいのでしょうか？どなたか教えてください。

mieko - 99/03/27 08:44:01
電子メールアドレス:xyz123@coral.ocn.ne.jp
コメント:
101.102.103.....115.116.201.202.203....256.257.301.302.303....335.336などの様に 3けたの連番の数字が並んでいます。レコードを挿入したり削除したりすると連番がバラバラになってきました。レコード挿入時あるいは削除時に自動で連番になるようにするにはどうしたらよいのでしょうか？どなたか教えてください。

HIRO - 99/03/26 13:10:18
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
akasaka 様へ取りあえず、パラメータクエリーを書いときます。抽出したいフィールドの抽出条件のところで Between [開始日] And [終了日]とすればできますよ。

akasaka - 99/03/26 10:51:28
電子メールアドレス:akasaka@b2j.co.jp
コメント:
アクセスの初心者ですが、パラメーターで、何月何日から何月何日までのデーターを摘出するためにはどのようにパラメータなどを設定すればいいのか分かりません。また、その他で良い方法があれば、教えてください。

永井 - 99/03/24 18:11:42
電子メールアドレス:ymn_mail@yahoo.co.jp
コメント:
HIROさま：ご回答ありがとうございました。大変助かりました。今後とも、よろしくお願いいたします。

HIRO - 99/03/24 17:30:04
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
永井さまへ iRet = SysCmd(acSysCmdGetObjectState, acForm, "フォーム名称")で可能です。返り値の判断材料として、0：開いていない、存在しない、acObjStateOpen：開いている、で判断できると思います。詳しくはSysCmd関数のＨＥＬＰに記載されていますのでそちらをご覧ください。

HIRO - 99/03/24 17:19:37
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
鈴木　静男様へそうですね。コントロールソースにてＤＬＯＯＫＵＰで表示させてしまうと確かに編集ができませんね。表示のみの場合には有効ですけど．．．一つの方法として、担当者コードの更新後処理にて同様な処理をしてあげれば編集可能だと思います。ＭＥ！［担当者名］＝ＤＬＯＯＫＵＰ（ｘｘｘｘｘ）でいいかと。テーブルに書き込む方法ですが考え方としては２つ。一つは、フォームとテーブルを連結させる。（フォームのコントロールソースにテーブルを指定する。）これは自動でテーブルに書き込まれます。もう一つは、フォームとテーブルを非連結させる。（フォームのコントロールソースには何も指定しない。）これは表示や書き込みなど全て自分自身でやります。（ＵＰＤＡＴＥなど）一概にどちらが良いとは言えませんが、自分がやりやすい又はシステムによると思います。

永井 - 99/03/24 15:59:25
電子メールアドレス:ymn_mail@yahoo.co.jp
コメント:
フォームが開いているかどうかを判断するにはどうしたらいいのでしょうか？そのフォームがアクティブかどうかではなく、開いているか閉じているかを判断したいのですが。

鈴木　静男 - 99/03/24 11:32:42
電子メールアドレス:PEN00188@pas.mei.ne.jp
コメント:
HIROさんに前回、DLOOKUPを教えていただいたのですが、あれって表示だけでテーブルには書きこまれないんですか？不勉強で申し訳ないですが、テーブルに書き込む方法があればお教えください。よろしくお願いいたします。

みか - 99/03/19 23:55:44
電子メールアドレス:mndchiho@osk3.3web.ne.jp
コメント:
こんにちは。最近accessを始めたばかりの初心者です。テキストはFOM出版の「よくわかるトレーニングテキスト Access97のパート2を使用しているのですが（パート1は勉強済）つまずいてしまっています。もし、このテキストを勉強された方がおられましたら、お教え下さい。 106ページの一番下のPointの欄の「更新クエリーと時間の経過」というところですが、説明の最後の方にある「「金額訂正日」には初期値としてシステム運用開始日を全件入力しておきます。」のなかのシステム運用開始日というのはいつのことなのでしょうか。また、左にある「Q4全額更新：更新クエリー」の金額訂正日の抽出条件になぜ

鈴木　静男 - 99/03/18 14:42:00
電子メールアドレス:PEN00188@pas.mei.co.jp
コメント:
HIRO様、ありがとうございました。見事に動作しました。で、ちょっと感激してます。今後ともよろしくお願い致します。それでは。

HIRO - 99/03/18 09:45:50
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
鈴木　静男様へ担当者名のコントロールソースに以下をセットする。 =DLookUp("担当者名","担当者テーブル","担当者コード = '" & [Forms]![フォーム名]![担当者コード] & "'") DLookUp関数についてはHelpをご覧下さい。で、でっきるっかな？、でっきるっかな？、はてはてフフーンということで．．．頑張って下さい。

鈴木　静男 - 99/03/17 16:37:54
電子メールアドレス:PEN00188@pas.mei.co.jp
コメント:
初めまして、Access97入門編で悩んでいる初心者です。　実績表のテーブル（ID、担当コード、実績）と担当者のテーブル（ID,担当コード、担当者名）からフォームを作成し（担当コード、担当者名、実績）、データを入力したいのですが、フォーム上で担当者コードを入力したら担当者名を表示させる方法がよく分からないんです。リストボックス等で選択するのは担当者が多いので手間がかかってしまいます。　クエリーで設定すると担当者名はでますが、新規入力が出来ませんし(出来ますか？)・・・。　どなたかご指導をよろしくお願い致します。

HIRO - 99/03/15 09:27:10
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ぴゃ！様へ確かに色が付けられれば見やすいですね。私も分かりません。もしやり方が分かったら教えて下さい。 gachap様へどのような方法でワードに出力しているのですか？（[ファイル]－[エクスポート]かな？）私のところではしっかり出力されています。(WinNT&Access97です。)

H.UENUMA - 99/03/12 22:25:15
電子メールアドレス:hisa@janis.or.jp
コメント:
ＨＩＲＯさん、大変助かりました。参照設定で問題はすぐ解決しました。一時はデータベース構築をやり直さねばならないかと危惧しましたが……。本当にありがとうございました。

gachap - 99/03/11 14:19:05
電子メールアドレス:gachap@mail.goo.ne.jp
コメント:
Accessで作ったフォームをワードに出力した時に罫線が消えてしまいます。ちゃんと出来ている時もあるのですが・・・？？？

ぴゃ！ - 99/03/11 11:59:08
電子メールアドレス:pya2@oneplace.com
コメント:
はじめまして！！ＡｃｔｉｖｅＸカレンダーコントロールを使用して予定表を作成したのですが、『カレンダー表示で土曜日、日曜日は色を変えれないのか、見づらい！！』と課員に責められています。どなたか分かる方がいらっしゃればぜひ教えて下さい。お願いします。

HIRO - 99/03/11 10:35:50
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
H.UENUMA 様へ追加です。 WinNT4.0&Access97です。それ以外だと参照設定かな？

HIRO - 99/03/11 10:28:00
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
H.UENUMA 様へＯＳとアクセスのバージョンは何ですか？ WinNTでFORMAT関数(ggge"年"mm"月"dd"日")を使うとおかしくなる現象があるらしいです。サービスリリースをあてると直るらしいです。では。

H.UENUMA - 99/03/11 00:09:48
電子メールアドレス:hisa@janis.or.jp
コメント:
どなたかわかれば教えてください。仕事で必要な、あるデータを構築し、そのデータをMS-wordへ差込印刷して書面を作成するといった業務を行っております。そのデータに日付／時刻型の形式のものがあるのですが、それを差込印刷するとwindowsに設定された表示形式（例えば99/03/10という形式）でしか表示されません。そこでFormat関数を用いて「平成11年3月10日」と表されるフィールドを作成し、そのデータをMS-Word上で差し込んでいました。ところが先日、新しい機種を買い換えたため、そのデータをコピーし、今までと同じように利用しようとしたところ、Format関数を用いたフィールドのレコードが「#Error」と表示され、MS-Wordへの差し込みが出来なくなってしまいました。他の機種にデータをコピーしたところ同じ結果になってしまいました。このような場合の対処法がありましたら教えてください。（なお、このようなことになるのはFormat関数のみで他の関数は正常に表示されました。）

HIRO - 99/03/10 09:20:43
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
そのぴ～様へマイクロソフトのサイトです。参考になると思いますが．．． http://www.microsoft.com/japan/support/kb/articles/J026/7/80.htm

そのぴ～ - 99/03/09 20:06:29
電子メールアドレス:q-com@mnet.ne.jp
コメント:
はじめまして。Access初心者の私に、みなさんの知恵をお貸し下さい。現在Access2.0(Win3.1)上のシステムを、Access97に移行しなければならなくなり、初心者の私は頭を抱えている状況です。2.0から97に移行する際にソースの互換性はどの程度あるのでしょうか。 dll変更する程度で動作するのでしょうか？。よろしくお願いします。

さおり - 99/03/08 14:29:29
コメント:
ＨＩＲＯさん、ありがとうございました。ＳＱＬ文を変更したら出来ました！今、ヘルプや参考本を見ながらＳＱＬを勉強してます。これからも、よろしくお願いします。

HIRO - 99/03/02 18:30:10
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
さおり様へうーん？もしかしてこれでいいのかな？サブフォームのＳＱＬ文です。 SELECT DISTINCTROW 製品マスタ.寸法, Max(図面管理.図面作成日) AS 図面作成日の最大, Max(図面管理.図面番号) AS 図面番号の最大, Max(図面管理.図面備考) AS 図面備考の最大, Max(図面管理.配筋作成日) AS 配筋作成日の最大, Max(図面管理.配筋備考) AS 配筋備考の最大, Max(図面管理.型枠有無) AS 型枠有無の最大, Max(図面管理.製品入力用コード) AS 製品入力用コードの最大, Max(製品マスタ.製品名) AS 製品名の最大, Max(製品マスタ.集計用コード６桁) AS 集計用コード６桁の最大, Max(製品ＣＤ検索.小分類名称) AS 小分類名称の最大 FROM (製品マスタ INNER JOIN 図面管理 ON 製品マスタ.製品入力用コード = 図面管理.製品入力用コード) INNER JOIN 製品ＣＤ検索 ON 製品マスタ.集計用コード６桁 = 製品ＣＤ検索.集計用コード６桁 GROUP BY 製品マスタ.寸法 ORDER BY 製品マスタ.寸法, Max(図面管理.図面作成日), Max(図面管理.配筋作成日); 寸法でグループ化し、図面作成日は最大値のもの、他の項目も最大値を選択。これでどうですかね？違うかな？

HIRO - 99/03/02 16:39:40
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ぽんちっちー様へフィールドのデータ形式として"9XXXX ～ 9XXXX"のように固定であるなら"～"を検索後、次の数値を引っ張ってくるというのはどうでしょう。ということでやり方としてフィールド名を"ぽんきっき"とした場合、 Mid(Me![txt], (InStr(1, rs![ぽんきっき], "～")) + 2, 1)で取得できるのでは。MidとInStrについてはHELPをご覧ください。間違っていたらすいません。

ぽんちっちー - 99/03/02 13:42:52
電子メールアドレス:kanzaki@mail.kyt.co.jp
コメント:
access97のテーブルのフィールド（テキスト型）に次のようなデータがあったとします。（勘定奉行のテキストデータをaccess97でデータ変換して印刷するところまでのシステムです。）例1) 5鹿　ＳＶ（店舗運営）～ 9東　ＳＶ（店舗運営）例2) 1東京～ 2大阪例1)の時は数字の5と9を取り出したい。例2)の時は数字の1と2を取り出したい。その範囲で印刷の範囲指定条件にしたいと思っています。左側の5と1はval関数で取り出せたのですが、右側の方の9と2を取り出す方法があれば教えていただけないでしょうか？すごく困っています。よろしく御願いします。

さおり - 99/03/02 11:33:06
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
ＨＩＲＯさん、考えてみるもののやはり良い発想がないです。　　　　　　　　　　　　　　　　　　　　　　　　メインフォームのＳＱＬ文は、以下のようです。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 SELECT 製品マスタ.集計用コード６桁, 製品ＣＤ検索.小分類名称, 製品マスタ.寸法　　　　　　　　　　　　　　　 FROM (配筋作成者 INNER JOIN (担当者マスタ INNER JOIN (製品マスタ INNER JOIN (型枠マスタ INNER JOIN 図面管理 ON 型枠マスタ.型枠コード = 図面管理.型枠コード) ON 製品マスタ.製品入力用コード = 図面管理.製品入力用コード) ON 担当者マスタ.作成者ＮＯ = 図面管理.作成者ＮＯ１) ON 配筋作成者.作成者ＮＯ = 図面管理.作成者ＮＯ２) INNER JOIN 製品ＣＤ検索 ON 製品マスタ.集計用コード６桁 = 製品ＣＤ検索.集計用コード６桁　　　　　　　　 GROUP BY 製品マスタ.集計用コード６桁, 製品ＣＤ検索.小分類名称, 製品マスタ.寸法;　　　　　　　　　　　　　そして、サブフォームのＳＱＬ文は、次のようです。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　SELECT DISTINCTROW 製品マスタ.寸法, 製品マスタ.指定荷重, 製品マスタ.重量, 図面管理.図面作成日, 図面管理.図面番号, 図面管理.図面備考, 図面管理.配筋作成日, 図面管理.配筋備考, 図面管理.型枠有無, 図面管理.製品入力用コード, 製品マスタ.製品名, 製品マスタ.集計用コード６桁, 製品ＣＤ検索.小分類名称　　　　　　　　　　　　　 FROM (製品マスタ INNER JOIN 図面管理 ON 製品マスタ.製品入力用コード = 図面管理.製品入力用コード) INNER 　JOIN 製品ＣＤ検索 ON 製品マスタ.集計用コード６桁 = 製品ＣＤ検索.集計用コード６桁　　　　　　　　　　　　　 ORDER BY 製品マスタ.寸法, 図面管理.図面作成日, 図面管理.配筋作成日;　　　　　　　　　　　　　　　　　　　集計用コード６桁でグループ化をします。例えば集計用コード６桁”010101”（Ａ型アーム）の製品の一覧表になります。さらに、サブフォームの寸法で同じ寸法内で図面作成日が最新のもののみを表示させる。これが出来ない。ＶＢＡで寸法が同じ物が有れば図面作成日を昇順に並び替え一番新しい物だけを抽出する命令を書けばよいのかもしれないが、どういう風に書けば良いかわからないし、もしからしたら別の考え方で可能となるのかもしれないし。発想もなければ、どうしたらよいのかさえもわからない状態です。もし、おわかりでしたら教えて下さい。お願い致します。　　

HIRO - 99/02/25 11:57:44
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
みゆ様へ必要な項目とは必要なレコードと判断してテーブル作成クエリーで可能ではと思います。

みゆ - 99/02/18 18:24:40
電子メールアドレス:miyu2@bg.mbn.or.jp
コメント:
すみません。　下のメールアドレスが違っていました。

みゆ - 99/02/18 18:22:43
電子メールアドレス:miyu@bg.mbn.or.jp
コメント:
はじめまして、Access初心者でこんな質問をしても良いのか迷いましたが思いきって相談します。１．テキストデータをインポート２．インポートしたとき新たなテーブルを作成３．新たなテーブルから必要な項目（複数）だけを別のテーブルに保存を行う ※１と２に関しては問題ないのですが、３に関して自動的に出来る方法はないでしょうか? 誰かご存知の方がいましたら是非教えてください。よろしくお願いします。

HIRO - 99/02/09 09:19:43
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
さおり様へそのフォームで使用しているテーブルの構成（フィールド）はどうなっていますか？一つのテーブルとしてみた場合、ＳＱＬ文で書くとこんな感じですかね－＞ SELECT test.製品コード, test.寸法, Max(test.画面作成日) AS 画面作成日の最大 FROM test GROUP BY test.製品コード, test.寸法;

- 99/02/08 10:18:49
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
　ＨＩＲＯさんアドバイスありがとうございました。クエリービルダで抽出条件を設定しフォーム上で印刷できるようにしました。　しかし、ここで問題が発生しました！メインフォームにある[製品コード]でグループ化し、さらにサブフォームにある[寸法]をグループ化したいのですが、備考欄がありグループ化ができません。もし、このグループ化が可能なら、さらにグループ化された[寸法]のなかで[図面作成日]の最新の物だけを表示したサブフォームにしたいのですができません。クエリービルダの[トップ値]を”１”にするとグループ化を無視して１つしか表示されません。＜メインフォーム＞　　　　　　　→　　　　＜サブフォーム＞　　　　[製品コード]０７０１０１　　　　　　　　[寸法]1000＊2000　[図面作成日]平成１１年２月６日　　　　　　　　　　　　　　　　　　　　　　　　1000＊500　　　　　　　　平成１０年１月５日このようにしたいのですが、どなたかわかる方がいらっしゃたらヒントを下さい。お願いします。　　

永井 - 99/02/02 19:53:40
電子メールアドレス:ymn_mail@yahoo.co.jp
コメント:
VBAで作成したアプリケーションを動かすと、アクセス違反でワトソン博士がでてしまいます。必ずでるわけではなく、でたりでなかったりします。スピードの遅いパソコン上では、うまくいくのですが、原因がわかりません。考えられる原因を教えてください。ＯＳは、ＷｉｎｄｏｗｓＮＴです。

HIRO - 99/01/28 16:02:42
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
ヤス様へ年を求め、減算する。ということでＹｅａｒ（Ｄａｔｅ）－Ｙｅａｒ（生年月日フィールド）ではどうですかね？更新後処理にて計算し、結果をセットしてあげればできるのでは

HIRO - 99/01/28 15:10:47
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
さおり様へそれはレポートを使用せずにフォーム上で印刷するということですか？基本的には、フォームで設定した抽出条件をそのまま使用して、対象のデータを印刷する事は出来ます。

HIRO - 99/01/28 15:01:18
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
はんす様へこんにちわ。サブフォームのプロパティーに"リンク子フィールド"と"リンク親フィールド"というのがあります。そこで設定すれば良いのでは．．．と思います。

ヤス - 99/01/28 12:34:13
電子メールアドレス:jcl7795@a3.mnx.ne.jp
コメント:
どなたかご存知の方、アドバイスをお願いします。フォームで生年月日と年齢のフィールドがあります。生年月日を入力すると同じに年齢も入力されるよなマクロないしはモジュールは可能でしょうか？同じく、フォーム上で一つのフィールドに金額を入力すると、もう一つのフィールドに、前フィールドから計算した金額が入力されるよなことも可能でしょうか？宜しくお願いします。

さおり - 99/01/27 11:32:33
電子メールアドレス:s-ozeki@maruei-con.co.jp
コメント:
初めまして。このようなページがあるだなんて大感激です。ACCESSの仕事をいただいたものの、誰にも聞くことができず困ってました。よろしくお願いします。フォーム（メイン／サブフォームです）上で、抽出・昇順表示しレポート形式で印刷したいのですが、全件印刷しかできないのですが可能（ＶＢＡ）ですか？教えて下さい。

はんす - 99/01/27 00:14:10
電子メールアドレス:skuroki@cc.mbn.or.jp
コメント:
はじめて　します。初心者なのでなにもわかりませんがご指導お願いします。フォーム上でウィザードでサブフォームを作っています。ウィザードでメインフォームとリンクするフィールドを指定しますが「独自に設定する」で指定しています。しかし、リンクするフィールドは三つまでしか、リンクできません。　三つ以上をリンクする方法はないでしょうか？よろしくお願いします。

mizu - 99/01/26 11:49:27
電子メールアドレス:mizushima@woodland.co.jp
コメント:
ACCESSの初心者です。消費税を自動計算するフィールドを作成しました。小数点以下の処理は、基本的には切り捨てですが、支社五入のときもあります。ですので、自動計算した後に、修正ができるような設定にしたいのですが、どうやったらいいのでしょうか？

vie - 99/01/24 20:33:47
電子メールアドレス:fwgj9139@mb.infoweb.ne.jp
コメント:
はじめまして。初心者ですが、成績管理のためのデータベースを作成したいと思っています。 SQL文のwhere句やselect句の中で、フィールド名を変数として参照することは可能でしょうか？つまり、フォームのリストボックスの値（フィールド名をリストにしている）を変数に代入し、それを参照して、クエリーのフィールドを、表示したり、させなかったりするようにしたりできますか？また、forms![フォーム名]![コントロール名]の[コントロール名]も変数にできませんか？どなたか教えてください。よろしくお願いいたします。

やすと - 99/01/04 15:40:00
電子メールアドレス:jcl7795@a3.mnx.ne.jp
コメント:
はじめまして、ほぼ初心者の「ヤスト」と申します。お時間がありましたらアクセスマスターの方々にご指導を頂きたくご質問をします。顧客の情報の一部として携帯番号を保存しております。この度の番号「11桁化」で変換の必要があるのですが、うまく（まったく？）変換できません。私が今推測からいじっているのは「更新クエリー」です。しかし、「11桁化」のように一部分のみの変換ができません。更新クエリーの手順は問題ないはずですが、抽出後の一部更新は出来ないのでしょうか？例：０１０－２３４－５６７８　を　０９０－１２３４－５６７８に変換０１０＊で抽出後　０９０１　と更新欄に入力しましたが、（当然？）新しいレコードは０９０１のみで、それ以降の番号は残してくれません。おそらく基本的な質問と思われますが、できましたら宜しくお願い致します。長々すいませんでした。

矢野玲子 - 99/01/02 21:16:15
電子メールアドレス:Ryoko-ymitu@msn.com
コメント:
すみませ～んさっきの質問ですが、解決できました。お正月からおさがわせしました。

矢野玲子 - 99/01/02 16:59:25
電子メールアドレス:Ryoko-ymitu@msn.com
コメント:
ａｃｃｅｓで1000件以上のデータにある規則性を持ってナンバリングを行いたいのですが、フォーム上でマクロでループさせると２０回で規則違反になってしまいます。何か良い方法はないでしょうか。ただし、できるだけモジュールを使用せずに開発したいのです。今テープル・クエリー・フォーム・マクロでどこまで開発できるかに挑戦しています。よろしくお願いします。

プリン - 98/12/20 00:00:32
電子メールアドレス:kb@yha.att.ne.jp
コメント:
全銀手順の引落の請求データ（固定長テキストデータ）を作りたいのですが、データをエクスポートするときに、ヘッダーレコード、トレーラーレコード、エンドレコードをそれぞれテーブルの先頭、最終レコードに追加する方法がわかりません。どなたか教えていただけませんでしょうか・・・・・・

HIRO - 98/12/18 17:27:53
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
岸裏典雄さまへ具体的に書かかれていないので分かりかねますが、もしかしたら参照設定かな？基本的には下記の３つがチェックされているはず。 Visual Vasic For Aprications Microsoft Access 8.0 Object Library Microsoft DAO 3.51 Object Library 私も以前このような現象があってはまったような記憶が．．．間違っていたらごめんなさい。

岸裏典雄 - 98/12/18 10:24:08
電子メールアドレス:j_came@pop17.odn.ne.jp
コメント:
はじめまして、岸裏と申します。 Access97のフォームでテキストボックスの既定値としてFormat関数を使っているのですが、同じMDBファイルでマシンによって、Format関数が使えたり使えなかったりします。何か設定でもあるのでしょうか？ご存知の方がおられましたら、お教えください。

PHONES - 98/12/16 16:37:49
ホームページアドレス:http://plaza13.mbn.or.jp
電子メールアドレス:mori_phones@mba.nifty.ne.jp
コメント:
弊社では現在アクセスとエクセルを使ったアンケート集計の開発者を捜しております。アクセスでの開発経験豊富なかた。アンケート集計を以前手がけた方は大歓迎です。できれば弊社（東京・日本橋）へ打ち合わせに来られる方。ご質問はメールにておねがい致します。

- 98/12/12 17:00:36
コメント:
2

うんばば - 98/12/09 16:38:29
電子メールアドレス:unbaba@mail.dddd.ne.jp
コメント:
初めまして。Ａｃｃｅｓｓ超初心者です。初心者ながらも顧客管理などを作成しようと、現在奮闘中です。実は各顧客の電子メールアドレスにデータなどを飛ばしたいのですが、作成方法がわからないのです。(T_T)どなたかわかりやすく教えていただける方、いらっしゃいませんか？？

かんな - 98/12/09 16:08:57
電子メールアドレス:sk4nikzw@tky.3web.ne.jp
コメント:
H.Asakawa様＞

もし本当にそれをやる必要があるのならば、APIを呼び出して
画面の大きさを取得し、判定することが必要になるのではない
でしょうか？たしか、関数名は「GetSystemMatrix（スペル忘れま
した；）」だったと思いますが；
画面のピクセル数によって画面の大きさやフォントのサイズを設定
するのは、非常に手間がかかるので、できればやめた方がよいので
はないでしょうか？

ＦＵＪＩ - 98/12/08 19:19:44
電子メールアドレス:fujii12@isop.ne.jp
コメント:
ＡＣＣＥＳＳ９７のフォームを開く際、フォームに貼り付けてあるタブのページを指定して開く方法をご存じの方教えてください。マクロからでもモジュールからでも開く方法は問いません。よろしくお願いします。

Hiroya - 98/11/27 10:19:40
電子メールアドレス:hirofw@bg.mbn.or.jp
コメント:
はじめまして。Microsoftのサポートでも、全く扱われていないので、どなたかご存知の方がいらっしゃればと思い、掲示させていただきます。Access97を使っていろいろな製品の開発を行なっているのですが、基本的には非連結フォームを使い、全てVBAを使用してプログラミングを行なっています。私の環境は Win95 上の Office97 のAccess を使用してるのですが、この環境で開発したmdbを、Access97単体(Office97に含まれているものではない、ということ)をインストールされたマシンで実行すると、StrConv や Mid などの関数がことごとくコンパイルエラーとしてはじかれてしまいます。[ツール]の[参照設定]の参照不可になっている項目のチェックをはずしてあげると、作動するようになるのですが、なんとも面白くありません。どなたかこの現象について知っている方がいらっしゃいましたら、原因について教えてください。よろしくお願いします。

H.Asakawa - 98/11/26 16:39:58
電子メールアドレス:shg@mail.wind.ne.jp
コメント:
Access97でシステムを作るとき、800×600ピクセルで作ると1024×768ピクセルで画面が小さくなり困っています。画面のピクセルに合わせて、Accessのフォームをの大きさを自動的に変える方法を教えてください。どうかよろしくお願いします。本当に困っています。

ひで - 98/11/26 14:23:35
電子メールアドレス:hide@taisei-e.co.jp
コメント:
はじめまして、自分なりに色々と調べてみたのですが、解決方法がみつからないので、どなたか教えてください。顧客管理のデータベースで、ハイパーリンク型のフィールドを使用して、メールアドレスを入力してクリックすると、メールソフトの宛先に、入力したメールアドレスが入力されて、メールソフトが起動する処理を作成したのですが、何故か、メールソフトが2回起動します。これは、Access97のバグですか、それとも何か良い方法がありますか、教えてください。

かなや - 98/11/26 10:56:10
電子メールアドレス:rincs@seagreen.ocn.ne.jp
コメント:
はじめまして。 Access97で書庫管理DBを作成しております。各フィールドのデータに変更が加わった場合に日付フィールドに日時と時間を表示するようにしたいのですがどうすればよろしいでしょうか？

HIRO - 98/11/20 11:58:21
電子メールアドレス:ohkawa@lead-ltd.co.jp
コメント:
あひさんへ。こんにちわ。一つの例です。テーブル：商品テーブル商品コード（数値）商品名（文字）金額（通貨）フォーム：商品フォーム（商品テーブルと連結）検索用入力フィールド（非連結で商品コードを入力）商品名（商品テーブルの商品名と連結）金額（商品テーブルの金額と連結）を作成します。検索用入力フィールドはコンボボックスにしておくと便利かもしれませんね。（入力チェックプロパティーをはいに設定）検索用入力フィールドの更新後処理に以下のコードを記述します。 Me.RecordsetClone.FindFirst "[商品コード] = " & Me![検索用入力フィールドの名前] Me.Bookmark = Me.RecordsetClone.Bookmark これで検索用入力フィールドを更新するたびに該当するデータが表示されると思います。これはあくまでも一つの例です。他にも多くのやり方があると思います。（人それぞれ）自分にあった自分なりの検索方法が見つかると良いですね。（私も含め）。頑張って下さい。

あひ - 98/11/20 00:03:04
電子メールアドレス:hiccyan@po.synapse.ne.jp
コメント:
こんにちは　アクセスで検索システムを作成中です　が　しかし　エクセルからはじめた方が良いんじゃないの？　といった状態です　シロウトです　困っています　どなたかアドバイスを頂けると幸いです　一つの商品に対しコードが４つ５つあります　それで　どのコードを入力しても商品の情報が出力されるようにしたいです　テーブルは一つで　フィルタ機能でやってみました　手動では一応検索できますが　コマンドボタンなどを利用すると　なんだか変になってしまいます　テーブルは一つで良いのでしょうか？　つまらん質問かもわかりませんがお助けくださ～い！　　

かんな - 98/11/11 11:15:24
電子メールアドレス:kanna@doors.mls.ad.jp
コメント:
c-yoshida 様そのエラーは、おそらくコントロールにフィールドが連結されており、選択した値をテーブルのフィールドに型変換、もしくはフィールドの大きさなどのエラーによって保存できない・・・というエラーかと思われますが。。。ふりがな表示専用のコントロールであれば、まずは、連結コントロールの指定をやめてみてくださいませ。

c-yoshida - 98/11/10 13:11:40
電子メールアドレス:ai5c-ysd@asahi-net.or.jp
コメント:
ＨＩＲＯさん；かんなさん解答ありがとうございました。今回はかんなさんの解答を使わせて頂きました。さらに県名テーブルにふりがなのフィールドを作って,テキストボックスに表示させたいと思ったのですが,表示した後に実行時エラー’2115’と出てきてデータの保存が出来ないと怒られるのですが,これを解決する方法があるでしょうか。表示のさせ方は教えて頂いたコードの前にテキストボックス.SetFocus テキストボックス.Text = CB_県名.Column(2) を追加しています。

taka - 98/11/04 18:18:17
電子メールアドレス:ast@sainet.or.jp
コメント:
自分自身を最適化する方法を教えてください。

ＨＩＲＯ - 98/10/29 16:17:52
コメント:
c-yoshidaさんへ忘れてました。県名のコンボボックスの更新後処理に Me.Refreshを入れないと反映されません。

かんな - 98/10/29 13:49:40
電子メールアドレス:kanna@doors.mls.ad.jp
コメント:
c-yoshidaさんへ

県名のコンボボックスの更新後のイベントに、以下のコードを追加してみるのも手です（＾＾）
前提として、
－－－テーブルの設定－－－
県名テーブル：県コード（数値）、県名（文字）
市名テーブル：県コード（数値）、市名（文字）
があると仮定します。コンボボックスの指定は以下の通りになります。カスタマイズしてください。
---コンボボックス---
県名コンボ（CB_県名）
値集合ソース：SELECT 県コード, 県名 FROM TBL_県名 ;
連結列：1
列数：2
列幅：0cm;4cm

県名の更新後イベントに追加するコードはしたの通りです。
結構いろいろな場合に使えると思います（＾＾）

CB_市名.RowSource = "SELECT 市名 FROM TBL_市名 WHRER 県コード =" & CB_県名 & ";"
CB_市名.Requery

では・・・

ＨＩＲＯ - 98/10/29 10:28:19
コメント:
c-yoshidaさんへはじめまして私はこうやっています。以下のクエリーを市名フィールドの値集合ソースプロパティーにセットします。 SELECT 市名テーブル.市名 AS 式1 FROM 市名テーブル WHERE (((市名テーブル.県名)=[forms]![フォーム名]![県名コントロール])); 市名テーブルには県名フィールド、市名フィールドがないといけませんが他の方法があったら教えて下さい！

ＨＩＲＯ - 98/10/29 10:08:06
コメント:
由郷さんへはじめまして。テーブルの全フィールドを＊でセットするのではなく、一つ一つセットすればエラーメッセージもでないと思いますが．．．

- 98/10/29 09:55:14
コメント:
2

登本　義和 - 98/10/28 22:29:49
ホームページアドレス:http://nobokun@dion.ne.jp
コメント:
　先日，質問掲示をしました「レポートでの各ページの小計の出し方」がわかりましたので，必要な方はご活用ください。１．表形式のレポートを作成する。(小計を出したいフィールドは[面積]) ２．レポートフッターに非連結のテキストフィールドを作り，名前を「小計」とする。３．詳細セクションプロパティを開いて，イベントの印刷時のマクロビルダを選択する。４．マクロ名を「小計計算」とする。マクロでは「値の代入」を選択し，アイテムに　[小計]　を，式に　[小計]+[面積]　と入力する。５．次にページヘッターセクションプロパティを開いて，イベントの印刷時のマクロビルダを選択する。６．マクロ名を「各ページ頭ゼロ」とする。マクロでは「値の代入」を選択し，アイテムに　[小計]　を，式に　0　と入力する。７．できあがり。

c-yoshida - 98/10/28 21:10:51
電子メールアドレス:ai5c-ysd@asahi-net.or.jp
コメント:
すいません。半角カタカナを使ってしまったのでもう一度送ります。どなたか教えて下さい。ルックアップを使って入力できる対象を絞りたいと思っているのですがうまく行きません。例えば,県名テーブルと市名テーブルを作成して住所録テーブルの県名と市名をコンボボックスで入力するとします。県名を選択し,次に市名を選択する時にその県名の条件で絞られた分だけリストに出てきて欲しいのですが，市名テーブル全てのレコードが出てきます。県名で指定した外部キーだけの市名リストで選択できるようにはならないのでしょうか。どうぞ,よろしくお願いします。

c-yoshida - 98/10/28 21:02:06
電子メールアドレス:ai5c-ysd@asahi-net.or.jp
コメント:
どなたか教えて下さい。ルックアップを使って入力できる対象を絞りたいと思っているのですがうまく行きません。例えば,県名テーブルと市名テーブルを作成して住所録テーブルの県名と市名をコンボボックスで入力するとします。県名を選択し,次に市名を選択する時にその県名の条件で絞られた分だけリストそ个討④突澆靴い里任垢市名テーブル全てのレコードが出てきます。県名で指定した外部キーだけの市名リストち�鬚任④襪茲Δ砲呂覆蕕覆い里任靴腓Δ� どうぞ,よろしくお願いします。

由郷 - 98/10/28 18:08:25
電子メールアドレス:yugo@efuta.co.jp
コメント:
はじめまして、由郷といいます。すいません！　だれか教えてください。　 access97でクエリーを作成中、"集計"にして「グループ化」、「合計」等で計算しようとしたら、「*で選択したフィールドはグループ化できません。」とメッセージがでてきます。そこで、ヘルプをみると、　　「アスタリスク (*) で選択したすべてのテーブルのすべてのフィールドについてグループ化または　　集計を行う SELECT ステートメントを実行しようとしました。」このような場合、どのようにすれば、このメッセージがでなくなるでしょうか。すいませんが、よろしくお願いします。

安藤松江 - 98/10/28 11:36:16
電子メールアドレス:matsue0@mail.goo.ne.jp
コメント:
j-katoさん、アドバイスありがとうございました。見たのですが、ちょっと違うような．．難しくて理解できなかった、のほうが正しいです。実はマクロで何とかできました。新規レコードをコマンドボタンで作ってあったのを何とか利用しようと思っていたから、悩んだみたいです。（コマンドボタンのウィザードでの新規レコード移動）新規レコード移動と再クエリーをマクロで設定したところにコマンドボタンでマクロを選んで．．そしたら、できたのです。お騒がせ致しました。それから、ありがとうございました。また、何かあったら、お願いします。

kirigirisu - 98/10/27 23:57:33
コメント:
失敗失敗こんにちは

kirigirisu - 98/10/27 23:56:37
コメント:
2

j-kato - 98/10/26 23:14:17
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
かんなさん　
書き込みありがとうございます。
これからもよろしくお願いします。

かんな - 98/10/26 11:02:11
電子メールアドレス:kanna@doors.mls.ad.jp
コメント:
ショートカットから、MDBファイルの最適化を実行する方法・・・１．ショートカットを作成する２．ショートカットのプロパティを表示する。３．「ショートカット」タブを開き、リンク先を変更する。
書式は「"ACCESSアプリケーションのPATH"+半角スペース+MDBファイルのPATH+半角スペース+/compact」です。
　　例） "C:\Program Files\Microsoft Office\Office\MSACCESS.EXE" C:\My Document\TEST.mdb /compact
４．作業フォルダを変更する。（MDBファイルのあるPATHを指定するとよいと思います。）
５．実行時の大きさを「最小化」に変更する。

あとは、ショートカットをダブルクリックする度に、最小化の状態でMDBファイルを最適化してくれます（＾＾）

j-kato - 98/10/25 23:50:27
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
K.Akimoto さんへ

カレンダーのフォームを「読み込む時」のタイミングで
イベントプロシージャに
　　　カレンダー名.Value = Date
を記入しておいたらいかがでしょうか。

K.Akimoto - 98/10/23 20:58:02
電子メールアドレス:ilsi@apionet.or.jp
コメント:
はじめまして、秋元と申します。このホームページの最初のページに載っている"カレンダーコントロールに今日の日付を入れる"を試してみました。デザインビューからフォームビューに画面変更した時は、日付が更新されるのですが、フォームを開いた時には、日付が更新されません。手本の通りに記述したつもりなのですが．．．。何がいけないのでしょうか？注意点などありましたらお教えください。

かんな - 98/10/22 17:49:46
電子メールアドレス:kanna@doors.mls.ad.jp
コメント:
なかむら様＞ショートカットキーの同一現象を確認いたしました。盲点でした；がっくり；；；ちょっとしか見ていないので他に影響が出るかわからないですが、今のところキーダウンでF7（あと問題くさいのはF1とF12ですか・・・）のときにキーコードをリセットするくらいですが・・・・あまりうれしい対策じゃないですね；いい案が見つかったら教えてください；；；これから対応策を考えます～

j-kato - 98/10/18 23:39:05
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
安藤さんへ

サンプルプログラム Solutions.mdb（C:\Program Files\Microsoft Office\Office\Samples\Solutions.mdb) の中の他のボックスの一覧で選択された値を基に、ボックスの一覧の内容を限定する。で一覧の内容を変更した後でその一覧を更新する。を参考にしたらいかがでしょうか？外れていたらもう一度連絡ください。

安藤松江 - 98/10/17 09:08:28
電子メールアドレス:matsue0@mail.goo.nejp
コメント:
教えてください。フォームの中にリストを設定してます。（フォームとリストは同じクエリーを使ってます。）フォームで新規レコードに移行したとき、リストに反映されるようにしたいのです。フォームでデータ入力した後、新規レコードに移動してもその前に入力したデータがリストに反映されずに終了しなくてはなりません。マクロの更新クエリーの使い方がいまいちわからないので、マクロの設定があれば教えてください。

石井　祐二 - 98/10/12 22:54:10
電子メールアドレス:yishii@infonia.or.jp
コメント:
はじめまして。ACSESSをいじって何年にもなりますが、本格的な勉強はなかなか出来ません。おもに仕事で顧客管理に使っております。さて、最近ノートパソコンを購入しましたが、親機と同じようにACCESSをインストールし、普段使用しているdbをコピーし立ち上げた所、クエリーの一番上の欄の電話番号8桁のうち右4桁を抽出する:Right([電話番号],4)という部分にエラーが出てしまいます。ACCESSのバージョンは同じなのですが、親機の方のみなにかadd-inを入れたのかも知れませんがどうしても原因がわかりません。どなたか分かる方、アドバイスをよろしくお願いします。

登本　義和 - 98/10/12 22:17:10
電子メールアドレス:nobokun@d1.dion.ne.jp
コメント:
レポートを表形式で作成したときに，ページごとの小計の出し方をご存知の方はご教授ください。ちなみにページフッターに　=sum([フィールド])　を表示しても出来ませんでした。

登本　義和 - 98/10/12 22:14:29
電子メールアドレス:nobokun@d1.dion.ne.jp
コメント:
2

Tani - 98/10/02 00:11:59
電子メールアドレス:toyohiro@os.luice.or.jp
コメント:
J-Kato さんへありがとうございました。何を使って作成すればいいのかも分かっていない状態なのでこれからリレーションを重点に置いて勉強してみます。本のほうも一度探してみます。ありがとうございました。

j-kato - 98/09/28 00:06:03
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
谷さんへ

物品仕入フォームと在庫フォームを商品コードか何かでリレーションを取り物品仕入フォームで仕入れ数を入力したら在庫テーブルの在庫数を変更することが出来ると思います。

参考資料として
エーアイ出版株式会社の
エーアイムック１６７
「Ａｃｃｅｓｓ９５Ｐａｒｔ３
システム構築編」参考になるかと思います。

谷　豊博 - 98/09/25 23:18:07
ホームページアドレス:http://luice.or.jp/~toyohiro/index.html
電子メールアドレス:toyohiro@os.luice.or.jp
コメント:
アクセスを買って未だ日が浅いのですが、どなたか分かる方がおられれば教えてください。物品仕入フォームと在庫フォームが有るとします。仕入フォームに仕入個数を入力すると在庫フォームの在庫数に個数が加算されるということは出来るのでしょうか？書籍をいろいろ調べたのですがこれだというものがありません。よろしくおねがい致します。

なかむら - 98/09/24 11:41:43
電子メールアドレス:nishida.y@ycc-kk.co.jp
コメント:
Access97で開発しています。テキストボックスにフォーカスがあるときに F7 キーを押下すると、スペルチェック機能が動作し、メッセージボックスがでてしまいます。何故、F7 キーを押下してしまうかというと、これは私が担当しているお客さんがＰＣの操作に慣れてなく、日本語入力モードになっていないのにカタカナ変換をしようとしてしまうからです。場合によってはメッセージボックスすらでず、ハング（の様な状態）してしまいます。起動時の設定で、ショートカットキーを無効にしてもこの機能は解除されません。なるべくソースコードをさわらずにショートカットキーの機能を解除したいのですが、そのようなことは可能なのでしょうか、また可能ならばどのようにすれば良いのでしょうか？

らら - 98/09/02 01:35:49
電子メールアドレス:fwhw4240@mb.infoweb.ne.jp
コメント:
初めまして。会社でアクセス９７を使用しています。初めての使用で、本を読んでいますが分からない点が多すぎます。どなたか、メールで質問ＯＫという方いらっしゃいましたらメールお願いいたします。自分の考え方が間違っているのか、とも不安になります。形は理解したつもりですが。。。分からないことは悔しいです。情けなくなります。だから絶対アクセスを制覇したい。ロータスＲ５ＪならマクロまでＯＫが今の私の限度です。どなたか、いらっしゃいましたらお願いします。

j-kato - 98/08/23 23:23:33
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
ゆみさんへ
もし学生とか教職員などでしたら、アカデミーパックが購入できます。かなり安いです。

ゆみ - 98/08/23 08:17:11
電子メールアドレス:yumi1@cocoa.ocn.ne.jp
コメント:
これからアクセス９７を始めようと思っていますが高くて買えません。なるべくやすくインストールする方法はありませんか。予算￥１５０００以下耳より情報待ってます。

えび - 98/08/18 08:48:26
コメント:
j-katoさん、ありがとうございます。入力ミスだったことが分かり、ちょっとはずかしいです。また色々と教えてください。

ひまわり - 98/08/13 16:34:41
コメント:
j-katou さん、ありがとうございます。さそく、やってみます。

j-kato - 98/08/12 23:43:33
コメント:
ひまわりさんへ追記
>Ｅｎｔｅｒキーを押すと「“Ｌｉｋｅ“＊商事““」と出てきます。
Ｌｉｋｅと＊はＩＭＥの全角でなく直接入力で入力してください。

j-kato - 98/08/12 23:33:51
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
ひまわりさんこんばんは

>抽出条件欄に「Ｌｉｋｅ“＊商事“」

を「 Like "*" & "商事" 」と書き換えてみたらいかがですか？

ひまわり - 98/08/12 16:10:29
コメント:
アクセス９７をインストールして３日目の初心者です。誰かわかる人は教えて下さい。クエリーの作成をしているのですが、抽出条件欄に「Ｌｉｋｅ“＊商事“」と入力して、Ｅｎｔｅｒキーを押すと「“Ｌｉｋｅ“＊商事““」と出てきます。これは、本を読みながらやっているのですが、どうしてもうまくいきません。たぶん、とてもばかばかしいことをやっているのだと思うのですが、教えて下さい。

j-kato - 98/08/12 00:16:35
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
えびさんこんばんは
パラメーター入力ボックスの入力欄の上に出てくる言葉（つまりアクセスが欲している変数名）がそのフォームで入力されていない訳ですのでその名前のテキストボックスなどをそのフォームに作成すればいけると思います。

えび - 98/08/11 13:21:37
コメント:
はじめまして　Accessを始めて１週間になります。初歩的な質問で申し訳ないのですが、フォームを開く時にパラメータの入力というメッセージボックスが出てきます。これを出さないようにするにはどの辺を直せば良いのでしょうか。教えてください。

j-kato - 98/08/08 00:29:15
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
ぴかさんこんばんは
サンプルプログラム C:\Program Files\Microsoft Office\Office\Samples\Solutions.mdb の「コンボックス、リストボックス、サブフォーム、サブレポートを最大限に活用する。」の「他のボックスの一覧で選択された値を基に、ボックスの一覧を限定する。」を参考にされたらいかがでしょうか？

ぴか - 98/08/06 11:20:38
電子メールアドレス:rruty630@tcp-ip.or.jp
コメント:
教えてください。フォームで入力する際に、フィールド１の値に応じてフィールド２に表示するコンボボックスの値を限定したいと思います。具体的にはフィールド１に「文房具」という値を入れるとテーブルやクエリーの「文房具」のみが表示され、そこから選択できるようにしたいのです。悪戦苦闘中の初心者です。よろしくお願いします。

ホソエ - 98/07/27 14:26:29
電子メールアドレス:hosoe-n@hidanet.or.jp
コメント:
　Dlookup関数の使い方を教えて下さい。フォームで、別のテーブルの商品情報を、コード入力で一気に入力したいのですが、うまくいきません。初心者ですので、どうぞお教え下さい。

taiga - 98/07/06 18:27:56
コメント:
誰か教えてください！！！テーブルのデザインビューのところで、下に標準とルックアップというタブがありましてそこのルックアップの１番上にテキストボックス、リストボックス、コンボボックスが選べる（DisplayControl）というプロパティの設定をVBのコーディングでコンボボックスに設定したいのですがやりかたがわかりません。どなたか親切な方、わかりやすく教えてください。よろしくお願いします。

j-kato - 98/06/24 02:09:47
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
よしあきさんこんＸＸわ

有休の計算は
Int か Fix 関数を使って
Int（（計算年月日ー雇用年月日）／１２））＋基本日数で

月初めの日付にするには

Ｒｉｇｈｔ、ＭＩＤ、Left 関数あたりを使って Format 関数か DateValue 関数を使ってみようかなと思います。

としの - 98/06/23 14:35:40
電子メールアドレス:fck-k@nogata-iwca.or.jp
コメント:
回答どうもありがとうございました。三日ぶりに仕事が進みます。テキストボックスの中身（日付データ）を変数に置き換えて、また不等号を付けたかったのですが、うまくいかず、困っていました。回答通りに記述したら、うまくいきました。どうもありがとうございました。まだまだ教えていただきたいことがたくさんありますので、そのときは宜しくお願いいたします。

よしあき - 98/06/23 14:07:55
電子メールアドレス:yosiaki@jeims.co.jp
コメント:
続けてまた質問で恐縮です、例えば「雇用年月日」から６ヶ月経ったら１０日の有休を与える、つぎに「雇用年月日」から１２ヶ月経ったら１１日の有休、それにさらに１２ヶ月経ったら１２日の有休という具合に１２ヶ月毎に１日づつ日をプラスしていく式の作成方法を伝授願いたい。よろしく！カレンダーはシステムカレンダーをベースにします。

よしあき - 98/06/23 13:41:36
電子メールアドレス:yosiaki@jeims.co.jp
コメント:
テーブル上の「生年月日」フィールドが例えば（７５／１２／０６）となっている場合にクエリーに呼び込んでくる際に日付けが何日であろうとも７５／１２／１というように置き換えてくるようにするにはどうしたらいいのでしょうか、またまたお願いです。（７０／１１／１６→７０／１１／１）（７２／１０／２５→７２／１０／１）この方法がわからないため苦戦しています

j-kato - 98/06/23 00:55:56
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
としのさんはじめまして

変数に置き換えの件
たとえば、フォームでのテキストボックスを変数とするなら次のように記述すれば出来ると思います。
strFilter = BuildCriteria("商品名", dbText, Forms![フォーム名]![テキストボクッス名] )
プロシージャ内では
BuildCriteriaメソッドのヘルプの使用例に書いてあります。
strFilter = BuildCriteria("商品名", dbText, strInput) の strInputが変数です。

レスが遅いかもしれませんがこれからもよろしく

としの - 98/06/22 15:44:48
電子メールアドレス:fck-k@nogata-iwca.or.jp
コメント:
はじめまして。ACCESSをはじめて2週間くらいになります。多分、初歩的なことだと思うのですが、ヘルプで、抽出条件を検索していて、BuildCriteriaメソッドというのをみつけました。この中の例で、strCriteria=BuildCriteria("受注日",dbdate,">97-1-1 and >97-5-1")というのがあったのですが、この一文の中の日付の部分 97-1-1と97-5-1を変数に置き換えることはできるのでしょうか？もし、置き換えることができるのであれば、記述の仕方を教えていただけないでしょうか？よろしくお願いいたします。

j-kato - 98/06/12 02:09:00
コメント:
「確認メッセージの非表示に付いて」

[ツール]－[オプション]－[詳細]－「エラートラップ」のチェックを　「エラー発生時に中断」　以外にチェックしてプロシージャ内でＯｎＥｒｒｏｒでエラートラップ処理をすればメッセージを出さなくすることも出来ると思います。　外れていたらごめんなさい。

宮田登志雄 - 98/06/10 21:00:03
電子メールアドレス:miyatade@pluto.dti.ne.jp
コメント:
j-katoさんありがとうございます、いろいろ試してやってみたいと思います、教えて頂きたい事がたくさん有りますので、又質問させていただきたいと思います、その節はよろしくお願い致します。

j-kato - 98/06/10 01:50:24
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
宮田登志雄さんへ　　順番を逆にして、先に全部コピーしておき　保存するときに、 DoCmd.DeleteObject acTable　ＸＸＸ　で削除してその後　DoCmd.CopyObjectでコピーをしたらどうでしょうか？
　とりあえず上書き確認のメッセージは出なくなります。

宮田登志雄 - 98/06/09 09:54:49
電子メールアドレス:miyatade@pluto.dti.ne.jp
コメント:
j-katoさんありがとうございます、同じ名前で複数保存する場合（同じ場所に）初回はいいんですが、次回からは、メッセージが出ますよね、（同じテーブルが存在します置き換えますか）複数になると結構手間が掛るんで、強制的に上書き保存したいんです皆さんは、どのような保存の仕方をしてられるんでしょうか今まで試した方法はｄｂ全体を保存（一回のクリックですみます）、テーブルを分割してリンクで使用すると、前と同じ様に保存出来ますが、プログラムの実行が遅くなる。よろしくお願い致します。すみません

よしあき - 98/06/08 14:33:46
電子メールアドレス:yosiaki@jeims.co.jp
コメント:
J-KATOさん親切にありがとうございます。さっそくそのとうりやってみますまた、躓いたらその時はよろしくお願いします

j-kato - 98/06/07 23:06:54
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
宮田登志雄さん　はじめまして
テーブルのエクスポートじゃだめですか？

宮田登志雄 - 98/06/07 16:32:23
電子メールアドレス:miyatade@pluto.dti.ne.jp
コメント:
はじめまして複数のテーブルを保存するのに CopyObject を使用してるんですが全て上書き保存したいのです。何か方法は有りませんか（別データーベースに同じテーブル名で複数保存したい）ほかに方法があればおおしえ願いませんかよろしくお願い致します。

山田こうじ - 98/06/05 13:41:29
ホームページアドレス:http://www.infoaomori.ne.jp/pastem/
電子メールアドレス:pastem@mb.infoaomori.ne.jp
コメント:
ちょっこさん回答ありがとうございます。最近データベース会議室ばっかりで、こちらをのぞいていませんでした（失礼）。j-katoさんに教えてもらった会議室が最近開けなくなっているんですがどうしたんでしょうね。と、ゆうことで、AC97の質問なんですが WIN95->NT間リモートアクセスでNT側AC97のテーブルをリンクしているんですが、その時に自動的に切断された場合もう一回接続しなおしても、もうそのディスクは存在しないものとしてしまうみたいなのですが、インターネットのブラウザみたいにいかないものでしょうか？どなたかよろしくおねがいします。

j-kato - 98/06/05 01:20:13
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
よしあきさん　はじめまして
　テーブルをこの様に仮定します
今日の日付　　日付/時刻型
生年月日　　　日付/時刻型
年齢　　　　　数値型
このテーブルを　クエリーで　年齢のフィールドに「　年齢: DateDiff("yyyy",[生年月日],[今日の日付])　　」としたらどうでしょうか

詳しくは、ヘルプ参照　（ datediff )
レスになってなかったら、また書き込んでください。

よしあき - 98/06/04 11:45:17
電子メールアドレス:yosiaki@jeims.co.jp
コメント:
初めてのコメントで、はじめてのアクセス９７に挑戦しています皆さんに教えていただきたく思いメールしました「生年月日と年齢をテーブルに入れておくと、翌年になった時自動的に年齢を一つ加算する。」という具合にするときはどのようにすればいいのでしょうか。初歩的な質問ですがどなたか教えてください。

j-kato - 98/06/02 01:02:59
電子メールアドレス:j-kato@pd.highway.ne.jp
コメント:
ｍａｅｄａさん　はじめまして

　出入荷時の入力項目完了時の「更新後イベント」に在庫数の計算をするマクロを組んでみたらどうでしょうか。

ひろみさん　はじめまして

　こんな方法でしたら・・・　インテリマウスで左ダブルクリックの後ホイルーボタンをクリックするとナビゲーターバーが出て（枠外ですが）スクロールさせることが出来ます。

Ｍａｙさん　はじめまして

　　[Section](0),の所を[フィード名]でやってみたらどうでしょうか　[Forms]![フォーム1]![F_回答サブフォーム]![機種].[BackColor]ではうまく[機種}のフィールドの背景色を変えることが出来ました。
河村さん　はじめまして

　　クロス集計については、私ももう少し勉強してみます。自分としては経費の発生しない所というのは　空白でなく「０」の値を持ったフィールドだと思います。既定値「０」にしたりしてみたらいかがでしょうか？

みなさん　アクセスしてくださいましてありがとうございます。

レスが非常に遅く申し訳有りません。ここを覗いた方で答えれることが有りましたらぜひ書き込みをお願いします。
ヒントだけでも結構です。

よろしくお願いします。

maeda - 98/05/28 10:23:22
電子メールアドレス:pearldog@gold.ocn.ne.jp
コメント:
こんにちは超初心者です。アクセス９７で在庫の管理をしようとしています。今までは受注伝票、商品発注書，請求書までは作ったのですが商品出入荷時の増減の仕方が分かりません。どなたか教えていただきたいのですがもしくは在庫管理のことが詳しく載っている書籍を教えてください。よろしくお願いします。

ひろみ - 98/05/27 14:53:51
電子メールアドレス:hng003@mb.docon.co.jp
コメント:
Accessのフォームにオブジェクトぷord文章を貼り付けたのですが、１ページ目しか表示できないのです。ページなど指定できるのでしょうか？出来れば、Access上でWordの文章のページを切り替えたいのですが・・・誰か解る人教えて下さい。お願いします。

May - 98/05/22 10:34:43
電子メールアドレス:CATSOFHOUSE@msn.com
コメント:
フォームでレコード移動時にある条件のときのみサブフォームの背景色を変えるようなマクロを作成したのですがエラーが帰ってきます。メインフォームの場合はうまくいくのですが・・・ちなみにマクロの内容はアクション　：　値の代入　　　　　　アイテム　：　[Forms]![メインフォーム名]![サブフォーム名].[Section](0).[BackColor] 　　　　　　　　式　　　：　255 です。何かよい方法を教えて下さい。

河村 - 98/05/21 18:18:44
電子メールアドレス:azv@joho-yamaguchi.or.jp
コメント:
お尋ねします。経費区分を元に、クロス集計で一覧表を作成しようとしています。経費名は１０個有りますが、データとしてその月に発生しない経費もあります。一覧表は横に経費名、縦が支払先との要望です。問題は、経費の発生しない所が抜けてしまいますし、レポートで固定した物ができません。いつも支払先車両経費修繕費租税公課消耗品費法定福利費・・・・・（タイトル固定）ＡＡＡ 1200 500 ・・・・（有るものを表示）ＢＢＢ 5000 1000 のような形で印刷しなければなりません。基本的にはクロス集計では無理なのでしょうか？すべての経費のフィールドを持ったワークデータを作成して印刷するしかだめでしょうか？宜しくお知恵をお貸しください。

ちょっこ - 98/05/15 23:24:34
電子メールアドレス:kymfmly@cb.mbn.or.jp
コメント:
山田さん、はじめまして。ちょっこといいます。起動したときの「Microsoft Access」のロゴを出したくないということですね。ＭＤＢがある同一フォルダに、ＢＭＰを作ります。ＢＭＰは背景の色に合わせたごく小さい点だけを作っておきます。そうすると起動時に同一フォルダにあるＢＭＰを見に行きますので、見かけ上ロゴが消えたようになり、すぐにフォームが表示されたようにみえます。こんな方法でよろしかったらお試しください。

ちょっこ - 98/05/15 23:19:13
電子メールアドレス:kymfmly@cb.mbn.or.jp
コメント:
はじめまして、ちょっこです。よろしくお願いします。Ｗｉｎ９５、Ａｃｃｅｓｓ９７です。さっそくですが、質問があります。マクロからＶＢＡに変換できるように、ＶＢＡからマクロに変換できないものでしょうか？変なことを聞いているかもしれませんが、よろしくお願いします。できないときは、「できないよー」とどなたかに回答をいただければうれしいです。

j-kato - 98/03/26 03:11:31
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
始めまして山田さんあいにく私も方法は知りません、こちらの会議室に書き込んでみたらどうでしょうか？
http://www.sainet.or.jp/~eino/database/wwwboard/index.html
これからもよろしく

山田こうじ - 98/03/25 16:52:20
ホームページアドレス:http://www.infoaomori.ne.jp/pastem
電子メールアドレス:pastem@mb.infoaomori.ne.jp
コメント:
はじめまして山田と申します。自分も2.0からAccessのプログラミングをしています。単純な質問なんですが、AC97を起動した直後に出てくるMicrosoftのロゴを表示したくないのですが、なにか方法はありますか。

j-jato - 98/02/24 23:35:20
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
j-katoと申します。はるばると遠い雑木林までようこそお越しくださいました。私も色々とやっているうちにこのようなメッセージが出てきます。
クエリーのテーブル数が３２、ＡＮＤの数が４０とかいろいろ制限があるみたいで、（マイクロソフトオフィシャルサポートブック Access97参照）まぁ自分としては、牛島さんのように色々と試し逃げています。
こちらの会議室を覗いてみるのもいいかもしれません。
http://www.sainet.or.jp/~eino/database/wwwboard/index.html
ではこれからもよろしく。

牛島義幸 - 98/02/22 21:33:29
ホームページアドレス:http://www.digital-land.com/usi/
電子メールアドレス:usimail@ma4.justnet.ne.jp
コメント:
初めまして　牛島といいます。アクセスで調べたいことがあり、さがしているとこのページにたどり着いたのでコメントさせていただきます。ユニオンクエリーを作り、そこから別のクエリーを3程度重ねて抽出していたデータがありました。しかし、先日 MDB ファイルが5MBを越えたあたりから、「計算式が複雑すぎる」というメッセージがでてきました。ユニオンクエリーの時、2つのファイルを一つにしているのですが、それを1つのテーブルに変更するとうまくいきます。これは、ユニオンクエリーの限界を示すものでしょうか？ご存じの方、お願いします。

ｊ－ｋａｔｏ - 98/02/19 23:56:11
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
今晩は、荻原　賢二さん RanK関数？

どうも、ｊ－ｋａｔｏです。ＲＥＳになりませんが関数を作るときの注意点として
その機能、その関数を呼ぶときに渡す引数と帰ってくるとき必要な戻り値を明確に
しなければならないと思います。
Rank関数という名前から想像するに、ある値からある値までの範囲を一つのランクとして、
その階層の集まりがランク関数となるのかなと思います。
この条件を一つ一つクリヤーしていけば関数ができるかと思います。

最近、風邪を引いて直ったと思えば、今度はパソコンが故障してしまって
2月1日に修理に出してやっと今日直ってきました。

今日からまたばりばりとパソコンを使います。レスが遅くなって申し訳ありません、これからもよろしく

荻原　賢二 - 98/02/14 22:13:38
電子メールアドレス:ogiwara.janis.or.jp
コメント:
　Access79でRank関数を使いたいのですが、ありません。VBAでRank関数の作り方がわかりましたら教えてください。

- 98/02/06 10:48:53
コメント:
2

安藤松江 - 98/01/28 09:56:49
電子メールアドレス:matsue@mfi.or.jp
コメント:
加藤さん、風邪の具合はどうですか？エクセルへの出力の件、ありがとうございました。また、何かわからないことがあったら、教えて下さい。

加藤　潤 - 98/01/28 00:43:23
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
　久しぶりです、ちょっと風邪を引いて寝込んでいました。

阪　和幸さん　はじめまして
　バイナリー型がどんな型か私には解りませんがコンバートの方法としてＡＣ９７に対応テーブルを作るそれをクエリーでひっぱて来る・・・と今はそれしか浮かびません。
　キャラ型で「ＡＢＣ」がバイナリ型ではどんな表示になるか良かったら教えてください、また逆にバイナリ型での表示がキャラ型ではどんな風に表示するかも

安藤　松江さん　こんばんは
こんな動きでしたら
　まず、エクセルに出力するマクロを作成します。
マクロの作成で、アクション「出力」を選び、アクションの引数　に上から順番にクエリー、クエリーの名前を指定、出力ファイル形式に「＊．ｘｌｓ」を指定、出力ファイル名を書いていけば出来ると思います。解らない所があったら「Ｆ・１」Keyを押してHelpを出してみてください。（このマクロを適当な名前を付けて保存）
　次に、フォームにコマンドボタンを作成し「イベント」のクリック時に今作成したマクロ名を選択すれば出来ると思います。
　質問と違っていたらまた書き込んでください。

安藤松江 - 98/01/27 16:56:19
電子メールアドレス:matsue@mfi.or.jp
コメント:
フォームのコマンドでクエリーをエクセルに出力したいのですが、そのマクロかモジュールを教えて下さい。宜しくお願いします。

阪和幸 - 98/01/22 19:18:42
電子メールアドレス:kazuyuki@momo.so-net.ro.jp
コメント:
ＳＱＬサーバにあるデータにリンクをかけたテーブルを使っているのですが、バイナリ型でもっている（事情により）氏名のデータがうまく表示されません。キャラ型へのコンバート法など、うまく表示させる方法をご存知の方教えてください。

j-kato - 97/12/25 02:35:49
コメント:
ＨＫＡＷＡさんこんにちは
　お互いに勉強しあっていきましょう。これからもよろしく。

HKAWA - 97/12/24 17:20:53
電子メールアドレス:khckae@lilac.ocn.ne
コメント:
お返事どうもありがとうございました。うれしかったです。とても困っていたので大変助かりました。また、わからないことがあったら質問します。そのときはどうぞよろしくお願いします。メリークリスマス！

j-kato - 97/12/23 00:36:30
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
はじめましてＨＫＡＷＡさん
テーブルには保存されていますのでフォームでの表示に何かあるとおもわれます。
今、このテーブルをフォームウイザードでフォームを作れば全てのデータと全レコードを見ることができると思います。
フォームには保存されていない（保存されているがそのレコードを表示しない）のはナビゲーションボタンがないフォームで全てのフィールドを入力すると新しいレコードに移動してあたかも入力されてないように見える現象だと思います。
フォームのプロパティーで移動ボタンが”いいえ”になっていると思います。これを”はい”にすればレコードを移動させれば表示します。

移動ボタン（ナビゲーションボタン）を付けたくない仕様でしたら、プロパティの追加の許可を”いいえ”にして最後のフィールドを入力しても新規レコードに移動しないようにします。
そして、コマンドボタンウイザードでコマンドボタンを「レコードの移動」で「次のレコードに移動」とかを貼り付けておきます入力が完了したらコマンドボタンを押すことによってレコードに移動をさせます。とりあえず考えられるのはこれくらいです、的外れかもしれませんけど気軽に質問してください。

ＨＫＡＷＡ - 97/12/22 13:53:46
電子メールアドレス:khckae@lilac.ocn.ne.jp
コメント:
フォームから入力したデーターがテーブルには保存されるのですが、フォームには保存されません。データー入力用にもなっていませんし、追加の許可にもなっています。

ＨＫＡＷＡ - 97/12/22 13:50:18
電子メールアドレス:khckae@lilac.ocn.ne.jp
コメント:
本やＨＥＬＰでＡＣＣＥＳＳ９７を勉強しながら使っているのですが、どうしてもわからないことがあるのでおしえてください。

かよ - 97/12/10 11:04:15
電子メールアドレス:k-kanou@tokaiopt.co.jp
コメント:
わかりました。ありがとうございました。"^_^"

j-kato - 97/12/10 00:44:34
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
ごめんなさい。　ちょっと入り交じっちゃいました。その行の正しい文はこちらです。（正） Forms!サンプルデータ!重複 = DLookup("[主キーID]", "顧客", "[顧客ID]= Forms![サンプルデータ]![顧客ID]") (正その２） Forms!サンプルデータ!重複 = DLookup("[顧客名]", "顧客", "[顧客ID]= Forms![サンプルデータ]![顧客ID]") （誤） Forms!サンプルデータ!重複 = DLookup("[主キーID]", "顧客ID", "[部品コード]= Forms![サンプルデータ]![顧客ID]") 上記(正)では　重複のテキストボックスに顧客IDの数値が入ります。（正その２）では　重複ボックスに顧客名が入ります。どうも失礼しました。

かよ - 97/12/09 11:03:26
電子メールアドレス:k-kanou@tokaiopt.co.jp
コメント:
DLookup関数の使い方について [部品コード]というフィールドがありますがこれは何でしょうか。

j-kato - 97/12/09 01:28:30
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
Dlookup 関数の使い方
入力フォーム名　「サンプルデータ」　テーブル名　「顧客」
順に　主キーID（オートナンバー）　　顧客ID（数値）　　　　顧客名（テキスト）
1 11111 ABC商店
2 22222 あいう会社
3 33333 イロハ商店
4 44444 １２３銀行
5 22222
と、こんなデータ入力が有るとして　「　主キーID　５」の入力の時、
顧客IDの更新後処理のイベントにLoockup関数を使って重複の検出をして
エラーメッセージを出したりするようにします。
　入力フォームに「重複」というフィールド（テキストボックス）が有るとして

Forms!サンプルデータ!重複 = DLookup("[主キーID]", "顧客ID", "[部品コード]= Forms![サンプルデータ]![顧客ID]")
で「重複」というフィールド（テキストボックス）に　”主キーID”を代入しこのフィールドに値が入れば重複
していることになりNULLだったら重複なしと判断できます。マクロを組むとしたら
　　　値の代入　　
　　　　　　　　　Forms!サンプルデータ!重複
　　　　　　　　　DLookup("[主キーID]", "顧客ID", "[部品コード]= Forms![サンプルデータ]![顧客ID]")
　　　条件に
　　　[Forms]![サンプルデータ]![重複] Is　Null　　メッセージ　　　”すでに有ります”
ヒントとになれば・・・・

安藤松江 - 97/12/08 16:47:47
電子メールアドレス:matsue@mfi.or.jp
コメント:
どうもありがとうございました。

j-kato - 97/12/08 00:00:50
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
RE:データは保存されますか？データファイルが共有モードで開いていれば同時に（厳密に言えば同時はありえませんけど）複数の人がアクセスしていても更新できます。レコードのロックが設定されていれば、だれもそのレコードを編集していないときですが。　Access９７でしたら「ツール」「オプション」の「詳細タブ」参照

安藤松江 - 97/12/05 09:40:35
電子メールアドレス:matsue@mfi.or.jp
コメント:
NT3.51でデータベースの共有をしてるのですが、何人かが同時に入力しても、（同じフォームにて）データは保存されますか？

雑木林の管理者 - 97/11/27 00:10:09
電子メールアドレス:j-kato@mx2.nisiq.net
コメント:
　カレンダーコントロールを簡単に操作するメソッドが書いてあるのが気づきました。
こちらにかいておきます。
　　　　　　　　　内容
AboutBox バージョン情報および著作権情報を表示します。
NextDay カレンダーの値を 1 日先に進めます。
NextMonth カレンダーの値を 1 月先に進めます。
NextWeek カレンダーの値を 1 週先に進めます。
NextYear カレンダーの値を 1 年先に進めます。
PreviousDay カレンダーの値を 1 日前に戻します。
PreviousMonth カレンダーの値を 1 月前に戻します。
PreviousWeek カレンダーの値を 1 週前に戻します。
PreviousYear カレンダーの値を 1 年前に戻します。
Refresh カレンダーを再描画します。
Today カレンダーに今日の日付を設定します。

カレンダーコントロールのプロパティで　date　とか　Year　の欄をクリックすると
ビルダーボタンが現われそれをクリックすると "ActiveX　コントロールのプロパティ"
ののダイアログボックス現われそこの下の方のヘルプボタンを押すと詳しく説明されています。
また、今表示されている日付もコントロール名だけを指定すれば代入できました。
これで、日付の入力もパソコンに慣れていない人も簡単に入力できると思います。
　例）コントロール名が、「　カレンダー　」の場合
　　　　
　　　　　Private Sub テキスト8_Click()
　　　　　　　Me![ＸＸＸ] = [カレンダー]
　　　　　End Sub

私のホームページへ | SiliconValleyのページへ | メイン | 今すぐ登録