[過去ﾛｸﾞ]
Access VBA 質問スレ Part1 (1002ﾚｽ)
Access VBA 質問スレ Part1 http://mevius.5ch.net/test/read.cgi/tech/1328536426/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
781: デフォルトの名無しさん [sage] 2017/07/26(水) 07:07:59.14 ID:wP3Z6w42 名寄せマスター 名寄せＩＤ 会社ID 新会社ID 1 2 2 1 4 2 名寄せマスターと職員テーブルをJOINしてUPDATE というのはどうですか？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/781
782: デフォルトの名無しさん [sage] 2017/07/26(水) 07:12:28.72 ID:XR9PfPcp その会社マスターがおかしいのを放置するのか修正するのかで違ってくるよね http://mevius.5ch.net/test/read.cgi/tech/1328536426/782
783: デフォルトの名無しさん [sage] 2017/07/26(水) 16:42:27.76 ID:Pvb1ow9Q 合併したんかね http://mevius.5ch.net/test/read.cgi/tech/1328536426/783
784: デフォルトの名無しさん [] 2017/07/27(木) 20:31:02.25 ID:6NlFfxVd >>781 なるほど 重複クエリに各会社の最小IDを連結して名寄せテーブルを作成し JOINしてUPDATEしました 名寄せテーブルを作成しないでクエリだけでUPDATEまでもっていくのは この場合駄目なんですね はじめ理解できず悩みました >>784 JOINしたAccessのデータをExcelに吐き出し各職場に配布、各々で修正追加。 一年以上たって回収しAccessに貼り付けられて今の状態です。 正確には職員テーブルじゃなくて顧客テーブルですね http://mevius.5ch.net/test/read
.cgi/tech/1328536426/784
785: デフォルトの名無しさん [sage] 2017/07/27(木) 20:40:42.96 ID:DKmshiqQ なあんだ、Excelの段階で調整しちゃえば余計な苦労しなくて済んだのに http://mevius.5ch.net/test/read.cgi/tech/1328536426/785
786: デフォルトの名無しさん [sage] 2017/08/01(火) 21:53:22.72 ID:FQn2qD+M 初心者なんで教えて欲しいんだけど、フォームの次へボタン押した時に次のレコードが 表示されないのだがどうしたらいいか教えて欲しい。バージョンは2013 Private Sub Form_Load() Dim db As DAO.Database Dim rs As DAO.Recordset Set db = CurrentDb() Set rs = db.OpenRecordset("名簿テーブル",dbOpenTable) Me!名前テキスト = rs!名前 Me!カナテキスト = rs!よみがな End Sub Private Sub 次へボタン_Click() DoCmd.GoToRecord , , acNext End Sub http:
//mevius.5ch.net/test/read.cgi/tech/1328536426/786
787: デフォルトの名無しさん [sage] 2017/08/01(火) 22:21:37.22 ID:16hy4odR フォームのソースが名簿テーブルならフォーム読み込み時の名前とよみがなセットするコードは無くても先頭レコードが表示される。 フォームのソースを確認しましょう。 非連結フォームならボタン押した時に次のレコードを読み込んで名前とよみがなセットするコードが必要だけど、キーが不明なので何ともアドバイスできません。 長々と書いたがわかりにくいね、すまん。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/787
788: デフォルトの名無しさん [sage] 2017/08/02(水) 22:57:21.98 ID:GleVclNw >>787 ありがと http://mevius.5ch.net/test/read.cgi/tech/1328536426/788
789: デフォルトの名無しさん [] 2017/08/28(月) 11:23:53.36 ID:XLKoN0Ik 神さま教えてください。 ADODB.Commandでのインサートが失敗しても エラーが出ないのですが、エラーハンドリングの 方法を教えてください。 よろしくお願いします。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/789
790: デフォルトの名無しさん [sage] 2017/08/28(月) 21:14:51.01 ID:6Oo2q0tu on error http://mevius.5ch.net/test/read.cgi/tech/1328536426/790
791: デフォルトの名無しさん [sage] 2017/08/29(火) 08:37:26.00 ID:SOL0jppX むしろonerrorしかないと思うが、他にやり方あんの？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/791
792: デフォルトの名無しさん [] 2017/08/29(火) 09:14:08.50 ID:WIE1SoZ9 レスありがとうございます。 ON ERROR は当然やってまして その上での質問です。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/792
793: デフォルトの名無しさん [] 2017/08/29(火) 21:25:59.80 ID:BqQa7G9t 失敗ってなんだ。 戻り値を取ればAffectedRowsになってるだろうから それで判断するか追加されたはずの行数をあらためSELECTするとか http://mevius.5ch.net/test/read.cgi/tech/1328536426/793
794: デフォルトの名無しさん [sage] 2017/11/15(水) 11:14:08.03 ID:PQCfnSyv >>786 そのコードはFormがLoadされた時に名簿テーブルを開いてRecordsetに格納し、名前とカナをテキストボックスに入れるというものと次へボタンを押した時にFormがLoadされた時の処理とは全く関係なく次のレコ−ドに移動するもの。 ところで次へボタンでの次のレコ−ドってのは何のデ−タなんだい? 改めて言うけどFormがLoadされた時の処理なんて知らないからとAccess君は言っている。 要は、DoCmd.GotoRecordってのはデータとオブジェクトが
連結されていることが想定されていて、連結されているから既にオブジェクトにレコードが表示されているわけだが、それに対して次のレコ−ドと言ってる。 一方、FormのLoad時の処理は連結関係無くデ−タを自ら取ってくるもの。 こちらのやり方を取るならRecordsetをPublic変数にするかForm内でのPrivate変数として保持しておき、他のイベント(次へボタンクリックのような)で使いまわすというやり方になる。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/794
795: デフォルトの名無しさん [sage] 2017/11/22(水) 10:10:39.42 ID:as8vu/t7 整数型､重複なしの列を書き換えるときはどうしてますか？たとえば､ 2 1 3 → 2 1 3 にしたいときに2→1の時点でエラーが出ると思うので回避策を検討しています。 一時的に重複なしを解除して､終了時点で重複なしへ戻す方法や､一旦一時的に重複しない数字に書き換えて､それから再度書き換えるべきか悩んでいます。 なにか一般的な方法はございますか？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/795
796: デフォルトの名無しさん [sage] 2017/11/22(水) 10:11:55.37 ID:as8vu/t7 あれ､スペースがおかしくなっている。 列を書き直すときにたとえば 2→1 3→2 1→3 としたいのです。具体的にはidを振り直す作業です。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/796
797: デフォルトの名無しさん [sage] 2017/11/22(水) 12:23:57.98 ID:TDbCG25M レンジのソートでよくね？ もしくはフィルタ付けて並び替えてからフィルタ解除とか http://mevius.5ch.net/test/read.cgi/tech/1328536426/797
798: デフォルトの名無しさん [sage] 2017/11/22(水) 12:27:01.49 ID:taN4cymO idには触らないで、整数型のフィールドを追加します。そのフィールドでやりたい放題やります。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/798
799: あ [sage] 2017/11/22(水) 12:46:48.77 ID:MjBhGus4 どうしてもやりたけりゃ、swapしていきゃいいんじゃないの？ 最初は2→1にしたいから、 1 3 2に。 次は3を2にして 1 2 3 に。 入れ替え自体は、UPDATE xxx SET unique = CASE WNEN unique=1 THEN 2 WHEN unique=2 THEN 1 ELSE unique END でCASEで書いちゃえば入れ替えられる。 1クエリ内で完結したら、制約はかからない。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/799
800: デフォルトの名無しさん [sage] 2017/11/22(水) 13:21:54.54 ID:as8vu/t7 >>797 済みません。AccessにもRangeというのがあるのですか？あと､フィルターの使い方も御教示をお願い致します。 >>798 それが､当該idを参照しているテーブルが20個以上あるので､別のコラムという訳にはいかないのです。 参照先を変更するとなるとクエリやらVBAのコードやらを書き換えないといけないので大変だと思います。 >>799 バブルソートみたいなものですね。レコード数が3万ありますので､何となく時間がかかりそうな気がしますが､試してみます
。 今はソート後にDMax+iのループで重複しないidへ書き換えて､書き換えが終わってからDMaxを引くという2段階の作業をしています。 (参照元のidも2段階の書き換えをしています。)) 我ながらドン臭いやり方だと思うので､もう少しスマートな方法があれば御教示をお願いいたします。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/800
801: デフォルトの名無しさん [sage] 2017/11/22(水) 15:00:03.20 ID:t4MJ2LxN その列自体を書き換えちゃうの? じゃあ、今入ってる値は必要無いってこと? だったら削除して連番振り直したら? http://mevius.5ch.net/test/read.cgi/tech/1328536426/801
802: デフォルトの名無しさん [] 2017/11/22(水) 15:02:12.97 ID:TZAtmSaI 今の時代なにが楽しくてAccessなんてやるんだ http://mevius.5ch.net/test/read.cgi/tech/1328536426/802
803: デフォルトの名無しさん [sage] 2017/11/22(水) 15:50:01.09 ID:as8vu/t7 >>801 idだから主キーです。Nullは不可だと思います。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/803
804: あ [sage] 2017/11/22(水) 16:48:33.62 ID:QspO8Ati >>800 もう組み合わせがわかってて、ほんとに単発で1回きりなら、 エクセルで対比表作って、CASEの列とWHENの列足してコピペでクエリ作っても良いけど、全く健全な保守ではない。 2 1 3 2 1 3 に列追加してオートフィルで WHEN unique= 2 then 1 WHEN unique= 3 then 2 WHEN unique= 1 then 3 ってして、 unique= CASE と ELSE UNIQUE endで挟んで、コピペでテキストエディタに貼り付けて、テキストエディタからコピペでAccessに貼り付けるやつ。 しょっちゅうやるならテ
ーブル見直そう。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/804
805: デフォルトの名無しさん [sage] 2017/11/22(水) 16:57:08.62 ID:QHiNhW2y >>803 方法はいくらでもあると思うけど。 Field追加して連番を振って、追加したFieldを主キーに変更して元の主キーのFieldを削除するとか。 試してないからできるか分からんけど。 そんなことせずに振りなおすならOrderByでId順にして小さい値から振りなおしたら? http://mevius.5ch.net/test/read.cgi/tech/1328536426/805
806: デフォルトの名無しさん [sage] 2017/11/22(水) 16:59:54.83 ID:QHiNhW2y ただ、主キーを振りなおす意味が分からない。 そういうもんじゃ無いと思うし、テーブルの連結によっては滅茶苦茶になるのは分かってるよね。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/806
807: あ [sage] 2017/11/22(水) 17:57:43.64 ID:QspO8Ati 主キー振り直すのは、やむを得ずやるのはそのアプリのライフタイムに何発かあると思う。 業務系だと、「スキーマ変えるな」「デカいトランザクションはるな」「一時テーブルすら作るな」とか無茶苦茶言いよることもある。 でも、しょっちゅうやるならホントに設計考えたほうが良い。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/807
808: デフォルトの名無しさん [sage] 2017/11/22(水) 18:29:23.78 ID:2YVJuPMl 別に列作ってそっち主キーにすれば？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/808
809: デフォルトの名無しさん [sage] 2017/11/22(水) 23:10:16.27 ID:as8vu/t7 >>805 >>そんなことせずに振りなおすならOrderByでId順にして小さい値から振りなおしたら? そんなことが出来るのですか？DAOもADOも1行ずつしかupdate出来ないから､重複データーが発生してしまって出来ないのですが… >>806 ワークテーブルまで含めて数えなおしたら､35個のテーブルで件のidを使用していました。なので35個のテーブルに対して変更を行わないといけませんね。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/809
810: デフォルトの名無しさん [sage] 2017/11/22(水) 23:11:54.97 ID:as8vu/t7 >>808 それで解決するなら簡単ですね。やってみたいですね。 元の列の属性がすべて引き継がれるならいいですね。試してみます。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/810
811: デフォルトの名無しさん [sage] 2017/11/23(木) 09:57:12.17 ID:wkO+ZdSN 主キーの役割はレコードをユニークにすることだろ 並べ替えが必要ならそのための項目を別に用意するわ 作業量を問題にしてるけど 無茶な運用は後に響くよ 分かり易さを優先すべきだと思うわ http://mevius.5ch.net/test/read.cgi/tech/1328536426/811
812: デフォルトの名無しさん [sage] 2017/11/24(金) 12:10:31.02 ID:fRZqdK5G 主キーを解除して､重複可にして連番を書き込みました。その後に元に戻しました。変更前後の番号を配列に書き込んでおいて､その配列の値から関連するテーブル全部において置換作業を行うことにしました。 idが2万5000レコード､関連するテーブルのレコードが全部で100万近いのですが､2万5000の置換を100万レコードに対して行うので時間がかかりそうな気がしています。どのくらい時間がかかるのか計算する方法がありますかね？ http://mevius.5ch.net/test/read.cgi/tech/1
328536426/812
813: デフォルトの名無しさん [sage] 2017/11/24(金) 12:21:50.25 ID:Q2HEJk5l accessにSQLコストを計算する機能はないよ http://mevius.5ch.net/test/read.cgi/tech/1328536426/813
814: デフォルトの名無しさん [sage] 2017/11/24(金) 19:17:11.31 ID:fRZqdK5G 主キーの削除をVBAでやろうとしているんだけど､メソッドが見つからない。SQLでやるしかないのかな？ 下を読むとdeleteメソッドはダメみたいだし。 https://msdn.microsoft.com/ja-jp/library/office/ff197351.aspx >>Deleteメソッドは、インデックスオブジェクトが新しいと、データベースに追加されていない場合にのみサポートします。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/814
815: デフォルトの名無しさん [sage] 2017/11/25(土) 10:30:03.03 ID:eU9hnSW+ 無理矢理面倒臭い事をしているようにしか思えない まぁ人の話を聞く気が無いみたいだし 好きに調べてやればええよ http://mevius.5ch.net/test/read.cgi/tech/1328536426/815
816: デフォルトの名無しさん [sage] 2017/11/27(月) 17:21:43.17 ID:twASlFZz SQLであっさり出来たわ。後は置換をどうするかだな。関連するテーブル全部を置換できればすべて解決するけど､何を使うかだな。 SQLは遅いんだっけ？レコードセットでループ回す方が速いと読んだ気がする。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/816
817: デフォルトの名無しさん [sage] 2017/11/27(月) 22:26:05.40 ID:HF1f2kGW >>816 普通に考えればSQLの方が速いに決まってると思ってたが。 遅いとしたらその文書いた奴が悪いという印象。 ま、DB系については大したレベルにないから俺が間違ってるかも。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/817
818: デフォルトの名無しさん [sage] 2017/11/28(火) 05:38:20.27 ID:GeGdCCsE 業務用ソフトのテーブルを眺めていたら､テキスト型のフィールドがあって､256桁の数字が羅列してあった 様々な設定を指定された桁に格納しているようですが､このようなデーター保存方法は一般的なんでしょうか？ 他の言語でもあるのでしょうか？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/818
819: デフォルトの名無しさん [sage] 2017/11/28(火) 05:58:01.76 ID:Brt1t867 >>818 あるんじゃないの?としか。どんなテーブルとか、フィールドの名前とか、なんかヒントはないですか？ 様々な設定も謎が深まるだけですね。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/819
820: デフォルトの名無しさん [sage] 2017/11/28(火) 09:43:49.19 ID:GeGdCCsE たとえばあるフォームAのオプションボタンの値を98桁に書き込む､フォームBのチェックボックスの値は例えばCstr(Abs(True)))でstringへ変換して105桁に書き込むとかそんな感じです。 合理的な気もするのですが､こういう方法は検索しても見つからないので一般的なのか､特殊なアイデアなのか知りたくなりまして。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/820
821: デフォルトの名無しさん [sage] 2017/11/28(火) 11:59:57.14 ID:vHFzkUKA すくなくともRDBを使う上ではやるなって言われてるやり方 固定長ファイルにデータ保存してるようなシステムなら結構あったけどね http://mevius.5ch.net/test/read.cgi/tech/1328536426/821
822: デフォルトの名無しさん [sage] 2017/11/28(火) 16:08:53.51 ID:GeGdCCsE >>821 そうなんですか。面白そうな話しなので調べてみようと思います。その手法はどういう名称なんですか？もしくは検索ワードを御教示頂けましたら幸いです。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/822
823: あ [sage] 2017/11/28(火) 18:29:06.23 ID:i1R8M5pm RPG区分列とかじゃないの？古い呼び方だけど。 酷すぎてだれも触りたくないやつ。 RDBに移すような事があったら、末期には照合順序をbinaryにするしか無くなったりすごく苦しむから辞めた方がいい。 メリットらしいメリット無い。LIKEで雑に'[A-C]__1_2'みたいにSELECTできることぐらい。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/823
824: デフォルトの名無しさん [sage] 2017/11/28(火) 18:44:14.15 ID:GeGdCCsE 残念ながら､ググっても何もヒットしません。 なにかヒントをお願い出来ますか？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/824
825: デフォルトの名無しさん [sage] 2017/12/01(金) 16:18:17.01 ID:xc+Vk5Dr RPGとRDBで検索したら関係ありそうなのがいくつかヒットしたけど。 検索能力は俺の方が上みたいだな。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/825
826: デフォルトの名無しさん [sage] 2017/12/02(土) 14:50:26.76 ID:EvURnJTn 固定長ファイルでぐぐったら、先頭に固定長データファイルとはっていうサイトがでたけど なにでどうググったんだか http://mevius.5ch.net/test/read.cgi/tech/1328536426/826
827: デフォルトの名無しさん [sage] 2017/12/04(月) 10:19:55.17 ID:eu/J6Nzp 皆様､御指導､御鞭撻ありがとうございます。 COBOLでよく使う手法だったんですね。 件のmdbはコボラーが設計したんですかね。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/827
828: デフォルトの名無しさん [sage] 2017/12/04(月) 23:04:21.85 ID:HIES1UEg 言語の問題じゃ無いと思うが http://mevius.5ch.net/test/read.cgi/tech/1328536426/828
829: デフォルトの名無しさん [sage] 2017/12/05(火) 01:17:27.21 ID:jk/z017d そうなんですか。accessの本には全く載っていないでのすが､RDBMSの世界ではごく一般的な手法なんですか http://mevius.5ch.net/test/read.cgi/tech/1328536426/829
830: デフォルトの名無しさん [] 2017/12/05(火) 13:50:48.83 ID:JFWc1rHJ ISAM http://mevius.5ch.net/test/read.cgi/tech/1328536426/830
831: デフォルトの名無しさん [sage] 2017/12/05(火) 14:44:30.03 ID:LtpZx+mu >>829 >>821 http://mevius.5ch.net/test/read.cgi/tech/1328536426/831
832: デフォルトの名無しさん [sage] 2017/12/05(火) 16:01:26.32 ID:jk/z017d 言語の問題ではない しかしRDBMSではやってはいけない よくわからないけど昔のデーターベースの本を読んでみますわ 暇つぶしにちょうどいいわ http://mevius.5ch.net/test/read.cgi/tech/1328536426/832
833: デフォルトの名無しさん [sage] 2017/12/05(火) 17:17:16.01 ID:Jckjy/ZT 自分たちが使うデータをどういった構造で保持するかは各自で考えて構わない ただRDBに入れるのであれば、やってはいけなくもないけど、おすすめはしない、という話では？ RDBならテーブル・フィールド分けてデータもコードも見やすくできるのに、そうしないのはもったいないというかなんというか http://mevius.5ch.net/test/read.cgi/tech/1328536426/833
834: デフォルトの名無しさん [sage] 2017/12/05(火) 19:05:27.76 ID:IwqbiEq4 結局何の解答にもなってないw http://mevius.5ch.net/test/read.cgi/tech/1328536426/834
835: 名無し [sage] 2017/12/06(水) 08:23:07.59 ID:qK37T0GP データベースの列が増やせない何かがあった。 開発者の気まぐれ。手抜き。 従来の固定長ファイルと1:1の情報を保持したかった。 とかね。。。 こっちの業界じゃ拡張DM形式なんて固定長ファイルが普通にやり取りされてて、桁数制限とかが厳しいけど、容量の割に情報量が多いし古いソフトの互換性があるとかで100年以上生きると思うわ。 でも固定長ファイルの文字列をmdbに格納するのは正気とは思えない。データベースのメリット全部殺してるじゃん http://mevius.5ch.net/test/read.cgi/t
ech/1328536426/835
836: デフォルトの名無しさん [sage] 2017/12/06(水) 08:50:38.97 ID:3RgxoH/J 固定長レコードw化石乙ww http://mevius.5ch.net/test/read.cgi/tech/1328536426/836
837: デフォルトの名無しさん [sage] 2017/12/06(水) 09:56:13.57 ID:+yD4mhv+ 郵便とのやり取りは今でも固定長フィールド使てんじゃね さすがに今はないか、フロッピーとか http://mevius.5ch.net/test/read.cgi/tech/1328536426/837
838: デフォルトの名無しさん [sage] 2017/12/06(水) 11:12:29.56 ID:dYt4FwS2 未だに固定長を扱う事はありますが、設計済みDBに展開して処理していますよ http://mevius.5ch.net/test/read.cgi/tech/1328536426/838
839: デフォルトの名無しさん [sage] 2017/12/07(木) 05:51:08.35 ID:opi4zWAm 固定長のEDI、増えたりしないだろうけどいつまでも残るんだろなあ。csvやtsvをメール添付で良いのにって思う。 http://mevius.5ch.net/test/read.cgi/tech/1328536426/839
840: デフォルトの名無しさん [sage] 2017/12/07(木) 12:12:58.82 ID:NfkoL/Di 固定長の方がパースが軽いからなぁ あといつまでもなくならないレガシな環境とかな 処理系そのものは変更されてもＩＯ部分の仕様変更はなかなかやらない http://mevius.5ch.net/test/read.cgi/tech/1328536426/840
841: デフォルトの名無しさん [sage] 2017/12/07(木) 12:15:15.31 ID:YN66KLnO 今どき固定長レコードなんて使ってるのに前向きな理由なんて無いよ http://mevius.5ch.net/test/read.cgi/tech/1328536426/841
842: 名無し [sage] 2017/12/07(木) 17:45:46.41 ID:d4TqII+f >>839 同じ拡張子なのに何十種類もバリエーションのある欠陥フォーマットを使うのはやめてくれ http://mevius.5ch.net/test/read.cgi/tech/1328536426/842
843: デフォルトの名無しさん [sage] 2018/02/05(月) 10:45:37.49 ID:e967XxUr アクセス始めて触る初心者です。 テキストボックスが複数含まれたワードファイルが5000個ぐらいあります 各テキストボックスからいろんな項目を取得するとして、1ファイルあたり３０項目ぐらい つまり5000個のファイル*３０項目＝15,000項目 これをアクセスで処理していこうと思ってるんですが、アクセスはこの程度さくさく処理できるものでしょうか 目的は、ワードファイルが多すぎて邪魔なんで全部削除したい。必要に応じて元のファイルと同じものを再現できるようにす
るため、必要な情報をアクセスのデータベースに保存しておくことです 必要なファイルを再現できるように検索機能と再現機能をもったVBAマクロを組むつもりです 最初エクセルでやろうとも思ったのですが、さすがに万単位で今後も増える可能性が高いため アクセスかな？と思ったのですが、どうでしょう http://mevius.5ch.net/test/read.cgi/tech/1328536426/843
844: デフォルトの名無しさん [sage] 2018/02/05(月) 13:37:19.07 ID:KJpDTktT >>843 初めて触る様な状態なら無理だから、諦めた方がいいですよ http://mevius.5ch.net/test/read.cgi/tech/1328536426/844
845: デフォルトの名無しさん [sage] 2018/02/05(月) 13:53:17.30 ID:e967XxUr >>844 アクセスは初めてだけどエクセルVBAはそこそこ経験あります エクセルVBAでなら自分で組める範疇ですね すでにアクセスで途中までマクロは組んであります 同一フォルダ内にテスト用に作成してあるワードファイルを順次開いてすべてのテキストボックスの値、位置関連の数値を Debug.Printで出力後、ワードファイルを閉じる ここまでうまくいってるんであとはアクセスの基本機能理解すればそう困難ではないでしょう ざっとみたところ、この用途で使う限りでは
そう複雑なものでもないようですし。 質問の内容はアクセスでやる利益があるかどうかという点ですね まぁ組めばわかるんですけどね http://mevius.5ch.net/test/read.cgi/tech/1328536426/845
846: デフォルトの名無しさん [sage] 2018/02/05(月) 20:59:27.31 ID:+YlQ+DNK >>845 エクセルのテーブルに格納したらアクセスにインポートするのが良いんじゃない？ エクセルのままでも良いと思うけど、 http://mevius.5ch.net/test/read.cgi/tech/1328536426/846
847: デフォルトの名無しさん [sage] 2018/02/06(火) 08:18:15.16 ID:YHjH5DQb >>846 それいいですね やってみます http://mevius.5ch.net/test/read.cgi/tech/1328536426/847
848: デフォルトの名無しさん [sage] 2018/02/06(火) 14:52:40.80 ID:Y79w2nNG 貴乃花親方にしろ有賀さつきにしろ やはり「語らない」ことが年末から今年にかけてのポイントだな 逆に語っている方が何かと物議を醸しているし http://mevius.5ch.net/test/read.cgi/tech/1328536426/848
849: デフォルトの名無しさん [sage] 2018/02/06(火) 14:53:16.21 ID:Y79w2nNG ミスった すまん http://mevius.5ch.net/test/read.cgi/tech/1328536426/849
850: デフォルトの名無しさん [sage] 2018/02/07(水) 11:19:44.29 ID:mhmm9auu 医療過誤？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/850
851: デフォルトの名無しさん [] 2018/04/14(土) 12:06:32.62 ID:bV7+SAsd すみません質問させてください。 Private Sub Form_Load() Me.TimerInterval = 1000 End Sub Sub Form_Timer() Static intShowPicture As Integer If intShowPicture Then Me.btnPicture.Picture = "C:\taiyo.jpg" Else Me!btnPicture.Picture = "" End If intShowPicture = Not intShowPicture End Sub このコードは何をしているのでしょうか？ ご回答よろしくお願いします。 http://mevius.5ch.net/test/
read.cgi/tech/1328536426/851
852: デフォルトの名無しさん [sage] 2018/04/14(土) 12:24:03.37 ID:2RkkR2xg 一秒毎に画像を出したり引っ込めたり http://mevius.5ch.net/test/read.cgi/tech/1328536426/852
853: 853 [sage] 2018/04/14(土) 12:53:27.07 ID:bV7+SAsd ご回答ありがとう御座います。 イメージはなんとなく掴めたのですが、 この場合のintShowPictureには何が格納されているのでしょうか？ もしくはBoolean型なのでしょうか？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/853
854: デフォルトの名無しさん [] 2018/04/14(土) 16:08:38.27 ID:1T8oabCl Static intShowPicture As Boolean にして試してみろよ http://mevius.5ch.net/test/read.cgi/tech/1328536426/854
855: デフォルトの名無しさん [sage] 2018/04/14(土) 19:25:20.18 ID:cGW/rI9o VBAには暗黙の変換ってのがあるから IntegerをBooleanに暗黙的に変換して評価してる まあ、あまり良いコードじゃないな http://mevius.5ch.net/test/read.cgi/tech/1328536426/855
856: 851,853 [sage] 2018/04/14(土) 21:39:02.03 ID:criYFAGW >>852さん 試しに、フォームと画像を用意して作ったら、点滅しました！ >>854さん この文でも点滅しました！ >>855さん Falseが0でTrueが-1なのですね！ ご回答ありがとうございました。 解決しました！ http://mevius.5ch.net/test/read.cgi/tech/1328536426/856
857: デフォルトの名無しさん [] 2018/04/15(日) 10:38:49.74 ID:E1b18XLI >Falseが0でTrueが-1なのですね！ そうだっけ？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/857
858: デフォルトの名無しさん [sage] 2018/04/15(日) 12:40:33.57 ID:VXOW+WoG Access で画像を点滅する？ そんなの普通は、JavaScript, jQuery とかだろ http://mevius.5ch.net/test/read.cgi/tech/1328536426/858
859: デフォルトの名無しさん [sage] 2018/04/15(日) 22:05:01.30 ID:4uH7KTiu ここは Access の質問スレですよ http://mevius.5ch.net/test/read.cgi/tech/1328536426/859
860: デフォルトの名無しさん [] 2018/04/21(土) 00:22:50.08 ID:IpoNn3EX 10万件以上の大量レコードを追加するインサート処理をクエリを作成してDocmd.OpenQueryでやっているが時間が1分以上かかる この処理をモジュールにADO、もしくはDAOでインサート処理を記述したら、Docmd.OpenQueryより早くなるかな？ http://mevius.5ch.net/test/read.cgi/tech/1328536426/860
861: デフォルトの名無しさん [] 2018/04/21(土) 12:05:09.74 ID:M/Q9a6+d VBAで書くと数倍遅くなるんじゃね？ Cからなら速いかも知れん http://mevius.5ch.net/test/read.cgi/tech/1328536426/861
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 141 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.027s