Access VBA 質問スレ Part2 (788レス)
Access VBA 質問スレ Part2 http://mevius.5ch.net/test/read.cgi/tech/1544620479/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
484: デフォルトの名無しさん [sage] 2022/03/07(月) 13:11:37.42 ID:3lxJ/2QX これかな? https://codezine.jp/article/detail/1627 https://codezine.jp/article/detail/1628 https://codezine.jp/article/detail/1629 記事中においてJavaでSQLを生成している部分はVBAで書けるだろうけれど、 他のRDBMSで使えるSQLの全てがAccessでも使えるわけじゃないから その辺をうまく置き換えたりVBAで補ったりする必要はあると思う http://mevius.5ch.net/test/read.cgi/tech/1544620479/484
485: デフォルトの名無しさん [sage] 2022/03/07(月) 14:07:14.74 ID:tjPYNfUL 各DBで使えるSQL構文一覧表 (ROLLUPは jet使えない oracleはokとか) のページが昔あったのに 今見たら見あたらなかったわ http://mevius.5ch.net/test/read.cgi/tech/1544620479/485
486: デフォルトの名無しさん [sage] 2022/03/08(火) 06:28:34.40 ID:fGzXxwFZ 総あたりする場合、SQLはどうやって 候補を管理してるんだろ? ふつうにメモリ上に持ってたら メモリが足りないような http://mevius.5ch.net/test/read.cgi/tech/1544620479/486
487: デフォルトの名無しさん [sage] 2022/03/08(火) 20:13:50.94 ID:fGzXxwFZ 数字の書かれたパネルがあります このパネルのマスをいくつか ぬりつぶし、残った数字の積が、 たて・横のどの列も12になるように してください 2523 6257 5262 2334 これぐらいの規模の問題で 練習したほうがいいかも ぬりつぶしは1に置き換える http://mevius.5ch.net/test/read.cgi/tech/1544620479/487
488: デフォルトの名無しさん [sage] 2022/03/09(水) 11:17:27.88 ID:wDARNtYc 動的SQLっていうから DBエンジンにSQL投げる ↓ その結果を受けて自分を書き換えて 再度新しいSQL投げる ↓ 望む結果になるまで繰り返す みたいな話を期待したら 拍子抜けだった http://mevius.5ch.net/test/read.cgi/tech/1544620479/488
489: デフォルトの名無しさん [sage] 2022/03/10(木) 18:36:45.22 ID:y/Xk/sN2 >>487 SELECT 解答 FROM すべてのあり得る盤面 WHERE 今回の条件 だから まず盤面を1行にして 2523625752622334 と表す すべてのあり得る盤面は 2523625752622334 2523625752622331 2523625752622314 2523625752622311 〜 1111111111111111 だけどこれをどうSQL文の中で 表現すればいいのかわからん http://mevius.5ch.net/test/read.cgi/tech/1544620479/489
490: デフォルトの名無しさん [sage] 2022/03/11(金) 12:30:05.01 ID:+z9vFN5I >>489 >>484の記事を1から読んでこい http://mevius.5ch.net/test/read.cgi/tech/1544620479/490
491: デフォルトの名無しさん [sage] 2022/05/01(日) 00:28:53.70 ID:uZ+uV6s8 VBAのコード内の文字を置換するプログラムをVBAで行うことはできるでしょうか? 置換の組合せが複数あるので一つずつCtrl+Hで操作すると間違いそうなので, 置換前文字列と置換後文字列の配列を書いて,それを順に実行するようにしたいのです. 自分のコード内に当該置換文字列をがでてくるので,その回避も考えないといけないですが よろしくお願いします http://mevius.5ch.net/test/read.cgi/tech/1544620479/491
492: デフォルトの名無しさん [] 2022/05/01(日) 07:29:11.23 ID:1HGTgNe1 >>491 できるよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/492
493: デフォルトの名無しさん [] 2022/05/01(日) 07:36:23.30 ID:1HGTgNe1 ごめん、AccessVBAスレだった 知らん http://mevius.5ch.net/test/read.cgi/tech/1544620479/493
494: デフォルトの名無しさん [sage] 2022/05/01(日) 16:14:10.55 ID:4P2yloMu ACCESSにもApplication.VBEがあるっぽいから、エクセルとかと同じようにできるんじゃね そもそもコード内をそうそう置換するって状況がよくわからんがな http://mevius.5ch.net/test/read.cgi/tech/1544620479/494
495: デフォルトの名無しさん [sage] 2022/05/01(日) 20:13:11.92 ID:uZ+uV6s8 >>494 オブジェクト名を修正すると,名前の自動修正機能で,オブジェクト間の整合性は保たれます. 例えば,Aクエリー内でBテーブルを使用していて,Bの名前をCに変更するとA内のBテーブル名もCに自動的に修正されます. ところが,コード内でオブジェクト名を引数に使用している場合(DoCmd.OpenQuery()やQeryDef()など)は,自動的に修正されないので コード内の文字置換で修正するしかありません. オブジェクト名をより統一的にしたいとか,あるルールで短くしたいなどの事情です. でも本当にコードを使ってコード内の文字置換できますか? 「エクセルとかと同じようにできる」とのことですが,エクセルのVBAでできる方法を知りません. http://mevius.5ch.net/test/read.cgi/tech/1544620479/495
496: デフォルトの名無しさん [] 2022/05/01(日) 20:33:27.28 ID:XyObubkl >>494がApplication.VBEってヒント出してくれてるのに自分で調べる気は無いの? http://mevius.5ch.net/test/read.cgi/tech/1544620479/496
497: デフォルトの名無しさん [sage] 2022/05/01(日) 20:51:07.35 ID:uZ+uV6s8 >>496 いままでApplication.VBEとVBAの違いをしりませんでした. Application.VBEで検索して,オブジェクトであることをしりました. できそうな気がしてきました. 調べます http://mevius.5ch.net/test/read.cgi/tech/1544620479/497
498: デフォルトの名無しさん [] 2022/05/01(日) 21:27:48.04 ID:q0kLnjNb >>497 お前みたいな馬鹿は、方法自体間違えていると思うよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/498
499: デフォルトの名無しさん [sage] 2022/05/01(日) 22:36:20.05 ID:uZ+uV6s8 >>498 正しい方法言ってみな。 言えなきゃ超バカ決定。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/499
500: デフォルトの名無しさん [] 2022/05/01(日) 23:10:31.48 ID:q0kLnjNb やっぱり馬鹿だったか 馬鹿に馬鹿と指摘すると怒りだす http://mevius.5ch.net/test/read.cgi/tech/1544620479/500
501: デフォルトの名無しさん [sage] 2022/05/03(火) 18:13:45.75 ID:hABwtxOZ >>494,>>496 497ですが、 Application.VBE.ActiveVBProject.VBComponents(i).codemodule.ReplaceLine(j,"修正後コード文字列") を使ってできました。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/501
502: デフォルトの名無しさん [sage] 2022/05/03(火) 21:57:49.43 ID:uVFGqhpy >>501 ありがとう。勉強になります。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/502
503: デフォルトの名無しさん [sage] 2022/05/03(火) 23:56:04.39 ID:9Zz7qGMa コードとデータは分離しなさーい! http://mevius.5ch.net/test/read.cgi/tech/1544620479/503
504: デフォルトの名無しさん [sage] 2022/05/04(水) 01:12:27.06 ID:L2QcoKdh >>503 オブジェクト名はデータにできない http://mevius.5ch.net/test/read.cgi/tech/1544620479/504
505: デフォルトの名無しさん [sage] 2022/05/04(水) 01:29:47.87 ID:T57Ht3+D 名前は文字列だろ! VBAの提供するオブジェクトは大抵コレクションで管理されているだろ! お前の作ったオブジェクトも管理できるようにしろ! 初歩だぞ初歩! http://mevius.5ch.net/test/read.cgi/tech/1544620479/505
506: デフォルトの名無しさん [sage] 2022/05/04(水) 01:39:45.29 ID:L2QcoKdh つまらん もういいよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/506
507: デフォルトの名無しさん [] 2022/05/04(水) 03:22:14.79 ID:bSJdUNny やっぱり馬鹿だった http://mevius.5ch.net/test/read.cgi/tech/1544620479/507
508: デフォルトの名無しさん [sage] 2022/05/04(水) 08:25:20.61 ID:L2QcoKdh >>507 人のこと馬鹿、馬鹿ってほんとにうるさい奴だな 今回のアプリは俺しか使わずオブジェクト名変更も今回限りが確定しているんで、 オブジェクト名をデータ化できるCreateQueryDefなどを使う手間を省いてクエリデザイナーを使っているだけ。 そういう事情も含めて「もういいよ」と書いたんだけど、読み取れんわな。 お前は実生活で他人の事情を汲み取る力が弱くて他人から避けられてるだろう。 実生活では流石に馬鹿と面罵しないとは思うが態度にはでてると思うよ。 エクセルVBAのようにワッチョイ付きならNG登録するんだが。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/508
509: デフォルトの名無しさん [sage] 2022/05/04(水) 12:11:33.62 ID:T57Ht3+D 何人登録するつもり? http://mevius.5ch.net/test/read.cgi/tech/1544620479/509
510: デフォルトの名無しさん [sage] 2022/05/06(金) 14:43:39.68 ID:HOAU3QSN >>508 もういいから馬鹿は黙ってろ http://mevius.5ch.net/test/read.cgi/tech/1544620479/510
511: デフォルトの名無しさん [] 2022/05/11(水) 09:14:31.47 ID:+mNN1hZ/ ここはBKのあつまりでつか? http://mevius.5ch.net/test/read.cgi/tech/1544620479/511
512: 44 [sage] 2022/06/18(土) 22:47:23.35 ID:yLkug1TW 味噌も糞もいるのがこういう掲示板の特徴 それが面白ければ来るし退屈なら来ない 文句言うのはカッコ悪い http://mevius.5ch.net/test/read.cgi/tech/1544620479/512
513: デフォルトの名無しさん [] 2022/06/19(日) 06:53:58.66 ID:R9q2ZnJn >>512 こういうのかっこ悪い http://mevius.5ch.net/test/read.cgi/tech/1544620479/513
514: 44 [sage] 2022/06/19(日) 07:49:57.69 ID:ZfwUc+SV >>513 いやいや本当のイケメンだろうな http://mevius.5ch.net/test/read.cgi/tech/1544620479/514
515: デフォルトの名無しさん [sage] 2022/06/21(火) 16:34:11.41 ID:q4pJaYn5 test http://mevius.5ch.net/test/read.cgi/tech/1544620479/515
516: デフォルトの名無しさん [sage] 2022/06/21(火) 16:34:30.21 ID:q4pJaYn5 アプリケーションタイトルについて質問です。 今使ってるmdbのタイトルが2種類あって、「Access」のものと「ファイル名:データベース-フルパス-Access」のものがあります。 全部後者のタイトルにしたいのですが、設定の仕方がわかりません。 ヤフー知恵袋の「Accessのタイトルバーにファイル名を表示させることはできますか。 Excelでは表示されるのですがAccessでは”Access”としか表示されず少し不便なので、、」 を読むと何の設定もしなくても後者のようになると書いている人がいます。 どうしたらそうなるのでしょうか? 後者のやつは別にAppTitleとかで設定していませんので不思議です。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/516
517: 516 [sage] 2022/06/21(火) 17:34:19.49 ID:q4pJaYn5 解決しました。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/517
518: デフォルトの名無しさん [] 2022/06/21(火) 19:20:51.51 ID:EkCiEQiW >>517 どうやって? 知りたい http://mevius.5ch.net/test/read.cgi/tech/1544620479/518
519: 516 [sage] 2022/06/21(火) 19:44:50.71 ID:q4pJaYn5 >>518 いろいろ試したけど、結論は超簡単。 ファイル→オプション→現在のデータバース→アプリケーションオプション→ドキュメントウィンドオプション→タブ付ドキュメントをon これでファイル名とパス名が表示されて複数のmdbを起動しても混乱しなくなりました。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/519
520: デフォルトの名無しさん [] 2022/06/21(火) 20:23:15.71 ID:QtwFSmmg OS:win10 Ver:365 16.0 フォルダの中に複数のExcelファイルがあります accessで全てのエクセルの同一セルの文字をテーブルにまとめたいのです Accecc vba エクセルの特定のセル などで検索してみましたが解決に至っていません どうかお力添えお願いします http://mevius.5ch.net/test/read.cgi/tech/1544620479/520
521: デフォルトの名無しさん [sage] 2022/06/21(火) 20:46:00.64 ID:kU7/2TZz 何がしたいかと、どこまで出来て何がわからないのか詳しくかけ http://mevius.5ch.net/test/read.cgi/tech/1544620479/521
522: デフォルトの名無しさん [sage] 2022/06/22(水) 10:12:43.83 ID:N/5JiATv >>520 Excelシート全てインポートすればクエリー加工出来ると思うが、、 http://mevius.5ch.net/test/read.cgi/tech/1544620479/522
523: デフォルトの名無しさん [sage] 2022/06/22(水) 10:16:19.65 ID:N/5JiATv >>520 Excelシートリンクでも良いぞ http://mevius.5ch.net/test/read.cgi/tech/1544620479/523
524: デフォルトの名無しさん [sage] 2022/06/22(水) 10:27:56.84 ID:lUHG2pSs ネ申エクセルからデータを拾いたいとかそんな話じゃね? CreateObject("Excel.Application") 使って対象ファイル開いて、そっからさきはExcel VBAの範疇やろ http://mevius.5ch.net/test/read.cgi/tech/1544620479/524
525: デフォルトの名無しさん [sage] 2022/06/22(水) 12:36:20.21 ID:N/5JiATv なんだ Accessでテーブル化したい、のでは無いのか? 何やりたいのか分からんな http://mevius.5ch.net/test/read.cgi/tech/1544620479/525
526: デフォルトの名無しさん [] 2022/06/22(水) 15:16:59.53 ID:Z6mZqai9 「AccessVBAからexcelファイルのセル参照ってどうやるの?」ていう質問でしょ http://mevius.5ch.net/test/read.cgi/tech/1544620479/526
527: デフォルトの名無しさん [] 2022/06/22(水) 20:19:24.91 ID:rLKMJdnt 質問には答えられるけど 答えるとまた次の質問が来るのが予測出来るからまんどくせ http://mevius.5ch.net/test/read.cgi/tech/1544620479/527
528: デフォルトの名無しさん [sage] 2022/06/23(木) 06:46:56.49 ID:nErcbU9U >>527 スレに来ないと良いよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/528
529: デフォルトの名無しさん [sage] 2022/06/23(木) 07:36:49.86 ID:xe+L83Np >>521-523 なにをやりないか再度確認してコード見直していたら不具合点見つかって前進しました… >>525 やりたいのはこれで30個程度のエクセルがあって全てフォームは統一されています a3とb4とw30の値をテーブルにズドンと引っ張りたいのです もうちょっと頑張ってみます 遅くなってごめんなさい http://mevius.5ch.net/test/read.cgi/tech/1544620479/529
530: デフォルトの名無しさん [sage] 2022/06/23(木) 12:13:27.06 ID:jwJvRDT9 ACCESS VBA EXCEL CELLでクグルと沢山出て来ますね。 ACCESSからEXCEL開いて操作できると便利です、頑張ってください。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/530
531: デフォルトの名無しさん [sage] 2022/06/23(木) 12:56:15.59 ID:uoofWh9e >>529 CreateObject("Excel.Application")でエクセルを操作できるようにする 対象とするシートからa3とb4とw30の値を取得して変数 X Y Z に格納する 変数 X Y Z の値をAccess のテーブルに追加する この二つの処理を全てのシートにループで行う 釣りが終わったExcel オブジェクトを閉じる Access のオブジェクトの閉じる これでいけるんじゃね? http://mevius.5ch.net/test/read.cgi/tech/1544620479/531
532: デフォルトの名無しさん [sage] 2022/06/24(金) 06:07:38.19 ID:X+tgL9yK >>531-532 ありがとうございます こう書くとすごくわかりやすいですね テーブル追加やLOOPは調べて書き方を学べそうなのでやってみます! http://mevius.5ch.net/test/read.cgi/tech/1544620479/532
533: デフォルトの名無しさん [] 2022/06/26(日) 13:37:45.11 ID:DTfGvOZF https://www.youtube.com/watch?v=jppnWu6am3Q http://mevius.5ch.net/test/read.cgi/tech/1544620479/533
534: デフォルトの名無しさん [sage] 2022/06/26(日) 22:59:47.94 ID:Ter0iV/V たびたびすみません ばしっとフォルダ内のファイル名を取得することはできました >CreateObject("Excel.Application")でエクセルを操作できるようにする これの意味がようやくわかりました ありがとうございます C:\Users\sanae\Desktop\vba\Book1.xlsx というExcelファイルのa3を変数に入れようとしているのですが ぐぐったところファイルパスをつける書きかたが参考にできるページがみあたらず詰まっています (このあたりにファイルパスとかシートとかを指定して)range(3.1) みたいなやり方かなあなんて思っているのですがどれもエラーになっちゃいました 参考になるページでもご教示いただければ幸いでございます http://mevius.5ch.net/test/read.cgi/tech/1544620479/534
535: デフォルトの名無しさん [sage] 2022/06/27(月) 00:21:56.25 ID:LR8Jvthl >>534 http://officetanaka.net/excel/vba/file/file01.htm を参考にしてください。 Sub Sample1 set mybook=myexel.Workbooks.Open "C:\Users\sanae\Desktop\vba\Book1.xlsx" x=mybook.worksheets(1).range("A 3") X の値をテーブルに書き込む End Sub myexelはクリエイトオブジェクトで作ったエクセルオブジェクトね あと変数は適当に定義しておいてね。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/535
536: デフォルトの名無しさん [] 2022/06/27(月) 01:42:38.20 ID:Yed1CrTu >>535 おおお できてきました とても進みました ・フォルダを指定してファイル名を取得 ・変数XYZに特定のセルの値を取得 ・ http://mevius.5ch.net/test/read.cgi/tech/1544620479/536
537: デフォルトの名無しさん [sage] 2022/06/27(月) 01:45:22.88 ID:Yed1CrTu すみませんCTRL+エンターで送信になってしまいました ・フォルダを指定してファイル名を取得 ・指定したシートから変数XYZに特定のセルの値を取得 ・XYZの値をテーブルに追加 超進みました 後は指定したシート名を持たないファイルに遭遇した時にどんなエラーになるのかが気になりますので 近々時間みつけて頑張ろうと思います ありがとうございました!超ハッピー! http://mevius.5ch.net/test/read.cgi/tech/1544620479/537
538: デフォルトの名無しさん [] 2022/06/27(月) 01:59:55.53 ID:YAQt7RYR 馬鹿は二度と来るなよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/538
539: デフォルトの名無しさん [sage] 2022/06/27(月) 08:41:44.29 ID:yeeW9wqV VBAでやらなくてもテーブルimportで出来るやろ 無駄な努力だな http://mevius.5ch.net/test/read.cgi/tech/1544620479/539
540: デフォルトの名無しさん [sage] 2022/06/27(月) 11:56:31.55 ID:LR8Jvthl >>539 ブック数が多いから VBA でやりたいんじゃないの? インポートでできる量だったら手でコピペの方が早いだろ http://mevius.5ch.net/test/read.cgi/tech/1544620479/540
541: デフォルトの名無しさん [sage] 2022/06/27(月) 15:59:24.18 ID:jKYPD+Yx 対象のExcelファイルが固定なのか、頻繁に入れ替わるかどうかにもよるわな http://mevius.5ch.net/test/read.cgi/tech/1544620479/541
542: デフォルトの名無しさん [] 2022/06/27(月) 20:22:09.19 ID:UdQiWAN3 どなたか教えてください。 売掛金消し込みのマクロを作成しています。VBAでソルバーを自動化したいと思っています。 目的セル、制約条件の参照セルの開始行が40行ごとに下がっていき、指定値は数値ではなく、セルを指定したいです。 とりあえず、全部の変数をvariant型にしてますが、なかなか上手くいきません。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/542
543: デフォルトの名無しさん [sage] 2022/06/27(月) 20:42:56.65 ID:NFVjaUBh なんでAccessVBAスレにまで書いてるんだよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/543
544: デフォルトの名無しさん [] 2022/06/28(火) 12:01:23.56 ID:W8L8uteA こんな奴が作るプログラムで金勘定とか笑えるわ 己を知らないって馬鹿の特徴なんだよな http://mevius.5ch.net/test/read.cgi/tech/1544620479/544
545: デフォルトの名無しさん [sage] 2022/06/28(火) 12:08:16.40 ID:S7aFTH1N >>542 Access VBAスレでExcelの質問するなよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/545
546: デフォルトの名無しさん [sage] 2022/06/28(火) 12:53:23.92 ID:illrnTHm EXCELで記録したVBAをACCESSで実行するとEXCELはXlmxにしなくても良いからじゃないの? ソルバーは使い方わからんのでなんにも言えなくてスマン。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/546
547: デフォルトの名無しさん [sage] 2022/06/28(火) 13:14:48.17 ID:v0i+TmEN >>546 Excel VBAスレみればなにがあったのか分かるよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/547
548: デフォルトの名無しさん [] 2022/06/28(火) 21:08:59.28 ID:i28fB/zi 昨日アホな質問した541です。 accessスレにexcel VBAについて投稿してしまい、すみませんでした。 VBA初心者なので、よくわからずに投稿してしまいました。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/548
549: デフォルトの名無しさん [] 2022/06/29(水) 10:01:41.27 ID:Es0nfTu8 初心者を言い訳にする香具師は同じ失敗を繰り返す http://mevius.5ch.net/test/read.cgi/tech/1544620479/549
550: デフォルトの名無しさん [sage] 2022/06/29(水) 12:18:55.14 ID:C7zOwXa/ 狭量にすぎる http://mevius.5ch.net/test/read.cgi/tech/1544620479/550
551: デフォルトの名無しさん [sage] 2022/06/29(水) 12:31:17.45 ID:WL8L6KaP スレを間違ったことではなくマルチが問題なのだがな http://mevius.5ch.net/test/read.cgi/tech/1544620479/551
552: デフォルトの名無しさん [sage] 2022/06/29(水) 13:27:42.53 ID:tPok425v >>551 それだけ焦ってたんでしょ。Excel VBA で反応がなければ藁をもすがる気持ちで アクセス VBA で聞いたんじゃない。 広い気持ちで http://mevius.5ch.net/test/read.cgi/tech/1544620479/552
553: デフォルトの名無しさん [] 2022/06/29(水) 13:50:40.09 ID:Es0nfTu8 x VBA初心者 o 5ch初心者 o パソコン初心者 o コミュ障入門者(上級) http://mevius.5ch.net/test/read.cgi/tech/1544620479/553
554: 516 [sage] 2022/06/30(木) 01:00:46.93 ID:1OP/W/CA DoCmd.OpenReport "レポート名", acViewPreview DoCmd.PrintOut acPrintAll, , , acHigh, 枚数 新規レポートにラベルを貼っただけものだと希望どおりの枚数が印刷される. しかし,別のレポートだと常に1枚しか印刷されない. ネットでも同じ報告を確認した.バグ説もある. 皆さんはどうですか?やっぱりバグですかね? http://mevius.5ch.net/test/read.cgi/tech/1544620479/554
555: 516 [sage] 2022/06/30(木) 16:01:17.27 ID:1OP/W/CA 解決した. デコンパイルとコンパクトしたらいつの間にか設定した枚数が印刷されるようになった. accessはマジで面倒くさいなあ. デコンパイルとコンパクトの待ち時間をを返して欲しいよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/555
556: デフォルトの名無しさん [sage] 2022/06/30(木) 19:00:33.50 ID:PX9/MxY9 デコンパイル、知りませんでした。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/556
557: デフォルトの名無しさん [sage] 2022/06/30(木) 20:22:38.17 ID:1+oYjPxt デコンパイル、昔は割と鉄板の解決方法だったんだけどね それでだめなら新規作成して全モジュールインポートとかもあったな 最近は必要性が減ったけど、まだたまにはあるんだな http://mevius.5ch.net/test/read.cgi/tech/1544620479/557
558: 516 [sage] 2022/06/30(木) 22:53:16.59 ID:1OP/W/CA コンパクトだけでも良かったのかも知れないが,習慣で両方やることにしている ついいましがたも.Docmd.OpenReportのOpenArgsがレポートに渡らなくて困っていたが,コンパクトをしたら作動した. 終了時にコンパクトするオプションがあるくらいだから頻繁にやるべきなんだろうね. コード書いているときは非常に頻繁に破損するからね. http://mevius.5ch.net/test/read.cgi/tech/1544620479/558
559: デフォルトの名無しさん [sage] 2022/06/30(木) 23:46:30.14 ID:1+oYjPxt あれはデータ領域を圧縮するのが主で、コード部分にはあまり影響しなかった気がするが 最近のアクセスでコードが破損するのはだいぶ減ったと思うが VBEからコンパイルするだけで解決してたんじゃないか? http://mevius.5ch.net/test/read.cgi/tech/1544620479/559
560: 516 [sage] 2022/07/01(金) 00:40:02.55 ID:SILFs/Ha くわしいことはわからないが,挙動不審が治ることがあるんだよねえ とにかく,試行錯誤していると必ずと言っていいほど,壊れるよねえ. メモリーが不足していますとか出始めると,その日のうちに全フォーム消失とか起こるからなあ. http://mevius.5ch.net/test/read.cgi/tech/1544620479/560
561: デフォルトの名無しさん [sage] 2022/07/01(金) 10:45:11.72 ID:x9gnk4T5 試行錯誤の過程のほとんどを貯め込むからな 設定で「終了時に最適化」で、都度終了を心掛けるか 大幅な改修の度にコンパイルのクセを付けるか ファイルサイズに気を付けて、「こんなサイズのはずは無い」ってな時は要注意 で、それは、お道具の使い方が雑、間違ってるってだけで、すぐAccessのせいにする連中はお里が知れる ってこと http://mevius.5ch.net/test/read.cgi/tech/1544620479/561
562: 516 [sage] 2022/07/07(木) 15:33:38.95 ID:9tJXVGoG 下のコードでmdbのディレクトリが表示されると思いきや、 ディレクトリ Documents フルパス C:\Users\MyName\Documents が表示された。vbsならscriptの存在するディレクトリだからmdbの存在するディレクトリが表示されると思ったのに、違う。 このことを説明してある資料ありますかね? Sub test() Dim fso Dim objfolder Set fso = CreateObject("Scripting.FileSystemObject") Set objfolder = fso.GetFolder(".") Debug.Print "ディレクトリ", objfolder.Name Debug.Print "フルパス", objfolder.Path End Sub http://mevius.5ch.net/test/read.cgi/tech/1544620479/562
563: デフォルトの名無しさん [sage] 2022/07/07(木) 16:12:50.20 ID:N4ENiOaQ >>562 mdb/accdbファイルの場所が欲しいのなら CurrentProject.Path を使おう CurDir$や>>562の例なんかで返されるカレントディレクトリはファイルダイアログとかで開いたフォルダになるっぽい その辺の仕様に関する資料は知らんけど http://mevius.5ch.net/test/read.cgi/tech/1544620479/563
564: デフォルトの名無しさん [sage] 2022/07/07(木) 19:57:05.70 ID:V/fQnZ1U そもそも、 >vbsならscriptの存在するディレクトリ が間違ってる気がするが カレントディレクトリの概念って最近は説明されてるの見ないなぁ GetFolder(".")が返してるのはカレントディレクトリ(からの相対パスで自分自身) カレントディレクトリはACCESS.EXEの場所や.MDBファイルの場所とは別に存在する まあMDB開くときはそこをカレントにする場合が多いけどな つねに一致してるとは限らん http://mevius.5ch.net/test/read.cgi/tech/1544620479/564
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 224 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.016s