08/01/27 15:24:21
>>355
NOT NULL制約付けてもいいのかはっきりさせてくれ。
360:NAME IS NULL
08/01/27 15:44:39
つか、JETのSQLでCREATE TABLE文にDEFAULT句設定できたか？
NOT NULLとWITH COMPしかないだろ？
361:NAME IS NULL
08/01/27 17:28:21
DAO 又は ADOX でつくらないと無理でしょう。
362:NAME IS NULL
08/01/28 11:11:11
>>356
>>357に書いてあるとおり無理なので、
ﾚﾎﾟｰﾄを描画しなおさないとだめ
363:総務課ヒラ
08/02/02 13:56:55 ixlIASXO
すいませんド素人なんですが、今度勉強しながら仕事で使うデータベースを
作らなければならなくなりました。
作ったファイルをサーバーに置いて、各部署で共有してデータの変更や照会を
行うのですが、将来、各部署のaccessがバラバラのタイミングでバージョンアップ
した時に問題が起こりますか？
また複数の部署が同時に同じテーブルの内容を変更した時、問題が起こりますか？
ご指導願いますです。
364:NAME IS NULL
08/02/02 14:09:53
問題が起こります。
365:総務課ヒラ
08/02/02 15:37:06 ixlIASXO
＞364
やっぱダメなんですか
そうですか。他の方法を考えます
ありがとうございました。
366:NAME IS NULL
08/02/02 15:42:16
分割してバックエンド（データ部分）のみ共有する分には、大した問題は起きないでしょ。
自分も問題なかったし、事例はたくさんあるから。
フロントエンド（GUI）が2000だろうが、2002だろうが、2003だろうがOKのはず。
ただし2007は分からない。フロントエンドに2003以前と2007が混在するようなら、
経験者にきいてみないと（自分は経験ない）。
あと、VistaみたいなOSのバグで共有できないケースもあるけど、それはAccess側では
どうしようもないね。
たぶんこの後、コンテクストを無視してSQL鯖がどうとかASPがこうとか言い出す輩が
出てくると思うが、Accessはド素人だけど鯖に滅法強いとかならそちらでどうぞ。
367:366
08/02/02 15:47:51
データ部分のみね
368:NAME IS NULL
08/02/02 16:57:04
>>363
勉強しながらとのことなので、
そうそうすぐに全部署共有でガシガシデータ入力/変更ということにはならなそうだから、
>>366の言うようにデータテーブルだけのmdbを共有して
運用したらいいんじゃないかな？
すごくたくさんの人間が同時にアクセスする、とかなってきたらまた考えたらいいんじゃないでしょうか？
369:NAME IS NULL
08/02/02 17:54:53
その前にいったいどれだけの規模なのか聞かんと答えようがない話のような気がする。
どだいAccessでは無理って規模かもしれないし・・・・・
370:NAME IS NULL
08/02/02 18:18:07
>>366
分割したバックエンドの方がデータに画像とか貼ってあって500MBくらいあるのですが
みんな開くときに遅い遅いと言うので困っています
371:NAME IS NULL
08/02/02 18:51:38
>>370
そりゃサイズでかすぎる。
372:総務課ヒラ
08/02/02 21:28:32 ixlIASXO
みなさんありがとうございます。
そのデータ部分だけ共有というやりかたに兆戦してみます。
部署は１０程しかないし、アクセスもそれほど頻繁ではない
と思います。
浮かんだイメージは、テーブルだけのファイルをサーバーに
置き、そのテーブルにリンクを張った操作用ファイルを各ＰＣ
に置くという感じですが、それで良いのでしょうか？
とにかく勉強します。
373:NAME IS NULL
08/02/02 22:07:36
>>372
それで良いよ。
374:NAME IS NULL
08/02/02 23:16:47
とりあえず、勝手なバージョンアップの禁止を通達しておくんだね。
それでもやるやつはいるだろうけど、それで動かなくなったらそいつのせい。
375:NAME IS NULL
08/02/03 03:14:56
>>370
画像はデータベースに保存せずJPGなどに外部ファイル化しておき、
表示するときだけ読みにいく方法なら遅くはならない。
376:NAME IS NULL
08/02/03 10:06:43
>>375
それはどうやって、やるのですか。
設計図面を画像データを取り込んた800MBくらいになったＤＢがあります。
かねがね、なんとかしたいと思ってました。
377:NAME IS NULL
08/02/03 10:12:38
>>376
Access2007なら画像も元データの形式で保存できるから、余り肥大しないし、もちろん画質劣化もなし
378:NAME IS NULL
08/02/03 10:35:49
フィールドにはパス\ファイル名でテキスト形式で突っ込んでおいて
アプリでそれを拾いに行くようにするとか？
379:NAME IS NULL
08/02/03 11:23:32
>>376
新規のファイルはjpg なり pdf で保存する。
すでに、MDB化されているものは、VBAで外部ﾌｧｲﾙに書き出す
URLﾘﾝｸ(homepage.mac.com)
↑VB用だが、僅かの修正でVBAでも使える
380:NAME IS NULL
08/02/03 11:25:39
パス変わったときに面倒ですよね
なんでAccessとかExcelとかの貼り付けって
相対パスにしてくれないんだろう
381:総務課ヒラ
08/02/03 12:17:00 LYNLjY3V
＞373･374
ども。
できそうな気がしてきて、今少しほっとしてます。
明日から時間を見つけて作成にとりかかります。
382:NAME IS NULL
08/02/03 14:30:29
>>377
Access2007を使うことにしても、既にAccess2000MDBの中に
OLE オブジェクト型で取り込んである分を、新MDB移行させる必要がありますよね。
1.Access2000MDB OLE オブジェクト型のエクスポート
↓
2.Access2007MDB Attachment型として取り込み
それが379さんの「すでに、MDB化されているものは、VBAで外部ﾌｧｲﾙに書き出す」
なのかな？
「OLE オブジェクト型 エクスポート」で調べてみましたが、ちょっと難しそうです。
>>379
ソース読んでみましたが、自分の能力ではわからないことが多いです。
少しずつ勉強してみます。
皆さん、ありがとうございました。
383:377
08/02/03 14:46:28
>>382
オブジェクト型にしちゃったのは、ビットマップになってるから、JPGやPDFに圧縮しなおすと劣化するど
ビットマップのまま、出して、そのまま2007の添付ファイル型で入れただけで、LZH圧縮かかるから、ZIPなみにサイズ減る
384:377
08/02/03 14:49:00
ああ、
× LZH圧縮
○ LZ圧縮
385:NAME IS NULL
08/02/03 15:25:18
おいおい、2007のAttachment型って、画像ファイルじゃなくOLEオブジェクトを
そのまま認識してくれるのかよ？
本当なら革命的に賢いな。
386:377
08/02/03 15:34:07
ビットマップは画像ファイル
387:NAME IS NULL
08/02/03 22:17:10
添付ファイル型は複数値型と同じで扱いが面倒だけど
.xlsと.docと.pdfを放り込んで使ってるよ。
388:NAME IS NULL
08/02/03 22:30:10 F3bGJrY2
型番 日付
A 2008/02/03
B 2008/02/04
C 2008/02/05
D 2008/02/06
E 2008/02/07
F 2008/02/08
エクセルで上記のような表があるとします。
クエリに関数を入れて本日～4日後の2008/02/06までを”全て”
抜きとって表示したいのですが関数わかる方おられませんか。
2008/02/07と2008/02/08は不要としたいのです。
自動的に毎日4日間を抜き取ることはできますか？
389:NAME IS NULL
08/02/03 22:56:32
マルチすんな死ね
ｽﾚﾘﾝｸ(tech板)
390:NAME IS NULL
08/02/04 02:19:12
>>377
「ビットマップは画像ファイル」だけど、OLEオブジェクトは画像ファイルじゃねーよｗ
>383 の手順は、本当に実際にやってできたことなのか？ それとも空想上の話か？
とりあえず、そこはっきりさせてほしい。
いままで、画像ファイルをそのまま突っ込んでいたならまだしも、いったんOLE
オブジェクトに変換されたものをそのまま書き出して画像として認識できるなんて
話は一度も聞いたことがない。 >379 のリンク先の方法も、画像ファイルをそのまま
書き込んだ場合に限られる話で、OLEオブジェクトに変換されたものは対象外。
誰か2000とかで画像ファイルをOLEオブジェクトに変換して格納してあるのを
そのまま書き出して、2007で実際に取り込んだ話をしてくれ。
それで出来るっていうならたしかに朗報。2007万歳。
391:NAME IS NULL
08/02/04 09:02:33
あああ、OLEで埋め込んだ画像データはMDB内部でビットマップで保存されてるから、、
ビットマップで取り出して、そのまま、ビットマップで添付すれば良いんじゃね
392:NAME IS NULL
08/02/04 10:33:34
図面データを管理するデータベースを構築しようと思っています。
ACCESSに図面データへのパスを格納した場合、
パスに変更があったときは、sqｌか何かで簡単にデータ変更を
できるものでしょうか？
393:NAME IS NULL
08/02/04 13:08:41
>>388
不等号でいんでね？
394:NAME IS NULL
08/02/04 23:37:01
>>392
出来るだろうけど、簡単かそうでないかは
392のファイルの置き方しだい。
395:総務課ヒラ
08/02/05 20:15:25 nk3nkSEO
おじゃまします。また質問なんですが、ＶＢＡとか全く知らなくても
対処する方法があったら教えていただきたいのです。
①アクションクエリーを多用したファイルを共有して使うと、その実行
確認メーセージについて「なんだこりは？」と頻繁に問われます。
そのたび、「ツールのオプションの編集/検索」で確認メッセージが出
ないように設定してもらうのですが、ファイル自体に、開くと強制的
に「確認メーッセージ不要になる」という設定を組み込めないでしょ
うか？
②フォームでメニュー画面を作成していますが、不要なフォームは最小
化されて邪魔にならないようにしていても、タスクバーに表示された
オブジェクト名の所を誤ってクリックしてしまいメニュー画面の順番
をぐちゃぐちゃにする使用者がいます。これも「ツールのオプション」
でタスクバーに表示させないようにできるのですが、質問①と同様に
ファイルに強制的な設定力を組み込めないでしょうか？
アクティブフォームを規制する方法でも良いです。
よろしくお願いします。
>388
dateadd 関数（だったっけ）と不等号でダメ？
今、ネットカフェだからためせないんだけど。
396:NAME IS NULL
08/02/05 22:50:38
VBAを知って対処しろ
397:NAME IS NULL
08/02/05 22:50:56
MDBファイルにADO経由でアクセスして
SQLを発行しているのですが
書き込みのときはロックした方が良いとか
トランザクション作るべきだとかいわれますよね
ACCESSのSQLは文法が違うみたいなのですが
なんとかならんもんでしょうか
MSSQLとか他のSQLサーバーに城とかいうのはなしで
ご存知のかた教えていただけると幸いです
398:NAME IS NULL
08/02/05 22:55:16
MSSQLとか他のSQLサーバーに城
399:NAME IS NULL
08/02/06 08:36:56
>>395
①VBA を使った方法になるけど
1. 警告を止めるモジュールを用意する
Function WarningOff()
DoCmd.SetWarnings False
End Function
2. 自動実行マクロから 1. を呼び出す
Autoexec という名前のマクロを作成し
プロシジャーの実行－プロシジャー名に WarningOff() を設定する
SetWarnings の使用には注意が必要なのでヘルプを良く読んで
②操作可能なフォームを１つに限定する事はできるけど、それでいいのかな？
フォームプロパティ－その他 作業ウィンドウ固定
400:総務課ヒラ
08/02/06 19:55:42 MFZ8If4M
>399
レスありがとうございます。
総務課員でも、やっぱ初級レベルのＶＢＡの知識は必要だと思い
始めています。勉強するつもりですが、今回は何もわからないま
まで書き込まれた方法を使わせてもらいます。
初めての体験、うまくできるか心配。
401:NAME IS NULL
08/02/06 22:46:56 zjHg3ehW
>>400
仮にも総務課なんてものがある規模の会社で、部署跨いでの運用前提なら
外注も考えた方がいいんじゃないかと老婆心。
社内に相応の作り手(とか管理者)がいるとか、使い手のレベルが確保できるなら別だけどね。
402:NAME IS NULL
08/02/07 00:12:11
URLﾘﾝｸ(soumubu.sigoto.jp)
でも社員数11人なんだぜ
403:NAME IS NULL
08/02/07 12:05:45 EaJqlF2t
私はこれのせいで、リストラされました、勉強しようとしても自学では難しかった、学校に行こうとしたが試験に落ちた、後はどうにもならなかった。後はどうにもならなかった。後はどうにもならなかった
404:NAME IS NULL
08/02/07 17:35:48 Xa53OaUG
すいません気が狂うほど初心者質問ぽくてあれなんですが・・・
フォームのテキスト群に数値の[1]か[0]を表示させて、別のテキスト（レコードあり）にその加算をだすように
そのコントロールソースに =[テキスト○○+[テキスト○○]+[テキス・・・・などと書き込んでフォームを
開けてみると、加算されず「00110100011000・・・・」などとなってしまいました。
なぜなのかわかりません、どうかお教えください。
405:NAME IS NULL
08/02/07 19:06:04
>>404
まず、基本的にテキストつまり文字列は計算できません。
これはAccessに限らずコンピュータの初歩の初歩です。
"国道１号線"と"国道２号線"を足したら"国道３号線"になりますか？ならないでしょう？
Accessでは"国道１号線"＋"国道２号線"は"国道１号線国道２号線"となりますが、
これはAccessではそう決まっているというだけのことです。
この場合の解決策はフォームのテキスト群をすべて数値に変えるか？
それともテキストを数値に直してから計算するようにするかです。
初心者ということですが、数値とテキストの使い分けができないとAccessはとても使いこなせませんよ。
というようなことでいいのか？
406:NAME IS NULL
08/02/07 21:26:09 Xa53OaUG
>>405
早速のお返事ありがとうございます
文字列の問題・・・・やはりそうですよね、そうではないかとおもっていました
初心者といえ、ここまで顧客管理と役所に申請するソフトを作り上げて
最後の部分なのに、あまりといえばあまりな基本ですね・・・恥ずかしい。
一応、テキスト群のほうの書式は「数値」というふうに設定したのですが
根本的にわかっていないっぽいですね、わたし。
407:404
08/02/07 22:06:50 Xa53OaUG
もしかして・・・・
テキスト群はフィールドのないフォーム上だけのテキストボックスだから
「数値」としての認識はできないのでしょうか。
408:NAME IS NULL
08/02/07 22:13:57
a = CInt(form![hoge].caption)
409:404
08/02/07 23:17:04 Xa53OaUG
>>408
CInt関数ですね
って調べてみたけど、まだ私のスキルではうまく理解して使いこなせなさそう
410:NAME IS NULL
08/02/08 01:12:28 XfNQDRfL
アクセス2003を使っていて悩んでいます。
フォームにて(1)大分類(2)小分類を入力する際に、(1)にてA～Dを選択できるリストを表示し、(2)にて(1)で選んだ分類に属する小分類a1～a8、b1～b8・・・といったリストから入力するフォームを作りたいのですが、まったくわかりません。
このような入力方法をするにはどうしたらよいのでしょうか。
せめてこのようなリストは何というのか教えてください。
411:NAME IS NULL
08/02/08 09:18:57
>>410
(1)で選択した値で(2)のリストを抽出してやればいいんじゃないか？
(2)のリストボックスのソースをクエリにして、その抽出条件を(1)の選択値にしてやる。って感じ。
ってことでいいのかな？
412:NAME IS NULL
08/02/08 19:37:57
Access2007を買いたくない。
しかし、下位との互換性が薄いから、将来を見越して買わざるを得ない。
なぜ、Microsoftのご都合バージョンアップに付き合わされなければならないのか。
Access2003で十分。XPで十分。
リボンとか添付ファイル型は必要ない。
買う決心をつけるために、どなたか、Access2007の素晴らしさを説明して欲しい。
413:NAME IS NULL
08/02/08 19:39:33
>>412
桐にしとけ
414:410
08/02/08 23:17:29 XfNQDRfL
>>411サンクスです。
オレにとって難易度が高そうですが、やってみます。
415:404
08/02/09 00:57:17 SKQjl18B
一応普通に加算できましたのでお礼とご報告まで。
Val関数でできたのですが、不思議なのはレコードと関連していない１～３１のテキスト群の
たった一つだけ関数書き込んだだけでできてしまいました。
釈然としませんが、できているので、いじらないことにしました。
ただ一難去ってなんとやらと申しますか・・・・例の１～３１の結果を「来院数」（レコードあり）に反映させ
るわけですが、テキストボックスには加算された日数が入っているのに、レコードにはまったく反映
されません。悩む・・・・。
416:NAME IS NULL
08/02/09 02:08:31
レコードと結びついたフィールドを入力しなかった場合には、書き込まれないはずだが。
すべてのフィールドをレコードと結びつけるようにすれば、あれこれ悩まなくてすむと思う。
417:NAME IS NULL
08/02/09 02:13:45
1 + 1 + 1 = 3
1 & 1 & 1 = "111"
1 + "A" + 1 = "1" & "A" & "1" = "1A1"
このあたりは基本だから憶えておこうぜ。
418:NAME IS NULL
08/02/09 11:05:05 SKQjl18B
みなさん御世話掛けます（汗
結局のところ私みたいな初学者は
＞すべてのフィールドをレコードと結びつけるようにすれば、あれこれ悩まなくてすむと思う
なんですかね、なにか必要のないレコードが増えると心理的に無駄使いしてるような気になってしまって。
考えてみたら、別にリアルに物が増えるわけでもなし、データ量としても微々たるものなんだから
最初からそうすべきでした。
419:NAME IS NULL
08/02/09 21:35:57
>>418
どうも発想がデータベース的ではないような気がしますね。
次はあくまでも個人的発想方法だということで読んでください。
1.フォームで入力用テーブルに入力する。
2.SQLで入力用テーブルから出力用テーブルを作る。
3.レポートで出力用テーブルを印刷する。
もちろん例外もあるのだけど、基本的にはこの発想でやると単純化できます。
Accessは自由度が高いだけに自分なりのパターンをもたないと収拾がつかなくなります。
ここで１と３は問題ないだろうけど、２のSQLで処理するというのに引っかかる人がいると思う。
もちろん、１レコードづつループしながらVBAで処理していく方法もあるけれど、
Accessのレコード移動は遅いようで結局時間がかかります。
結局SQL（クエリー）を使うほうが一般的に早いようです。それも桁違いにです。
かなりのデータ数でも「もう終わったの？」というスピードで処理します。
一見複雑でSQLでは処理できなさそうな処理でも途中でワークテーブルを使ってやればできます。
余計なワークテーブルを使うと遅くなりそうだけど、SQLが高速なせいでそうはなりません。
ワークテーブルを作るのがいやで、複雑なSQL文を書いてもかえって遅くなるだけです。
とまあ、アドバイスになるか反面教師になるかは知らないが、こんな考え方もあるということで・・・
420:NAME IS NULL
08/02/09 22:55:38
データの数がエクセルが扱える以上にならないかぎり
アクセスよりエクセルのほうが効率的じゃないのかな？
アクセス本腰いれたいんだけど
そんな思いが頭を離れない
こんなおれに一言
421:NAME IS NULL
08/02/09 23:08:42
>>420
エクセルが扱える数ってどれくらいを考えているの？
現実に使えるのは数千件がいいところだよ。
データが多くなれば重くて実用的にはとても使えない。
数万件の処理を考えているのならエクセルは問題外。
一言じゃないけどこれでいいか？
422:NAME IS NULL
08/02/09 23:42:09
>>421
まあその数千件がただしいとして(2003なら65536行×256列てことでいいのか)
それ以下ならアクセスを使っても非効率だってことでオッケなの？
423:NAME IS NULL
08/02/09 23:50:50
アクセスとエクセルは製品コンセプトがまったく違うだろ。
エクセルでデータベースらしいものができるかどうかしらんが、
ひとに使ってもらえるようなものは到底むりだ。
424:NAME IS NULL
08/02/09 23:58:44
古いPCだからCPUが遅いのもアルが、
エクセルで３千件で、その遅さに泣いた。
データは普通の住所録
アクセスに移行したら、作業時間が１/４以下になった。
参考に
425:NAME IS NULL
08/02/10 00:07:25
>>423
メーカー側が作ったもんじゃないコンセプトなんて
それよりかは
使う側がある目的を達するために
どれだけ効率的に生産的になれる道具かが重要って発想で
全然わかってないんで見当はずれかもだが
テーブルにためこんだデータを
後でいかようにも出力できるってのがメリットなのか
馬鹿扱いされるんだろうけど
直感的じゃなくねアクセス
426:NAME IS NULL
08/02/10 00:24:25
>>425
>使う側がある目的を達するために
>どれだけ効率的に生産的になれる道具かが重要って発想で
これ重要。
数百件のデータを程度を決まった使い方するなら、紙に印刷したものを
ファイリングした方が効率的だと思う。
エクセルも千～二千件程度のデータなら、いいソフトだと思うよ。
マクロで自動化も出きるし、簡単なUIも作れるし。
なにしろ、開いただけで何が同入っているか分かる。直感的ダネ。
アクセスに移行しようと思ったのは
・二千件超えたあたりで顕著に遅くなった。
・他人が使う可能性が出てきた。
CSVに吐いてwordで取り込んで差し込み印刷に使っていたんだが
９xのせいか分からんが、エクセルとワードの連携がうまくいかなかった。
・ボタン一発で楽をしたくなった。
データを色々加工して見せたりする必要が無い、帳票が必要無い、
自分しか使わない、もしくは使う人がある程度エクセルを分かってる
んならエクセルでもいいんじゃね。
エクセルをシラン人が触ると、エクセルの表示データの幅を自分で
動かしておいて「文字が全部表示されない！」って怒る事があるからな。
427:NAME IS NULL
08/02/10 00:29:40
そこまで知らない奴に触らせるならシート保護くらいしとけw
428:NAME IS NULL
08/02/10 00:32:40
>>427
自分しか触らない前提で、フォルダー深く掘って
隠しといたんだけど。
そういう奴に限って、掘り出すんだよ…orz
429:NAME IS NULL
08/02/10 00:50:43
>>424
>>426
参考になりヤス
＞ボタン一発で楽をしたくなった。
書籍を片っ端から読んでますが
その楽をするまでがイバラの道なような
＞データを色々加工して見せたりする必要が無い、帳票が必要無い、
＞自分しか使わない、もしくは使う人がある程度エクセルを分かってる
＞んならエクセルでもいいんじゃね。
ただ知り合いの作った帳票とかを見るにあるいは書籍をみるに
レポートでデザインのいじれる範囲が目標と乖離してそうな気がするんです
作りこんでもエクセルのように好き勝手に思ったように(もちろん手書きに比べ不満の部分もあるのかもしれません)
つくれないような
当方の職場はエクセルの一般的な使い方はみんな出来るようです
430:NAME IS NULL
08/02/10 01:13:44
>>429
帳票は連票形式のリストしかつくって無いから
どの程度の事が出来るのか、良く知らないけど
データの配置は自由だし、単票で作れば何でも出来そうな
気がするけど。
複雑な帳票をたくさんの種類つくらなきゃならんと、ちょっと面倒だね。
帳票のデザインとボタン一発とSQLは別のスキルだねぇ。
帳票やフォームのデザインをする時は頭を切り替えるw
私だったら、アクセスに移行するかどうかは
データ量と帳票レイアウトの変更頻度で判断するな。
しょっちゅう、レイアウトが変わったり、増えたりするなら
なれてるエクセルで帳票作成して、データ件数が増えたら
最悪はバックエンドにアクセス使うってのアリかも。
まぁこのへんは色々意見がありそうだが。
431:NAME IS NULL
08/02/10 02:44:56
>>419
ごもっともだと思うが、それを>>418を相手にに説くのは間違っていると思う。
432:NAME IS NULL
08/02/10 10:57:21
>>412
OOoのBaseでAccess2007のmdb扱えるようになったから
もう2007は要らないと決心した
433:NAME IS NULL
08/02/10 14:11:21
2007の.accdb自体は.mdbのJETデータベースエンジンに毛が生えた程度のもんだから
それは従来のBASEが.mdbを扱えるからACCESSいらないって言ってるのと同じだよ
434:NAME IS NULL
08/02/10 15:15:10
結論的にいらないことには変わりないんだからいいんでね？
435:NAME IS NULL
08/02/10 17:28:11
>>431
まあ確かにそれもごもっともだと思う。
>>418に説いたというより初学者全般に対する指標のつもりだったのだけど・・・
そんなえらそうに言えた義理じゃないんだけど・・・
436:NAME IS NULL
08/02/10 17:30:55
OOoのBaseって実用的に使える程度になったのか？
以前触った時には実験中？ってできだったけど？
437:NAME IS NULL
08/02/10 17:32:06
>>436
使える気がしないです。
438:NAME IS NULL
08/02/10 21:38:47
>>412
Accessはオブジェクトが極限まで増えるとメモリ不足に陥りいろいろ障害がでてくる。
VersionUpは機能が増え一見いいことのように思えるがその代償として
ユーザが使えるメモリ領域が減ってしまう。
結局、32bitというメモリ空間が変わらない限り安易なVersionUpは
ユーザにとってはけっして好ましいこととはいえないのである。
439:404
08/02/11 11:17:26 EwWRkqJM
最後にひとつだけ質問よろしいでしょうか？
フィールドのない３１個のテキストボックスにＶａｌ関数を使い、数値化には成功
その３１の数値の積を【来院数】に出すわけですが、レコードソースに式を書き込むと
レコードに残らないということだったので、「クリック時～」で設定するとこれも成功。
しかし実際には諸事情で「クリック時～」では実用的ではありませんで、「更新後～」にするべき
でありましたので、その欄に書き換えました、問題はここです。
何度やっても反応しません、式が間違っているわけでもなさそうです、なぜなんでしょう・・・・。
毎度くだらない質問で恐縮ですが、最後にご教授ください。
440:NAME IS NULL
08/02/11 11:57:27
更新後ってのは、レコードが書き込まれた後ってことだから
書き込まれない限り実行されない。
別の方法を考えるべきだろう。
441:NAME IS NULL
08/02/11 13:22:24
>>438
> 結局、32bitというメモリ空間が変わらない限り安易なVersionUpは
おいおい、32bitのメモリ空間って言ったら４GBになるんだぜ。
Access2007がどれくらいのメモリが必要なのか知らないが、
４GB使い切るほど肥大化しているわけ無いだろ？
442:404
08/02/11 13:26:57 EwWRkqJM
>>440
ありがとうございます
なるほど「更新後」の意味を履き違えておりました、いまの今まで。
そうなると「更新前」は・・・・いや、あれもだめだった。
いちばんいい方法はなんなのだろうか考えてみます。
443:NAME IS NULL
08/02/11 13:40:50
どうでもいいが来院数の院が病院の院だったら
ちょっと怖くて行けないな・・・
444:NAME IS NULL
08/02/11 13:44:11
桐にしとけよ
良いとこ取りだぞ
445:NAME IS NULL
08/02/11 13:46:41
またお前か。
446:NAME IS NULL
08/02/11 14:06:19
>>444
（笑）
447:NAME IS NULL
08/02/11 14:45:55
>>439=404
31日分の合計(和)を出す電卓を作りたいってことだろ？
入力途中の表示に違和感を覚えるかもしれないが
「変更時」に再計算するようにしておいたらどうよ？
448:NAME IS NULL
08/02/11 14:53:56
>>443
いや、その病院では一番Accessが得意な
若い看護婦さんかも知れないぞ
ここでお近付きになっておいて
その病院へ逝くのも悪くない
449:NAME IS NULL
08/02/12 00:57:22 aoyNE+PV
教えてください。
とある機器のレンタルをしている事業所で勤務しております。
そこで、レンタル代金請求の仕組みを作ることになったのですが、
請求パターンがややこしくACCESSでの実現手順を教えてください。
商品代金の他に、送料と消毒代金も請求しており、
又、通常のレンタルとお試しレンタルもあり、
お試しで借りて、通常レンタルに切替る事があります。
お試しで借りて、気に入らずに返却になる事もあります。
請求ですが、
納品送料 引上送料 消毒
通常 開始月 終了月 終了月
お試し 終了月に往復 終了月
情報には契約番号（切替の場合、契約番号は同じ番号です）、
レンタル開始日、終了日、があります。
例：お試し、通常レンタルともに終了
→消毒費とる
お試し終了し通常レンタル切替てレンタル中
→消毒費とらない（レンタル中なので）
消毒費とる場合は、「1」 とらない場合、「0」になるような
式を教えてください。
同じく、送料についても、とる場合「1」、とらない場合「0」
になるような式を教えてください。
450:NAME IS NULL
08/02/12 01:03:43
商品マスタに消毒代とか送料とか登録しとけ
451:NAME IS NULL
08/02/12 01:57:07 aoyNE+PV
>>450
送料、消毒費登録ありますよ。
で、発生する条件を式にできないものかと、
あと補足ですが、
同じ契約番号の場合の見分け方ですが、「行番号」と「レンタル区分」で
通常レンタルかお試しか見分けます。
宜しくお願いします
452:NAME IS NULL
08/02/12 06:17:15
>>449
VBAで関数を記述しないと無理だな。
数式を一行で表わすっていうのはむずかしいんだよ。
VBAなら、どんなに複雑な判定文でも実現可能なはず。
453:NAME IS NULL
08/02/12 17:12:51
>>449
まず、自分の飯のタネの仕事を２ちゃんで他人に只でやってもらおうってむしが良すぎない？
それにこれそんなにややこしい請求パターン？
「通常レンタル」、「お試しレンタル」、「お試しから通常切り替え」の３パターンしか無いように思うけど？
プログラマーならそれほど苦労せずにできることだと思うけど・・・
もしかしてエクセルの延長線でできると思ってない？、
レンタル代金請求の仕組みって請求書発行までするってことでしょう？
プロでも結構苦労することを簡単に出来ると思っている？
繰越処理が割と難しいし、消費税の問題もある。
相手のあることだから意外と例外処理も発生するし、
後から修正することも必要だったりする。
ここで質問に答えてもそのシステム完成しないと思うけどなあ？
454:NAME IS NULL
08/02/12 19:07:49
（質問がよく理解できてない気がするオレだけど）
請求パターンをテーブルにすりゃいいんじゃないの？
パターンごとに1とか0を最初からいれといてクエリ
でつないだら？
455:NAME IS NULL
08/02/12 21:59:21
俺がやったことあるのは不動産の賃貸契約書管理とか
リース資産のリース契約書管理とかだけど、このケースでは・・・
・契約の開始/終了は年月日ではなく年月で管理（シンプルでいいね）
・契約開始年月はデータ入力の時点で確定。
・契約終了年月は契約期間中に変化する(先延ばし)可能性あり。
・契約区分に通常/試用があり、契約期間中に変化する(試用→通常)可能性あり。
・請求金額1(納品送料)の請求時期は契約区分が通常なら契約開始年月、試用なら契約終了年月。
・請求金額2(引上送料)の請求時期は必ず契約終了年月。
・請求金額3(消毒費用)の請求時期は必ず契約終了年月。
・どの請求金額も請求するのは契約期間中に必ず1回だけ。
このあたりを踏まえた上で設計するのがポイントになりそうだね。
かなり作りこみしちゃったからもうそんな変更できないよと言われても困るけどw
456:NAME IS NULL
08/02/13 08:20:02
>>429
ACCESSにデータ抱え込んでおいて、
EXCELからADOでも使って呼び出したらいい。
これなら好き勝手に出力形式作れる。
457:NAME IS NULL
08/02/14 09:45:10
>>441
>32bitのメモリ空間って言ったら４GB
理論的には、使い切れないほどの巨大なメモリ空間のはずなんだが、
実際にオブジェクトを増やしていくとすぐに限界にきてしまうのなぜだろう。
458:NAME IS NULL
08/02/14 14:17:31
>>457
そりゃあリソースの話じゃないのか？
いくらメモリがあってもリソースが足りなくなればそれ以上は出来ないよ。
もしかしたら、いまだにWin98系列を使ってない？
459:NAME IS NULL
08/02/14 22:40:04
それはない。
460:NAME IS NULL
08/02/14 23:15:39
Windowsのリソース管理テーブルサイズと
Accessのリソース管理テーブルサイズはべつもんでしょ。
ヘルプとかにリミット書いてなかったっけ？
461:NAME IS NULL
08/02/15 18:13:51
>>460
そうなのか？それは知らんかった。お恥ずかしい。
それはともかく、オブジェクトってフォームとかレポートのことだと思うのだけど、
Accessでオブジェクトを極限まで増やすっていったいどれくらいのこと言ってんだろう？
そんなに増やしたら管理するのが大変だと思うし、それってAccessの守備範囲なんだろうか？
大人数での開発に適してないAccessでそんな開発するほうが無理と違うのかなあ？
462:NAME IS NULL
08/02/15 19:00:25
TableCount=425
QueryCount=263
FormCount=144
ModuleCount=144
MacroCount=0
ReportCount=0
こんな感じだが、特にFormはMemoryを多く消費する。
オブジェクトの管理はうまく工夫すれば、どんなに数が増えようが負担は変わらない。
463:NAME IS NULL
08/02/16 00:39:02
テーブル一覧で毎日死ぬほどスクロールさせてんだろうな。
まあ本人が負担と思ってないんだから別にいいけどw
464:NAME IS NULL
08/02/16 03:26:33
テーブルが多くなるとスクロールで探すのに苦労するってのは初心者だな。
アクセスのレコードソースの入力欄はインクリメンタルサーチ機能があるんだから
それを最大限に活用できるような命名規則をつくるのが肝心なんだよ。
465:NAME IS NULL
08/02/16 08:40:03
>インクリメンタルサーチ機能
テーブル名に漢字を使ってるヤシにはピンとこないんだよね。
466:NAME IS NULL
08/02/16 08:53:56
>アクセスのレコードソースの入力欄
これないんだけど・・・
アホにもわかるように詳しく
467:NAME IS NULL
08/02/16 10:12:13
設計が最適化されてたらフォームにしろレポートにしろ
複数テーブルいくつも連結するだろうに。
インクリメンタルサーチが役立つって、おまえはいつも
単体テーブル一個しか使わないのかよw
468:NAME IS NULL
08/02/16 16:01:22
>>462
うわあ・・・糞の山だあ・・・
469:NAME IS NULL
08/02/16 17:02:42
>>462
> TableCount=425
４２５もテーブルがあるのか？
いったいどういうシステムなんだ？月ごとにテーブルを切り替えているとか？
> QueryCount=263
> FormCount=144
> ModuleCount=144
オブジェクトの話だよね？モジュールが１４４っていったいどんな分け方したらそんなことに？
プロシージャをモジュールごとに分ける意味が無いような気がするが？
それともフォームにはプロシージャーを書かないようにしているとか？
> MacroCount=0
> ReportCount=0
ほんでもってレポートが０？印刷しないのか？
それとも、他の方法でも使っているのか？
随分と謎のシステムだなあ？
470:NAME IS NULL
08/02/16 18:49:37
>>466
俺もなんのことかわからなかったのだけど、
もしかしたら、コード ウィンドウのことかな？
用語の使い方といい、オブジェクトの数といい、
随分独創的なシステムの構築をしているらしいなあ？
まあ、それもいいけど・・・・・・
471:NAME IS NULL
08/02/16 18:59:50
>>466
1.フォームオブジェクトを選択
2.右クリックでデザインビューを選択
3.フォームのプロパティを開く
4.すべてのタブを選択
5.レコードソース（1番上)
472:NAME IS NULL
08/02/16 19:34:23
>>471
それを省略して言うと「アクセスのレコードソースの入力欄」になるのか？独創的だなあ？
なんだか良くわからないが、とりあえずいいや。独創的過ぎて参考にならなさそうだし。
だいたいテーブルの管理は印刷でもしておけば問題ないし、特にどうってことはない。
とりあえず、メモリを食うフォームでも１４０まではいけるんだ。
俺はまだ６０もいってないから、当分は大丈夫。これは参考になった。サンキュー！
473:NAME IS NULL
08/02/16 20:13:53
フォームと同様にレポートもメモリ使うみたいだから、それもカウントしなきゃダメだよ。
474:NAME IS NULL
08/02/16 20:57:05
>>473
ああ、それもそうだなあ。するってえとそろそろ限界が近いかもしれない。
基本的に１ファイルで管理するAccessではやはり大規模開発（ってほどでもないけど）は無理かも？
随分前から代替手段を検討しているけれど、とりあえず問題がないのでなかなか踏ん切りがつかない。
一応第一候補はJavaなんだけどなあ？
475:NAME IS NULL
08/02/17 01:26:08
Mac、Linux、Windowsとプラットフォームを問わないJAVAでの開発がこれからの主流。
そんなふうに考えていた時期がぼくにもありました・・・
476:NAME IS NULL
08/02/17 11:04:55
Accessの代替がJavaとかズレてねえ？
477:NAME IS NULL
08/02/17 12:07:16
>>469
アクセスのレポートを使わないのは、他の印刷ツールを使っているからだ。
そのほうがよりニーズに対応したものが作れるということもあるが、
MDBからできるだけ外に出したいという理由がある。（メモり対策、分散作業のため）
その代わり、ワークファイルやモジュールが増大するのは仕方ないと思っている。
478:NAME IS NULL
08/02/17 13:26:35
>>477
アクセスのレポートより良い印刷ツールなんてそうそう無いと思うのだが？
いったいなに使っているんだろう？
479:NAME IS NULL
08/02/17 15:30:36
>>476
じゃあ、他になんかある？
480:NAME IS NULL
08/02/17 15:36:56
VB
481:NAME IS NULL
08/02/17 16:27:22
桐
482:NAME IS NULL
08/02/17 17:46:13
おいおい、Accessより大規模なシステムの開発の話だぞ。
VBや桐じゃ同程度の開発がいいところだと思うけどなあ？
ってまあここで聞くような話じゃないけどな。
483:NAME IS NULL
08/02/17 20:41:54
データベースエンジンの話が抜けてるのがズレてるっぽい
484:NAME IS NULL
08/02/17 21:47:03
エンジンはJetで
485:NAME IS NULL
08/02/17 22:20:57
>>484
なんでAccessの一番の弱点だと思われるJetエンジンをAccessの代替で使わなければいけないんだ。
MySQLあたりを使うのが普通だろう？
486:NAME IS NULL
08/02/17 22:25:51
俺の会社オラクル使ってるけど、レポートと入力は桐でやってる。
レポートは桐が群を抜いてるし、入力も桐の表形式が速くて誤入力がない。
他はオラクル。
487:NAME IS NULL
08/02/17 22:38:21
オラクルと桐しか使ってないやつがなんでこのスレ来てんの？w
488:NAME IS NULL
08/02/17 23:04:14
２ちゃんもDB関係は全部目を通してる。
一応、DBが本職なんで。
489:NAME IS NULL
08/02/18 02:14:37
>>478
アクセスのレポートは作成された帳票にユーザが手を加えられないのが難点。
エクセル形式で帳票作成できるツールであれば、作成されたものはユーザが自由に改造できる。
また、ユーザが作ったエクセルファイルをそのまま流用できるのもいい。
URLﾘﾝｸ(www.adv.co.jp)
ACCESS VBAからでも使用可
490:NAME IS NULL
08/02/18 05:45:35
>>486
桐とオラクル？
初めて聞く組み合わせだ。
確かにワープロを作っていた会社だけあって日本語のレポートは郡を抜いている。
ほとんどどんな印刷物でもできる。
でも、桐の外部データーベース接続は遅いって聞いたのだけど？
それとも、入力と印刷のたびにファイル変換しているのだろうか？
オラクル自体はなんで動かしているの？まさか桐の一括処理？
もし良ければ参考にしたいので教えて下され。
491:NAME IS NULL
08/02/18 08:33:50
入力と印刷のたびにファイル変換してる。
入力は一部だけど、キーパンチャーがバコバコボコボコ入力する部分だけ。
ほんと、入力も桐が効率良いわ。
492:NAME IS NULL
08/02/18 19:07:03
>>491
Accessのフォームも作りこんで複写とか出来るようにすればそれなりに効率は良くなるんだが、
あまり複雑になると遅くなったりするからなあ？
確かに桐を使うってのはひとつの手だとは思うし、
ファイル変換してというのはありだとは思うけど、あまりスマートなやり方ではないなあ？
マネしてやってみようという気には残念ながらならないなあ？
493:NAME IS NULL
08/02/18 20:15:43
お前はJavaでやればいいよ
494:NAME IS NULL
08/02/18 21:15:23
>>492
複写ってどうやんの？
495:NAME IS NULL
08/02/18 22:59:30
・オラクル→桐
・桐→オラクル
通常の運用でこの処理を何度も何度も何度も何度も繰り返してるってことだな。
人間のやることだからバコバコ打った後に桐→オラクルするつもりがオラクル→桐しちゃったとか
年に1回くらい普通にありそうだが・・・
496:NAME IS NULL
08/02/18 23:02:02
Accessの帳票は印刷にはいいんだけど、
データでくれって言われた時にちょっと困る。
前はPDFにして送ったけど。
497:NAME IS NULL
08/02/18 23:17:54
印刷物を画像データで要求されて困るのはAccessのレポートに限ったことじゃないと思うが
498:NAME IS NULL
08/02/19 05:05:58
>>495
普通はプログラム（一括処理？）組んで自動処理するだろう？
オラクルまで導入してそんなところを手作業でしてたらいい笑いものだ。
499:NAME IS NULL
08/02/19 05:07:07
>>497
たぶんエクセルと比較して言っているんだろう？
500:NAME IS NULL
08/02/19 09:45:59
印刷イメージをデータで送るってこと多いのか？レポートのレコードソースをＣＳＶでというのはよくあるが。
501:NAME IS NULL
08/02/19 11:08:13
>>494
> 複写ってどうやんの？
元のデータを変数に格納してその変数を使ってレコードを追加すればいい。
そんなに難しいプログラムではないよ。
使いやすく作るのは難しいかもしれないけれど。
502:NAME IS NULL
08/02/19 12:31:52
>>497
エクスポートで.htmlやら.xlsやら選べるの知ってたから安請け合いしたら、
実際やってみてｳﾎﾞｧということがあった。
まあ俺が間抜けなんだけど。
>>500
実際のレイアウトとか見たいんじゃないかな。
Accessだとレポート使うけど、
こないだHSQL+JavaでやったときはHTML出力にした。
Accessのレポートは印刷設定が時々リセットされるし。
そのたびに呼ばれるのはかなわん。
503:NAME IS NULL
08/02/19 13:17:48
社内で主にデータ閲覧用のデータベースとしてアクセス（ADP）使っているんだけど、
そろそろレポート出力の方もちゃんと勉強しなくちゃと思ってます。
レポートの作り方で参考になるようなサイトってあまりみかけないんだけど、
おすすめあったら教えてプリーズ。
504:NAME IS NULL
08/02/19 18:52:41
そういや、レポートってあんまりなにかを見て覚えたという記憶がない。
トライ＆ゴーでいろいろやって、なんとなくわかった。
基本的にはフォームと良く似ているけれど、
ユーザーインタフェースを意識しなくていいので楽な気がする。
気をつけなくてはいけないのはヘッダーとフッターの使い方。
特にグループヘッダーフッターの使い方で改ページするところが変わってくる。
いろいろやってみればだんだんわかってくるとは思うけど最初は戸惑う。
それと、あまり複雑なレポートを作ると重く遅くなるので、
印刷用のデータをSQLで作ってレポートはシンプルになるように気をつけたほうがいいと思う。
505:NAME IS NULL
08/02/19 19:25:55 zoj3pqPw
ＡＣＣＥＳＳでこのようなデータを入力後下記の形にＶＢＡでしたいのですが
どうすればいいですか？
納品先 ｜商品名 ｜規格 ｜数量 ｜
Ａ ｜やさい ｜２Ｌ ｜５０ ｜
Ａ ｜やさい ｜３Ｌ ｜３０ ｜
Ｂ ｜衣料品 ｜Ｌ ｜ ５ ｜
変換したい形
納品先 ｜商品名 ｜内容１ ｜内容２ ｜内容３ ｜
Ａ ｜やさい ｜２Ｌ ｜３Ｌ ｜ ｜
Ａ ｜やさい ｜５０ ｜３０ ｜ ｜
Ｂ ｜衣料品 ｜Ｌ ｜ ｜ ｜
Ｂ ｜衣料品 ｜５ ｜ ｜ ｜
506:NAME IS NULL
08/02/19 20:06:10
あほなことやってると思うけど
あえてやり方挙げるなら
UNIONかな
507:NAME IS NULL
08/02/19 20:09:08
>>505
テーブルでは、たとえ桐つかっても無理だな
レポートでやれ
508:NAME IS NULL
08/02/19 20:43:19
レポート作るとき
フィールドリストからドラッグ アンド ドロップして
ラベルとテキストのコントロールが連結した状態で出来上がるが
その一方だけをセクションを跨いで移動したいとき
例えばラベルだけをフッターセクション上に置き
テキストは詳細セクション上に置くには
どのようにすればいいのでしょう？
ドラッグしてもセクションをまたげなくないですか
509:NAME IS NULL
08/02/19 20:46:25
またげないお
510:NAME IS NULL
08/02/19 21:02:27
>>508
それほど悩むことかな？
ラベルをカット＆ペーストで持っていけばいいんじゃない？
ラベルだけ作り直したってたいした手間ではないし。
511:NAME IS NULL
08/02/19 21:04:58
Access2007のはラベルのC&Pでも持っていけなかったorz
512:NAME IS NULL
08/02/19 21:12:41
>>510
慣れてる方はそう思われるんでしょうけど
出来うるなら簡素なやり方でやりたい
フィールドが沢山あるもので
オートレポートでもフィールドが多すぎて出来ないと
表示されますし
513:505
08/02/19 21:44:35 zoj3pqPw
>>507
レポートだとどうすればいいですか？
514:505
08/02/19 21:59:36 zoj3pqPw
まちがえました
再度書き込みしなおします
ＡＣＣＥＳＳでこのようなデータを入力後下記の形にＶＢＡでしたいのですが
どうすればいいですか？
納品先 ｜商品名 ｜規格 ｜数量 ｜
Ａ ｜やさい ｜２Ｌ ｜５０ ｜
Ａ ｜やさい ｜３Ｌ ｜３０ ｜
Ｂ ｜衣料品 ｜Ｌ ｜ ５ ｜
変換したい形
納品先 ｜商品名 ｜規格１ ｜数量１ ｜規格２ ｜数量２ ｜規格３ ｜数量３ ｜
Ａ ｜やさい ｜２Ｌ ｜５０ ｜３Ｌ ｜３０ ｜ ｜ ｜
Ｂ ｜衣料品 ｜Ｌ ｜５ ｜ ｜ ｜ ｜ ｜
515:NAME IS NULL
08/02/19 22:03:12
>>512
オートレポートってアメリカならいざしらず罫線を使った複雑な帳票を要求される日本では使い物にならない。
ラベルとテキストの連結は便利なようで実際はじゃまにしかならない。
レポートって最初からレイアウトが一発で決まるということはまず無くて、
結局修正修正の繰り返しになることがほとんど。
経験上、簡素なやり方だと後で手直しする手間がかえってかかる。
複雑な帳票になるほど一つ一つコントロールを配置していくほうが結局近道になる。
複雑な帳票といっても良く見ると似たようなコントロールが多いので、
一つ作ってそれをコピーしてから修正すれば意外と手間はかからない。
まあ、意にそぐわない答えだと思うけど正直そう思う。
516:NAME IS NULL
08/02/19 22:07:04
似たようなものがいっぱいあるとき
全部のプロパティいじるの面倒で仕方ないんですが
コントロールの配列みたいなことは出来るんですか？
517:NAME IS NULL
08/02/19 22:37:59
>>516
> 似たようなものがいっぱいあるとき
> 全部のプロパティいじるの面倒で仕方ないんですが
いったいいくつあると言うのかな？
似たようなものならいじらなければならないプロパティはそんなにないと思うのだけどね。
例えば３１個のフィールドがあるならば最初にData01を作ってコピーした先をData02とすれば１を2に変えるだけ。
最初からそういうことを念頭においてテーブル設計しておけば面倒なことはないと思う。
それからコピーしてペーストしたコントロールを移動してからさらにペーストすれば、
移動した方向にいくつでも並べられる。これを使うと配置も便利。
工夫次第でこれくらいのコントロールは簡単にできるよ。
そのくらいことで面倒なんて言っていたらVBAなんてとてもできないし、
VBAを使わないAccessなどクリープの入ってない・・・・・・(w
３１個よりはるかに多いというのならそれは根本的に考え直したほうがいいと思う。
３１個の例でもプレビューするのに何分もかかりました。
それよりはるかに多いのなら使い物にならないだろうし、
ハングして動かなくなる可能性も高い。
> コントロールの配列みたいなことは出来るんですか？
コントロールの配列ってまったくイメージがわかないんだが、出来ないだろうと思うよ。
518:NAME IS NULL
08/02/19 22:42:08
>>515
いや、参考になりやす
アメリカ文化の日本文化の罫線
バカヤローです。
ただofficeの浸透力、シェアにあきらめて
やるしかないですね
519:NAME IS NULL
08/02/19 22:52:21
>>518
ここで出てきそうな言葉が「桐にしとけ」なんですが、
確かにこういう分野は桐が得意でいいんですが、
桐には桐の問題点があるんでね。
Accessでも工夫次第で大抵のことはできるんでがんばってください。
520:NAME IS NULL
08/02/19 23:05:07
>>517
コントロール配列はVBでは基本テクニックっすよ。
521:NAME IS NULL
08/02/19 23:24:24
VB6 では、実行時に配列を振る必要はないのですが、デザイナで 1 つ、コピー元になるコントロールを配置しておく必要があります。
また、そのコピー元の Index プロパティを画面デザイナから 0 に設定しておいてください。(実行時の設定はできません)
新しいコントロールを追加するというよりは、コントロールを複製するという動きになります。
そのコピー元は Index プロパティが 0 のコントロールで、Load ステートメントを使用することで複製されます。
この時、Visible プロパティは False になっていますので、True にする必要があります。
522:NAME IS NULL
08/02/19 23:24:56
URLﾘﾝｸ(jeanne.wankuma.com)
' Load イベントで配列を動的に作成してフォームに加える
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 9
' Load ステートメントを使用してコントロールを作成する
Call Load(Me.Text1(i))
' ここで、プロパティなどを必要に応じて設定します
Me.Text1(i).Text = "Text" & CStr(i + 1)
Me.Text1(i).Top = Me.Text1(0).Top + (240 * i)
' 初期値で False になっているので True にする
Me.Text1(i).Visible = True
Next i
End Sub
523:NAME IS NULL
08/02/19 23:28:14
VBAでは使えないサンプルソース乙
524:NAME IS NULL
08/02/19 23:34:43
>>516
桐には初めからファミリってのがあって、コントロールをグループ化して一括で設定できるど
525:NAME IS NULL
08/02/19 23:35:54
URLﾘﾝｸ(www.h3.dion.ne.jp)
URLﾘﾝｸ(www.moug.net)
URLﾘﾝｸ(okwave.jp)
526:NAME IS NULL
08/02/20 11:29:28
>>504
アドバイスありがとう
527:NAME IS NULL
08/02/20 12:09:20
>>525
アドバイスありがとう
528:NAME IS NULL
08/02/20 20:58:58
>>514
エクセルならいざしらず、まずデータをコード化しないとどうにもならないと思いますよ。
このままコード化しないまま処理しようと思っているのなら、エクセルでやったほうがいいでしょう。
それはともかく考えかたとしてはこういうことでいいと思います。
規格によって書き込む位置が変わるわけですからその規格がどの位置になるかの情報が必要です。
この場合２Ｌは１の位置、３Ｌは2の位置、Ｌは１の位置ということになります。
この位置情報をテーブルで保存しておきます。
そしてあらかじめ変換したい形の空白のデータベースを用意し、そこに商品マスターからデータを流し込みます。
そのテーブルに元の形式のテーブルと位置情報のテーブルをリレーションして更新をかけます。
これはSQLをつかうのが簡単で早いでしょう。
とはいうものの本当にこんなやり方でいいんでしょうか？やさいというのは単なる例なのでしょうが、
規格がある一定の範囲で収まるとは思えないのですが・・・・
印刷サイズを越えたらどうするのでしょう？
根本的に考え方を変えたほうがいいように思うのですが？
529:NAME IS NULL
08/02/20 23:10:49
衣料品の規格Lは常識的に推理できるけど野菜の2Lとか3Lとかが
どんなものかまるで想像つかないな。
もしかしたら4Lとか5Lとか99Lとかたくさん種類があってそれを50音順に、
あるいは入力順に左詰めで並べたいということだろうか？
順番は関係なく、とにかく3つが横並びになっていればいいのか？
同じ野菜で同じ規格が複数行入力されたら数量は合計するのか？
4つめの規格が入力されてしまった場合は捨てるのか？数量4を用意するのか？
それとも4つめの規格については絶対入力されない保証があるのか？
もうちょっと要件定義が必要だとｵﾓﾀ
530:514
08/02/20 23:49:11 DCQNrO7Q
>>528
レスありがとうございます
詳しい説明文もかかずすいませんでした
全然説明不足でした
DATAというテーブルに下記の形で入力します
納品先 ｜商品名 ｜規格 ｜数量 ｜
-------------------------------------
Ａ ｜やさい ｜２Ｌ ｜５０ ｜
Ａ ｜やさい ｜３Ｌ ｜３０ ｜
Ａ ｜やさい ｜ Ｌ ｜１５ ｜
Ａ ｜やさい ｜ M ｜２０ ｜
Ａ ｜やさい ｜ S ｜３３ ｜
Ａ ｜やさい ｜等外 ｜４０ ｜
Ｂ ｜衣料品 ｜Ｌ ｜ ５ ｜
変換後というテーブルを作成しておき以下のように
VBAなりの方法で以下のように追加したいと思います
納品先 ｜商品名 ｜規格１ ｜数量１ ｜規格２ ｜数量２ ｜規格３ ｜数量３ ｜規格４ ｜数量４ ｜
--------------------------------------------------------------------------------
Ａ ｜やさい ｜２Ｌ ｜５０ ｜３Ｌ ｜３０ ｜L ｜１５ ｜M ｜２０ ｜
Ａ ｜やさい ｜S ｜３３ ｜等外 ｜４０ ｜ ｜ ｜ ｜ ｜
Ｂ ｜衣料品 ｜Ｌ ｜５ ｜ ｜ ｜ ｜ ｜ ｜ ｜
規格で位置が決まってるわけではありません
規格、数量とも１～４まで交互にあり
その商品ごとの規格、数量ははかならず１からはじまります
仮にやさいで規格が６つ存在したら
次のレコードの規格１の所に入る形でやりたいです
うまく伝わりましたでしょうか？
よろしくお願いいたします
531:514
08/02/21 00:04:34 Wq3um4ha
>>530
かなりずれてしまいました
>>529
>衣料品の規格Lは常識的に推理できるけど野菜の2Lとか3Lとかが
>どんなものかまるで想像つかないな。
>もしかしたら4Lとか5Lとか99Lとかたくさん種類があってそれを50音順に、
>あるいは入力順に左詰めで並べたいということだろうか？
>順番は関係なく、とにかく3つが横並びになっていればいいのか？
やさいに限らず規格は無限と考えてもらえると助かります
並ぶ順番などは特にないです
上にあるものからでかまいません
>同じ野菜で同じ規格が複数行入力されたら数量は合計するのか？
集計に使う予定で考えてますので
クエリをつかって日付で抽出し、納品先ごとで合計します
>4つめの規格が入力されてしまった場合は捨てるのか？数量4を用意するのか？
>それとも4つめの規格については絶対入力されない保証があるのか？
530を見てもらえると助かります
532:NAME IS NULL
08/02/21 00:32:42
レポートならこんな感じにサブレポートの列数を指定してやるといい。
URLﾘﾝｸ(nullpo.vip2ch.com)
533:NAME IS NULL
08/02/21 02:30:27
'ADO参照追加
Private Sub hoge()
Dim cn As New ADODB.Connection
Dim rstKey As New ADODB.Recordset
Dim rstData As New ADODB.Recordset
Dim rstTrans As New ADODB.Recordset
Dim count As Integer
Dim flg As Boolean
Set cn = Application.CurrentProject.Connection
cn.Execute "DELETE FROM 変換後"
rstKey.Open "SELECT 納品先,商品名 FROM DATA GROUP BY 納品先,商品名", cn, adOpenForwardOnly, adLockReadOnly
rstTrans.Open "SELECT * FROM 変換後", cn, adOpenForwardOnly, adLockOptimistic
Do While Not (rstKey.EOF)
w = 0
flg = False
rstData.Open "SELECT * FROM DATA WHERE 納品先='" + rstKey.Fields(0) _
+ "' AND 商品名='" + rstKey.Fields(1) + "'", cn, adOpenForwardOnly, adLockReadOnly
Do While Not (rstData.EOF)
If w = 0 Then
flg = True
rstTrans.AddNew
rstTrans.Fields(0) = rstData.Fields(0)
rstTrans.Fields(1) = rstData.Fields(1)
End If
rstTrans.Fields(w * 2 + 2) = rstData.Fields(2)
rstTrans.Fields(w * 2 + 3) = rstData.Fields(3)
If w < 3 Then
w = w + 1
Else
rstTrans.Update
flg = False
w = 0
End If
rstData.MoveNext
Loop
rstData.Close
If flg Then
rstTrans.Update
End If
rstKey.MoveNext
Loop
rstKey.Close
rstTrans.Close
Set rstKey = Nothing
Set rstData = Nothing
Set rstTrans = Nothing
Set cn = Nothing
End Sub
534:NAME IS NULL
08/02/21 10:56:56
規格、数量とも１～４までって限度が決まってるなら、桐でやれば簡単じゃん
535:NAME IS NULL
08/02/21 15:05:24
>>531
> クエリをつかって日付で抽出し、納品先ごとで合計します
Pivot使えばテーブルの変換不要
元テーブルから直接集計汁
536:NAME IS NULL
08/02/21 15:10:18
>>534
だれもそんなこと聞いてないよ。空気読めないというか、読む気が無いアホは引っ込んでろ。
俺はVer1からの桐ファンなんだけど、桐の評判落とすようなことはするな！
桐を使うか？Accessを使うかはケースバイケース。
だいたいの場合、手軽にやるなら桐、アプリケーションを作るつもりならAccessを使う。
桐しか使えないアホがなんでも桐が一番なんていうのは良い恥さらしだ。
537:NAME IS NULL
08/02/21 15:14:43
変なの来たわ
538:NAME IS NULL
08/02/21 18:04:05
>>530
上のテーブルはいいけど、下のテーブルはもはやリレーショナルデータベースである意味がない。
もちろん、VBAを使って無理矢理やればどうとでもそういうデータを作成できるけど、
それはVBAを勉強しろとしか言えない。
VBAでやるきがあるなら「レコードセット」がわかればできると思うよ。
>> 集計に使う予定で考えてますので
>> クエリをつかって日付で抽出し、納品先ごとで合計します
ならば、上のデータを直接クエリやVBAで集計することを考えた方がいいのでは？
539:514
08/02/21 19:28:23 Wq3um4ha
>>533
できました
ありがとうございました
使わせていただきますね
自分ももっと勉強しなければ...
>>535
基本は複数行入力しないように心がけてるので大丈夫です
>>538
人から頂いたコードをカスタマイズする程度ならできるんですけど
一からとなるとちょっと自信ないんです....
540:NAME IS NULL
08/02/21 20:31:59
>>539
そういう なまいきな発言をするから、周りの人に教えてもらなくなって、ここで聞いているんだね。
541:NAME IS NULL
08/02/22 00:47:15
つか、こんなレコード作ってなんに使う気なんだ？
542:NAME IS NULL
08/02/22 05:22:45
いっぱい釣れたのでもういいです
543:NAME IS NULL
08/02/22 09:47:34
>>541
上のほうで出てた印刷イメージのデータを作るってことじゃないか？
544:NAME IS NULL
08/02/22 20:40:56
>>543
まあ、そうなんだろうけど正直あまり良いやり方ではないと思う。
そのまま印刷したんじゃやたら縦に長い表になるからって、
わざわざこんな面倒なことをするんだろうけど、
それなら段組印刷でもすればいいと思う。
そっちのほうがずっと見やすいしシンプルだ。
これもそう簡単に実現はできなさそうだけど
同じ努力するならそのほうが良いと思う。
545:514
08/02/23 14:47:52 BrdEtbtD
>>540
気にさわったのであればすいません
そんなつもりはありませんでした
>>541
543さんの方が言われるとおりです
今までエクセルでこの形で印刷してたんですけど
アクセスに移行しても見慣れたこの形がいいといわれまして
546:NAME IS NULL
08/02/23 15:24:51
>>545
> アクセスに移行しても見慣れたこの形がいいといわれまして
見慣れてない俺からしてみると不自然なんだけどね。
まあしょうがないか？現実にはすべて合理的ってわけには行かないものなあ。
547:NAME IS NULL
08/02/24 22:20:07 +jC5teAM
>>514
印刷目的ならテーブル(or クエリ)レベルで変換するより複数列レポート使うのがお奨め。
たぶん今後も開発や修正が出てきそうな雰囲気だから、作るなら柔軟性や汎用性を持たせておいたほうがいいと思うよ。
「見慣れた形がいい」程度の理由で決めてる相手なら、今後も「列数変えろ」とか「伝票印刷もしたい」とか言い出す可能性があるからね。
548:NAME IS NULL
08/02/25 07:56:12
要するにこういうこと。
URLﾘﾝｸ(www.nurs.or.jp)
実際に作って見せればこっちのほうが見やすいっていうと思うよ。
そうしてきっとこう言うんだよ。
「俺が言っていたのはこういうことだよ。やっとわかったか？」
「嘘つけ！」
ｗｗｗ
549:NAME IS NULL
08/02/28 17:48:38 Tzp8hxPl
アクセスのコンソールクライアントを探してたのですが、ベクター探しても無かったので
WSHの練習を兼ねて作ってみました。
うっぷします。
詳細は同梱のREAME.txtを読んでくだされ。
pass:ac
URLﾘﾝｸ(www-2ch.net:8080)
・ac.wsf
ＭＳアクセスのコマンドラインクライアント
使い始めは"/c"スイッチで環境ファイルを作成してください。
起動すると"AC>"とプロンプトを表示するのでSQL文を入力して下さい。
画面の表示の整形はCSVです。
※標準入力を使用してるので、CScript経由で無いとエラーになります。
使い方：/h (ヘルプ) /b (bachモード) /c:MDBへのパス または /d:dsn名 (最初のみ)
/u:ユーザ名 /p:パスワード 環境ファイル名(省略時はdefault設定)
※AC>プロンプト内のコマンド
AC>プロンプト内では次のコマンドが使えます。
AC>help;
help; :この表示
quit; :コンソールの終了
（SQL文）; :SQLの実行
@(ファイル名); :ファイルの実行
!(コマンド名); :コマンドの実行
注）文末記号(;)の後にリダイレクト記号(>)とファイル名で
出力先をカレントディレクトリのファイルにします。
例）select * from TEST;>data.csv
※元々CSVを取得、投入するスクリプトを改造したので、CSVを投入する
スクリプトも同梱します。
・acm.wsf
使い方：/h (ヘルプ) ( /i or /u:キー項目名 挿入 or
/t:テーブル名 環境ファイル名(省略時はdefault設定)
550:NAME IS NULL
08/02/28 18:57:46
schemaとかdumpとか希望
551:NAME IS NULL
08/02/28 21:08:13
JetSQLConsoleが有名(Wikipediaにも載ってる)だけどね。
そっちは日本語化けるから、そういう点では価値あるかも。
552:NAME IS NULL
08/02/29 05:49:55
Error : 3661
[object Error] on Connection Open
アプリケーションを起動できません。システムデータベースが存在しないか、またはほかのユーザーが排他的にシステムデータベースを開いています。
553:NAME IS NULL
08/02/29 12:48:13 MrGipuX/
>>552
MDBまでのパスが正しいか確認してくれ。
途中に空白があるとダメかも知れん。
cスイッチを゛でくくってくり。
例 /c:"c:\My Document\test:mdb"
若しくは本当に裏でMDBが開いてるか。
アクセスアプリを開いてるとそんなのが出た。
その場合はアクセス側でマルチユーザーの設定をしないとダメかも。
メニューに共有ユーザーの設定があったと思う。
554:NAME IS NULL
08/03/03 18:17:09
ところでAccess2007のランタイムはどうなったのだろう？
555:NAME IS NULL
08/03/03 18:21:11
>>554
普通に使ってますが何か？
556:NAME IS NULL
08/03/03 18:25:33
>>555
あっそうなんだ。
URLﾘﾝｸ(www.microsoft.com)
ここにあるやつ？英語版で問題ないの？
557:NAME IS NULL
08/03/03 18:32:14
URLﾘﾝｸ(www.microsoft.com)
URLﾘﾝｸ(www.microsoft.com)
558:NAME IS NULL
08/03/03 18:47:26
>>557
両方インストールせいってこと？
現在２０００なんだけど、ランタイムがまともに動くなら２００７にしてもいいかなと思ったりしている。
でも英語版でふりがな入力とかちゃんと動くのだろうか？
559:NAME IS NULL
08/03/03 18:51:39
>>558
URLﾘﾝｸ(office.microsoft.com)
560:NAME IS NULL
08/03/03 18:52:12
>>558
URLﾘﾝｸ(office.microsoft.com)
561:NAME IS NULL
08/03/03 19:35:47
別に無理に答えろとは言ってないよ。
使用した人間の実体験を聞きたいのであって、調べればわかるサイトの情報なんていらないよ。
つうことで後は無視するから悪く思わんでくれ。
562:NAME IS NULL
08/03/03 19:39:09
あんた誰？
563:NAME IS NULL
08/03/03 22:16:40
基地外きたー
564:NAME IS NULL
08/03/05 02:20:14
昨日Access2007を購入したばかりです。
>>557 のランタイム及びDeveloperExtensionsを早速インストールしました。
Officeボタン？に最初「Developer」と表示されていたのに、いつの間にか消えています。
その後ランタイムやDeveloperExtensions、はたまたAccess2007本体まで
アンインストール→再インストールしたのに、一向に「Developer」が表示されません。
何が原因なのだろう・・・？
ランタイム無償というコトバに飛びついて買ったのに・・・
どなたかおわかりの方いらっしゃいませんか？
あちこちネットで見てもこの現象は出てないみたいです。
ちょっと疲れたので仮眠します。
565:NAME IS NULL
08/03/05 08:29:59
ランタイムとOffice本体は同じPCにインストールしてはいけない
あくまでOfficeの入っていないPCに入れるためのものだから
ご愁傷さま
566:NAME IS NULL
08/03/05 08:40:05
DeveloperExtensionsで、ランタイム込みのパッケージと、ランタイム別途ダウロード指示のパッケージを作れる
別途ダウン指示パッケージの配布先がランタイムダウンする
自分でランタイム入れてどうすんのよ
567:NAME IS NULL
08/03/05 12:15:51
>>564です。
>>565 >>566
レスありがとうございます。確かに自分のPCにランタイム入れてました。
アンポンタンでごめんなさい。
やりたいことは「Access2007で作成されたもののランタイム版を作成する」ことですので、
自分のPCにはDeveloperExtensionsだけ入れれば良いのですね？
ランタイムそのものはアンインストールしましたが、それでも「Developer」が
オフィスボタンから表示されません。
今回導入したのはAccess2007のみで、その他のOffice製品はOfficeXPを
使っています。この中にはAccess2002も含まれています。
つまりAccess2002と2007が共存している状況なのですが、これが良くないのかなぁ？
568:NAME IS NULL
08/03/14 02:02:15 ppdTlgN9
ACCESSに詳しい方がいらっしゃるようなので、教えてください。ACCESS2003ユーザーですがテーブルのカーソル移動が突然遅くなり、画面の左下には計算中って表示されます。動きが遅くていらいらするんですがどなたかこの現象の解決方法ご存じですか？
569:NAME IS NULL
08/03/14 05:22:39
そういう難しい話は詳しい人に聞いた方が良いな
570:NAME IS NULL
08/03/14 09:49:51
>>568
On Current イベントは削除してください
571:NAME IS NULL
08/03/14 12:17:55
>>568
関係ないが・・・
>>ACCESSに詳しい方がいらっしゃるようなので、教えてください。
Accessに詳しい方がいらっしゃらないAccessスレっていうのも見てみたいなｗ
572:NAME IS NULL
08/03/14 13:34:46
Accessには詳しいが、お前の環境やファイルのことなぞ知らんわ。
573:NAME IS NULL
08/03/15 07:19:11
2007で数値型フィールドだけカーソル移動がやたら遅くなる現象があったけど
SP1当てたら直ってたな
574:NAME IS NULL
08/03/16 02:12:15
Access2007の購入考えているんですが、Vista対応ってしてますか？
公式HPのシステム要件ではよくわからんかった。
575:NAME IS NULL
08/03/16 12:59:54 GiAudtrQ
>>574
もちろんだよｗ
XPとVistaそれとServer2003に対応。
576:NAME IS NULL
08/03/16 22:42:30
サンクス。じゃ勉強用に買うわ。
577:NAME IS NULL
08/03/25 17:16:45 B6LLrA9G
>>562
ハナテン中古車センター
578:NAME IS NULL
08/03/30 19:12:33
>>568
＞On Current イベントは削除してください
と同義かどうか分からないが、一旦mdb閉じて、ldb削除すると治ったことがあるよ
579:NAME IS NULL
08/03/30 22:14:46 bRsz35Vf
既出だったらすいません
コンボボックスで数字を打ち込むようにしたのですが（1テキスト1文字）
ボックスの大きさのせいもありますが、矢印のせいで選択した数字が
見えなくなってしまいます。
アクティブにしたときまたはカーソルがあったときだけ矢印が現れ
そうでないときは非表示なるような技はないでしょうか？
よろしくお願いします。
580:NAME IS NULL
08/04/01 23:40:26
テキストorラベルと
コンボボックスを
同じ場所に重ねる
ラベルがクリックされたら
コンボボックスを手前に出す
コンボボックスが確定したら
ラベルを手前に出す
581:NAME IS NULL
08/04/05 14:45:47 LoFR07Xc
アクセスのフォームに住所・氏名を入力しているのですが、
これを一太郎の宛名ラベルに出力するにはどうすればいいのでしょうか？
フォーム１，２，３，４、、、、、とあり、連続して出力したいので、
マクロをつかえば半自動化できそうなのですが。
マクロじゃあムリでしょうか?VBA必須でしょうか?
582:NAME IS NULL
08/04/05 19:16:20
>>581
なぜフォームから?
いったんテーブルに落としてから印刷させればいいじゃん?
そうすればフォームはひとつで済む。
一太郎は持っていないので知らんが、
Wordだと落としたテーブルのデータをデータソースにすればいい。
つうか、Accessのレポートだとできないようなことなのか?
583:NAME IS NULL
08/04/06 00:44:21
ジャストシステムに電話してください
584:NAME IS NULL
08/04/06 11:28:24 tzUTMXnW
>>582
ワード（一太郎）から差し込むのではなく、アクセスのフォーム上の
コマンドボタンを押すと、ワードに出力されるようにしたいのです。
というのは、
アクセスの現在のフォームに対応したものをワードに作りたいという
のと、主にアクセスをつかって入力しているからです。
レポートだと宛名書きはいいんだけど、その他の文章はアクセスから
一太郎に出力しているので、2度で間になります。
つまり、フォームからの出力とレポートへの変換とう2作業を
１つにしたいのです。
585:NAME IS NULL
08/04/06 11:32:01
質問があります。
前のレコードに移動するボタンがあります。
先頭のレコードからは前のレコードに戻れない為、エラーゴーツーなるコマンドでエラーを拾っています。
この度、レコードを移動した際に更新前処理で更新するかを確認するようなメッセージを設定しました。
更新しませんと選ぶとキャンセルをTRUEに、ME.UNDOとして処理前の状態に戻しました。
ここで先のレコードが移動出来ない時のエラーが出てしまいます。
アドバイス下さい。
586:NAME IS NULL
08/04/06 11:58:52
アドバイス
587:NAME IS NULL
08/04/06 12:25:55
On Error Resume Next
を先頭に書いとけ
588:NAME IS NULL
08/04/06 15:08:03
>>584
①フォームの入力はアクセス
②文章の入力はアクセス
どう見ても一太郎を使うこと自体が二度手間です。
589:NAME IS NULL
08/04/06 22:17:10
「ワード（一太郎）」って時点で意味不明すぎる
590:NAME IS NULL
08/04/07 01:05:38
Wordに「一太郎」っていう名前を付けて可愛がってる。
「ウチの嫁」みたいなもの。
591:NAME IS NULL
08/04/08 09:37:18
ワードからでも一太郎のファイルが開けるから
一緒になってんじゃね？
592:NAME IS NULL
08/04/08 09:43:22
そういうもんじゃないだろ。
593:NAME IS NULL
08/04/09 19:30:00 R5oZK5Ol
accessでDB作ってるんですが質問に答えていただけると幸いです。
まず、テキストボックスに入力した値をもとに検索をかけて表示
する画面を作りました。
検索の処理はVBAで作成し、form.openとかいうコマンドで表示するクエリにフィルターかけて
検索結果を表示するフォームへ投げてます。
このクエリと検索処理に問題はないと思うのですが、結果を確認すると、
検索にひっかかったデータ以外に
新規レコード（主キーのID（数値型）０が入ってる）が表示されてしまいます。
この新規のレコードが何故表示されるのかわかりません。
このフォーム自体は、追加・削除・更新全て禁止にしております。
お助けください。
594:NAME IS NULL
08/04/09 21:03:57
[追加・削除・更新全て禁止]
ほんと?
595:NAME IS NULL
08/04/09 21:12:10
たぶんホント。
「追加・削除・更新全て禁止」と書いたラベルを貼ってあるから。
596:593
08/04/09 22:46:22 R5oZK5Ol
>>594
フォームの設定で禁止にしてます。
データ更新のフォームも同じような画面なんですが
そちらは追加禁止にすることで新規レコードは表示
されません。
ソース比べても全然わからないので一応Accessの仕様ということで諦めぎみです。
ちなみにやぶれかぶれでID=0及び、IDがNULLは持ってくるなっていう条件を指定
してみましたが駄目でした。
これについては新規のレコードなんでIDに条件加えたところで意味が無いのかも知れませんが一応。
597:NAME IS NULL
08/04/09 23:20:02
まず、日本語の勉強からだな
598:NAME IS NULL
08/04/10 00:09:23
「データ更新のフォーム」とやらをパクってきてVBA部分だけ移植すればいいじゃない
599:596
08/04/10 00:58:37 CzUi+X9O
>>598
やっても駄目なんです。
600:NAME IS NULL
08/04/10 01:28:59
駄目なやつってホントに何をやらせても駄目なんだな・・・
601:NAME IS NULL
08/04/10 02:57:06
>ソース比べても全然わからないので一応Accessの仕様ということで諦めぎみです。
そんな仕様はない。
つくりの問題としか思えないが、こちらはソースを見れないので、話だけではどうにも。
ローカルテーブルなら、MDBのコピーとって、全レコード削除したらどうよ。
本当にそれが新規レコードなら、それでも出てくると思うけど、もし出てこなかったら
それ新規レコードじゃないと思われ。
602:NAME IS NULL
08/04/10 18:42:18 wWHoh7J7
こんにちは。
アクセスの初心者の質問はここで良いですか？スレ検索しましたが、見つからなかったので…
603:NAME IS NULL
08/04/10 19:32:43
>>602
ビジネス板にもACCESSスレがあるが
正直こことの使い分け方がよう解らん。
とりあえず、質問をしてみるのが吉。
604:NAME IS NULL
08/04/10 19:55:31 wWHoh7J7
ありがとうございます。
かなりあほな質問かもしれませんが、ご容赦ください。
例えば、社員一覧テーブルがあるとします。それとは別に、部署一覧テーブルがあります。
部署一覧は、部と課の二つで構成されます。例えば
ーーーーーーーーーーーーーー
A部 人事課
A部 総務課
A部 経理課
B部 営業１課
B部 営業２課
C部 企画１課
C部 企画２課
C部 企画３課
ーーーーーーーーーーーーーー
ここで、社員一覧のテーブルで、社員の部と課を入力するときに、部署一覧テーブルのデータから入力したいのですが、
１．[部]列には、部署一覧の部のみ表示(ただし重複はさせない。この場合、A部、B部、C部と表示)させて選択できるようにする。
２．一方[課]列は、もし[部]にA部が入力されていたら、それに付随する人事課、総務課、経理課のみが選択できるようになる。
こういうことをしたいのです。
ルックアップとか、クエリとかいろいろやってみても分かりません。たぶん、かなり初心者な話だと思いますが…
よろしくお願いします。
605:NAME IS NULL
08/04/10 21:32:18
俺だったら部だけのテーブルも作る。
で、フォームを使う。
この辺の仕様変更はできるの?
606:NAME IS NULL
08/04/10 22:46:19 r1j6EY9K
６０４です。
部だけのテーブルを作るとかいうのもありです。
基本的に、社員一覧テーブルに情報を打ち込むときに、打ち込みやすく間違えがないように
すればいいのであって、仕様はシンプルであればどのようでも良いです。
部は確かにそれだけのテーブルを持つか、値から選ぶようにすればいいのですが
２．についてはどうでしょうか。
似通った課名もあるので、できれば入力の際に
B部｜営業1課
B部｜営業2課
と2列を出して、選んだらセルには「営業1課」と2列目が入力される、とかできればいいのですが。
C部 → 営業1課 という部と課が一致しない入力を避けたいという気持ちです。
この辺だけできれば、あとは単なる社員情報一覧だけのテーブルで、プリントするものを
自動で作ったり（名前を差し込んだりして）したいだけで、特段難しいことはする予定ないです。
607:NAME IS NULL
08/04/10 23:45:52
部テーブル →部ID、部名
課テーブル →課ID、部名、課名（部名は部テーブルよりルックアップ）
社員テーブル →社員ID、部名、課名、社員名…etc（部名は部テーブルより、課名は課テーブルよりルックアップ）
なんて構造にして、ウィザードで社員テーブルを元にフォームを作ればいい。
そうすれば部名、課名はコンボボックスになっているはずだから
部の更新後処理で課を絞り込めばOK。
608:NAME IS NULL
08/04/11 00:15:07
例えば電算部がシステム部とかに名称変更された時、
部テーブルの1行だけ修正すればおｋな設計にしといたほうがよくないか？
609:NAME IS NULL
08/04/11 00:20:52
ID使ってルックアップ列だから
多分大丈夫じゃないか。
610:NAME IS NULL
08/04/26 21:58:57
Video ActiveX 入れると、ｙｏｕｔｕｂｅで国別視聴制限が掛ってるオランダの１６歳金髪ポルノが見れる件
自動的に選択メニュー出るし
611:指定数分のレコードコピー
08/05/02 00:27:04
VBAにて指定した分だけのレコードコピーの仕方がわかりません
お知恵貸していただけませんか？
テーブル「DATA」は
発注日＝日付型
納品日＝日付型
得意先CD＝テキスト型
得意先名称１＝テキスト型
得意先名称２＝テキスト型
商品＝テキスト型
件数＝テキスト型
以上のフィールドがあります。
発注日で抽出したものを「DATA」に新規追加してます
その後に件数に入力した数だけそのレコードをコピーしたいんですけどどうすればいいでしょうか？
よろしくお願いいたします
612:NAME IS NULL
08/05/02 06:42:18
いまいち何がしたいか分からんから的はずれかもしれないけど
データ追加クエリを使えばいいんじゃないの？
613:NAME IS NULL
08/05/02 09:30:38
何をどこからどこへコピーしたいのか、もう一回整理して書き込んだらいい
あの説明でわかる人間は皆無だ
614:NAME IS NULL
08/05/02 12:49:58
同じテーブルないでコピーしたいと思っています
615:NAME IS NULL
08/05/02 13:24:15
for i=1 to rs("件数")
sql="insert ....... "
cn.Execute sql,,adExecuteNoRecords
next
616:NAME IS NULL
08/05/05 06:48:03
特定の条件に合致したテーブルのデータを修正するvbaを作って動かしてたんですが、凄い時間が掛かることが分かって悩んでます
do until rs.EOF
if ○ and ○ then
end if
rs.movenext
loop
ってやってるんですが、もっと高速化するやり方ってありますか？
617:NAME IS NULL
08/05/05 07:14:42
一軒づつポインタをあてて処理していく方法はとても時間が掛かります。
インデックスを再検討することで速くなったりしますが大抵は焼け石に水という感じでしょう。
クエリによりwhere節でデータを絞り込んで該当件数に対して一括処理していく方法が
取れないものか、考え直してみましょう～
いやこれはどうしようもないんですよ、、、って思われるかもしれませんが
本処理の前に前処理や後処理を加えても良いのですから、考え方を変えるつもりで。
ガンガレ
618:NAME IS NULL
08/05/05 15:18:06
where節というのは知りませんでした
なんか速くなりそうですね！ありがとうございます
619:NAME IS NULL
08/05/05 18:33:20
やりたい事によっては使えないかもだけど
UPDATE ステートメント、更新クエリもチェックしてみたら？
それと、どれくらい遅いか客観的に分かるデータ＝
レコード数、処理時間、おおまかなマシンスペックは
有った方が回答を得やすいんじゃないかな
>>617 さんの回答で解決したならいいんだけど
620:NAME IS NULL
08/05/05 19:16:21
すいません。まだwhereも試してないのですが
スペックはpentiumD 2.80GHtz メモリ512MB
レコード数はおよそ2000万くらいで、条件式が6000あってそれを順に代入していく感じです
試しに条件式を一つだけにしてみたら10分くらいかかったので、たぶん40日くらい掛かる計算でした
621:NAME IS NULL
08/05/05 21:21:14
質問の内容から察するに当の本人の力量はレコード数2000くらいのDBを扱うのが
一杯一杯ぽいけど・・・ なんという無茶な
622:NAME IS NULL
08/05/05 21:47:03 vthO5f4T
>>620
2000万件 条件6000！
学生さんで、実験データか何かかしらね
Access でやる範囲を超えてると思いますよ
2000万件もあると、Access で入力や変更してないでしょ？
データを出力するプログラムがあるなら、これを変更してしまうとか
データがファイルで有るなら、Access に入れずに
直接読み書きするプログラムを書いた方がいいですよ キット
623:NAME IS NULL
08/05/05 22:34:39
まずテーブルに[不一致]フィールドをYes/No型で追加して
インデックスを作成しておいて…
次のクエリを6000回繰り返す。
UPDATE テーブル名 SET [不一致]=True
WHERE ([不一致]=False) AND (条件nに該当しないもの)
※繰り返す際、条件nがなるべく厳しいものから実行する。
極端な話、1回目のクエリで2000万件が1件に絞られる可能性もある。
最後に[不一致]=Falseのレコードに対して必要な修正を行う。
※この方法なら40日はかからないはず…1～2日ジャマイカ？
と条件の内容も知らないオレが無責任に言ってみるｗ
624:616
08/05/06 04:39:22
>>621
ここまで時間が掛かるものだと思わなかったもので…
>>622
そうです。アクセスで入出力はしてません。フリーのデータ取得ソフトを使って、そのソフトがMDBで出力してます。
プログラミングはよく分からないので…
>>623
やや違う形ですが、参考にさせてもらって速度が上がりました。ありがとうございます。
まだ結構日にちが掛かりそうですけど、これでやってみます。皆さんありがとうございました。
625:NAME IS NULL
08/05/06 06:39:34
>>623 さんをちょっと変形するともうちょい速くなるんじゃないかな
WHERE の条件に、自作関数を指定出来るから
そこで複数条件を一度にチェックすれば
繰り返し回数(6000)を少なく出来る
こんな感じ 気が向いたらお試しを
WHERE ([不一致]=False) AND ((check_val([フィールド１],[フィールド２],[フィールド３]))=True)
Function check_val(fld1 As Variant, fld2 As Variant, fld3 As Variant) As Boolean
(fld1 = 1 And fld2 = 2 And fld3 = "OK") Then
check_val = True
Else
check_val = False
End If
End Function
626:616
08/05/06 09:38:29
>>623さんのでやったら3時間ちょいで処理がおわっちゃいました。
あっけなさ過ぎて笑ってしまった。616のでやったときは4日動かしても1/3の位置にあるレコードさえ更新されなかったのに。
最初のコードがいかに効率が悪かったかってことですね。ありがとうございました。
627:623
08/05/06 16:05:44
良かった、良かった。
Accessに限ったことではないけれど
・WHERE句で絞り込めるならWHERE句を使う
（→処理対象となるレコードを絞り込む）
・WHERE句で絞り込む場合はインデックスを持たせる
（→絞り込み速度が向上する）
というのが今回みたいに総レコード数が多い場合には
効果が現れやすいってことで。
628:NAME IS NULL
08/05/06 22:05:24 sxz7Jblq
失礼します。あほなアクセス初心者ですが、質問させてください。
別に入力した数字と５ケタの数字を組み合わせた識別番号を表示させていきたいのですが、
５ケタの数字はオートナンバーのような形式で自動的に表示させることはできないでしょうか。
そしてできれば別入力の数字ごとに、それぞれ番号が順番に出てくるようにしたいのです。
例えば、１件目に『28413』と入力したら『2841300001』、
２件目に『59647』と入力したら『5964700001』
３件目に『28413』と入力したら『2841300002』という感じです。
うまく説明できなくてすみません。
629:NAME IS NULL
08/05/06 22:09:00
できますよ
630:NAME IS NULL
08/05/06 22:19:53 sxz7Jblq
そういうのもできるんですね！
かなり難しそうな気もしますが、やり方を教えていただけないでしょうか。
631:NAME IS NULL
08/05/06 22:22:45
入力値でselectして件数数えたら良いんジャマイカ
632:NAME IS NULL
08/05/06 22:43:27
>>631
それだと削除されたりすると番号が重複するかもしれないよ。
この程度ならDmaxあたりでいいんじゃないか?
削除等により番号抜けが生じ、それが許せないというのなら
もう一工夫必要だが。
633:NAME IS NULL
08/05/06 23:16:19
＞＞という感じです。
てくらいだからいいんじゃね？
634:NAME IS NULL
08/05/06 23:29:34 sxz7Jblq
>631
>632
アドバイスありがとうございます。
だんだんわけわからなくなってきて、へこんでたのですが
やる気出てきました^^
635:NAME IS NULL
08/05/07 10:54:31
サブフォームに表示するレコードが無い場合のイベントを拾いたいのですが
どのようにしたらよいのでしょうか？
はじめはCurrentRecord=0で判断しようとしたのですが、
レコードが無い場合でも1になるときがあるようで、
うまいこと動作してくれません。
636:NAME IS NULL
08/05/07 16:50:46
>>635
開く時イベント辺りでrecordcount拾った見ては?
Dcountでもいいかもしれない。
637:NAME IS NULL
08/05/08 09:45:53
>>636
レスありがとうございます。
結局要所要所で、サブフォームのRecordSourceに突っ込んだ
SQLと同じものをRecordsetで開いてRecordCountみることで解決してましたが
全部Dcountで置き換えられそうです。
638:NAME IS NULL
08/05/09 00:52:19
.RecordCountの値は.MoveLastしないと信用できない。
でも最初から.EOFだった場合に.MoveLastするとエラーになる。
.RecordCountを気軽に紹介している入門書の類は多いけど
上記の点まできちんと言及してるものは見たことないな・・・
639:NAME IS NULL
08/05/09 10:39:25
>>638
信用できないってどういうこと？
接続先のDBの種類によってRecordCountが取得できないこともあるけど、
取得できるなら間違った数は返さないんじゃない？
640:NAME IS NULL
08/05/09 11:49:32
.RecordCountはカーソルまたはキーセットの状態によって
返す値が変わってくるはず。信用ならないってわけじゃないと思う。
これがわからないで結構悩んだことがある。
-----以下MSDNからコピペ
レコード数を算定できるかどうかには、Recordset オブジェクトのカーソルの種類が
関係します。RecordCount プロパティは、前方スクロール タイプのカーソルの場合
は -1 を返し、静的カーソルまたはキーセット カーソルの場合は実際の数を返し、
動的カーソルの場合はデータ ソースに応じて -1 または実際の数を返します。
------
641:NAME IS NULL
08/05/09 13:07:50
638ではないけれど、
本来ADOはデータソースの種類を意識することなく
同じコードで動作することを目標としてたはず。
その意味でRecordCountプロパティを使うことは避けた方が
望ましいと思うのだけれど。
少なくとも自分は積極的には使う気がしない。
642:NAME IS NULL
08/05/09 13:23:30
>>641
では、レコード数をカウントしたいときに代わりに何を使っているのでしょうか？
１レコードずつループしてカウント？
643:641
08/05/09 14:08:28
SELECT Count(主キー) FROM テーブル WHERE ～ で
素直にクエリ句を投げてます。
Recordsetの操作は、静的カーソルやキーセットより
前方スクロールの方が圧倒的に処理速度が速いので
もっぱら前方スクロールで開いているのも理由の１つ。
>>640にあるように.Recordcountが使えません。
ましてや.MoveLastメソッドなんかはレコード数が
多くなればなるほど遅くて使い物になりませんし・・・
DCountを使う手もあるのですが、DLookupのバグで
痛い目を見てからは使っていません。
644:NAME IS NULL
08/05/09 15:58:37
DLookupのバグって何？
645:641
08/05/09 17:34:25
Access2000だったと記憶していますが、DLookupで文字列フィールドを取得する際に
取得した文字列が途中で途切れてしまう症状があったのです。（再現性あり）
意外とMSが提供する関数にはこの手の見えない制約？バグ？があったりするので
油断ならんなぁ・・・という感じですよｗ
646:NAME IS NULL
08/05/12 16:35:37
ここって初心者が質問してもおｋ？
647:NAME IS NULL
08/05/12 18:21:16
>>646
別に問題はない。
言っておくが、参考本すら読んだことのないやつは
初心者とは言わない。
648:NAME IS NULL
08/05/12 20:47:57
エロ本すら読んだことのないやつは
童貞とは言わない。
649:NAME IS NULL
08/05/12 23:42:54
歴戦の勇士が昔の自分に答えてやっている感じがする
650:NAME IS NULL
08/05/13 00:40:50
そんなに変なこと書いたかなぁ。
話しが通じるだけの最低限の知識は
必要だと言いたかったのだが。
651:NAME IS NULL
08/05/13 13:37:53
レベルは低いが多少のエスパー能力ならあるから心配するな
652:NAME IS NULL
08/05/28 20:28:01
>>645
そうだね
リストの要素が65535個までだったりｗ
少なくとも自分は積極的には使う気がしない
653:NAME IS NULL
08/06/01 01:16:09
使ってみないと挙動が分からないのばかり
654:NAME IS NULL
08/06/01 08:08:42
Accessってスキルとして認められますか？
655:NAME IS NULL
08/06/01 10:01:17
認めざるを得ないスキルを見せつけてる
656:NAME IS NULL
08/06/01 10:19:18
認められると思うよ
657:NAME IS NULL
08/06/01 15:53:13
>>654
マジレスすると
「お前がACCESSで何が出来るか」
に掛かってるだろ。
658:NAME IS NULL
08/06/01 15:57:46
現場によるけどな。
659:NAME IS NULL
08/06/01 19:43:19
職場になにかとaccess使うやつ(上司)がいるが
わりと出来るやつということになってる
だが、嫌い俺は
勉強して抜いてやる
660:NAME IS NULL
08/06/01 22:20:39
部下が使えるようになり上司も喜ぶ事だろう
がんばりたまえ
661:NAME IS NULL
08/06/02 23:53:28
Access使える香具師よりもExcel使える香具師の方が価値が高いと思うこのごろ
662:NAME IS NULL
08/06/03 02:24:29
Excel使える香具師よりも日本語使える香具師の方が価値が高いと思うこのごろ
663:NAME IS NULL
08/06/03 20:19:37
Accessだけ使えるのも珍しいだろ
664:NAME IS NULL
08/06/03 20:25:57
Accessだけ使えるやつなんて信用しない。なぜならば本当に
Accessがどのようなものかを知っている人間はAccessを
使わないからだ！
665:NAME IS NULL
08/06/03 20:26:52
>>664
ﾜﾛﾀ
666:NAME IS NULL
08/06/03 22:33:06
なこと言っても、Excelとの親和性を考えたらAccess以上の物ないし
667:NAME IS NULL
08/06/04 10:54:47
Excelとの親和性なら桐のほうが高いと思うけどなあ？
668:NAME IS NULL
08/06/04 11:21:01 dxyYnNU/
>>667
わしも、そーおもう
669:NAME IS NULL
08/06/04 20:45:33
初歩の初歩を聞いてスマンコだけど、100万レコードとかって耐えられる？（個人的な使用だけど）
670:NAME IS NULL
08/06/04 21:04:24
個人的な使用なら糞遅くてもいいだろ。だから耐えられる。
671:NAME IS NULL
08/06/04 21:59:17
百万レコード単位になると、
一時テーブルを作った時とかに2ギガ制限に引っかかることがある。
あと大量データの時だけ発生するエラーが結構あった気がする。
でも気を遣えば大丈夫。
672:NAME IS NULL
08/06/04 22:10:51
全レコードに1メガの画像データ埋め込んだら100万どころか2000レコードでも限界だよ
673:NAME IS NULL
08/06/04 22:13:41
レコードに画像を埋め込むのってどういう用途なんだ？
想像できん…
674:NAME IS NULL
08/06/04 22:24:15
お手本中のお手本であるNorthWind.mdbからして
商品の写真をマスターテーブルに埋め込んでなかったっけ・・・？
675:669
08/06/04 23:04:51
レス、thxです。株価データを貯めこもうかと考えてる最中でして、そんなに増やそうとは思ってないんだけど、
年度単位とかに分けて作っておいた方が良いかな。
ま、ちょぼちょぼと作っていきますw
676:NAME IS NULL
08/06/04 23:07:14
年度単位じゃ株価データの意味ないと思うぞ
銘柄単位とかセクター単位とか
677:NAME IS NULL
08/06/04 23:17:41
株価データなら、MDBで600万件（700ＭＢほど）管理してるけど、全然平気。
2ＧＢ超えるようなら、対策考えるけどね。
678:NAME IS NULL
08/06/04 23:48:17
対策って何よ
679:NAME IS NULL
08/06/05 05:48:29
MDBなら年度ごとにテーブル分けてても
リンクテーブルにしてUNIONかければ対応可能だろ
680:NAME IS NULL
08/06/06 09:57:39
UNIONかけたら2GB超えても大丈夫なん？
681:NAME IS NULL
08/06/06 10:12:16
>>680
ﾑﾘﾎﾟ
682:NAME IS NULL
08/06/06 19:55:44
それぞれのmdbが2G超えなければ合計2G以上も行けるって事だべ
683:NAME IS NULL
08/06/06 19:59:34
2007でも2GB制限あるの？
684:NAME IS NULL
08/06/06 20:07:20
うん
685:NAME IS NULL
08/06/06 20:08:49
mdbじゃなくてtblだけどな
686:NAME IS NULL
08/06/06 20:11:05
？
687:NAME IS NULL
08/06/06 20:13:55
データベースの仕様
次の表は、Microsoft Office Access 2007 データベース特有の仕様の一覧です。
全般
属性 最大値
Access データベース (.accdb) ファイルのサイズ 2 GB からシステム オブジェクトに必要な領域のサイズを引いた値
データベースのオブジェクトの数 32,768
"HasModule/レコード保持" プロパティが [はい] に設定されたフォームおよびレポートを含むモジュールの数 1,000
オブジェクト名の文字数 64
パスワードの文字数 20
ユーザー名やグループ名の文字数 20
データベースを同時に使用できるユーザーの数 255
688:NAME IS NULL
08/06/09 16:45:27
public変数を使ったアプリの挙動がおかしかったので、調べてみたら
[VBA] Public 宣言された変数の有効期間
URLﾘﾝｸ(support.microsoft.com)
publicの意味ないじゃんｗ
これって使うなってことだよな
689:NAME IS NULL
08/06/09 17:32:47
消えてほしくないなら、ふつうSetProp使うのが常識だろ。
オブジェクト型とかは無理だけど。
690:NAME IS NULL
08/06/09 20:01:44
でもVBAじゃグローバル変数使わざるをえないケースが多々あるわけで
691:NAME IS NULL
08/06/09 20:27:01
解決方法にアクセスの場合の記載が無い w
どっかテーブルにでも保存すっか？ ww
692:NAME IS NULL
08/06/09 20:58:44
本当に消えて困るのは、グローバル変数の代わりに標準モジュールにプロパティ作っとく。
プロパティの中で、退避しておいた値をGetPropやDLookupで復元する。
これVBAの基本テクニック（入門書に載ってるかどうかは知らない）。
ただ、KBに載ってるケース（エラートラップしないとか、動的にモジュール作成とか）に
該当してるなら、そういうことする必要性自体が自分にはピンと来ないな。
なんでそういう危ない橋を好んで渡るかね。
693:NAME IS NULL
08/06/09 21:39:04
2007でTempVarsが使える俺は勝ち組！
694:NAME IS NULL
08/06/09 21:42:58
漏れも漏れも、2007でTempVars使ってる勝ち組、変数スコープがマトモな桐も使ってる勝ち組
695:NAME IS NULL
08/06/10 00:53:30
人柱乙(－人－)
696:NAME IS NULL
08/06/10 08:44:13
>>691
おいらは不可視のテキストボックスつくって対応
配列とか対応できないけど、
697:NAME IS NULL
08/06/10 09:04:47
消えて困る変数はMDBにつっこんどけｗｗｗ
698:NAME IS NULL
08/06/10 15:08:42 F+HVGTFM
ざっくりした質問ですいません
メインフォームの顧客IDとサブフォームの顧客IDでリレーション（1対１）してるのに
サブフォームが何枚も更新できるのってなぜでしょうか？
１IDに対し、サブフォームの情報は1枚しか必要ないのに、新しいフォームが
増えていくのが困ります。
699:NAME IS NULL
08/06/10 15:19:20
>>698
URLﾘﾝｸ(blogs.msdn.com)