Access VBA 質問スレ Part2 (788ﾚｽ)
Access VBA 質問スレ Part2 http://mevius.5ch.net/test/read.cgi/tech/1544620479/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
431: デフォルトの名無しさん [sage] 2021/11/29(月) 15:04:38.27 ID:vB15GkdT レコードが存在しない場合に INSERTを動作させようとしてます FROMが無いと、演算子がありません、となるため ダミーの FROM を入れましたが(Oracle でいうところの dual) レコードが追加されません INSERT INTO t_table(id, name) SELECT 1, "name" FROM dummy WHERE NOT EXISTS( SELECT * FROM t_table WHERE(id = 1) ); Access の INSERT での FROM や WHEREに、何か制限などありますでしょうか? http://mevius.5ch.net/test/read.cgi/tech/1544620479/
431
432: デフォルトの名無しさん [sage] 2021/11/29(月) 15:15:06.43 ID:MiFRCJa7 直接の返答じゃないけど、SQL一発書きじゃなきゃだめなの？ 事前にレコード数チェックして分岐じゃだめなの？ http://mevius.5ch.net/test/read.cgi/tech/1544620479/432
433: デフォルトの名無しさん [sage] 2021/11/29(月) 15:17:50.75 ID:vB15GkdT UPDATE と組み合わせて、SQL一発を考えてます 無理であれば、おっしゃるように分岐かなと http://mevius.5ch.net/test/read.cgi/tech/1544620479/433
434: デフォルトの名無しさん [sage] 2021/11/29(月) 16:01:33.58 ID:MiFRCJa7 ちょっと気になったので手元で実験してみたけど、dummyテーブルが存在して空ではないときには （多分）431の想定どおりの挙動をしていると思う バッドノウハウ臭いので、おとなしく事前チェックして分岐かなぁ まぁAccessのSQLって変だよね http://mevius.5ch.net/test/read.cgi/tech/1544620479/434
435: デフォルトの名無しさん [] 2021/11/29(月) 17:41:32.65 ID:XYio4/pG access はupdateいっぱつで初挿入もできたはず しゅきーのヌルを上書きする感じで http://mevius.5ch.net/test/read.cgi/tech/1544620479/435
436: デフォルトの名無しさん [sage] 2021/11/30(火) 05:36:52.18 ID:KirC+CSy >>435 さすがにそんなことはないと思うが、ちょっとサンプルコード書いてみてくれ http://mevius.5ch.net/test/read.cgi/tech/1544620479/436
437: デフォルトの名無しさん [] 2021/11/30(火) 09:01:45.87 ID:qEKwfbTR >>436 選択クエリは更新できる UPDATE TableA RIGHT JOIN TableB ON TableA.ID = TableB.ID SET TableA.ID = [TableB]![ID], TableA.Data1 = [TableB]![Data1], TableA.Data2 = [TableB]![Data2]; http://mevius.5ch.net/test/read.cgi/tech/1544620479/437
438: デフォルトの名無しさん [] 2021/11/30(火) 10:50:50.28 ID:d0QAjKSx >>431 values (1, "name") じゃ駄目なの http://mevius.5ch.net/test/read.cgi/tech/1544620479/438
439: デフォルトの名無しさん [sage] 2021/11/30(火) 10:58:46.58 ID:+NfPg838 >>438 単純にinsertするだけならそれでいいんだけど、existsを使って条件付けようとしてるのでvaluesは使えない（エラーになる） http://mevius.5ch.net/test/read.cgi/tech/1544620479/439
440: デフォルトの名無しさん [sage] 2021/11/30(火) 12:38:13.11 ID:nsxxcWz3 それ自分でDUALという名称でテーブルを作って1レコード入れておけば出来るよ。 OracleのDUALも実体はそんな感じだったと思う。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/440
441: デフォルトの名無しさん [sage] 2021/11/30(火) 16:33:37.59 ID:KirC+CSy >>437 更新はできるけど、存在しない行を更新しようとしたとして その行を新規追加することなんてないだろ．．． と思ったけど、追加されるのか ACCESS無茶苦茶しやがるな リンクテーブルに対してでも追加しやがる SQL ServerだってFromでJoinしてUPDATEできるけど、 さすがに行が追加されることなんてないぞ エラーの原因が分からない？ http://mevius.5ch.net/test/read.cgi/tech/1544620479/441
442: デフォルトの名無しさん [sage] 2021/11/30(火) 16:35:34.50 ID:KirC+CSy あ、最後なんか変な行入った http://mevius.5ch.net/test/read.cgi/tech/1544620479/442
443: デフォルトの名無しさん [sage] 2021/11/30(火) 17:23:09.43 ID:aruulzL7 あくせく働くぜ http://mevius.5ch.net/test/read.cgi/tech/1544620479/443
444: デフォルトの名無しさん [] 2021/11/30(火) 18:49:33.51 ID:VsTnDahT >>441 Access的には「更新可能クエリ」はテーブルと同等の扱いなのだろう http://mevius.5ch.net/test/read.cgi/tech/1544620479/444
445: デフォルトの名無しさん [sage] 2021/11/30(火) 22:05:19.66 ID:KirC+CSy >>444 Viewが実テーブルとほぼ同じ扱いってのは別に問題じゃない UPDATE文でテーブルの行数が変わるのが無茶苦茶なんだよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/445
446: デフォルトの名無しさん [] 2021/11/30(火) 22:10:51.28 ID:VsTnDahT SELECT * FROM TableA RIGHT JOIN TableB ON TableA.ID = TableB.ID これの更新だから行数は変わっていない http://mevius.5ch.net/test/read.cgi/tech/1544620479/446
447: デフォルトの名無しさん [sage] 2021/11/30(火) 23:40:10.71 ID:KirC+CSy UPDATE文で実テーブルの行数が、な http://mevius.5ch.net/test/read.cgi/tech/1544620479/447
448: デフォルトの名無しさん [sage] 2021/12/01(水) 09:46:36.82 ID:dv4Z+qI2 >>431 SQL一発では出来ないよ 残念だが DOループで回す事になる http://mevius.5ch.net/test/read.cgi/tech/1544620479/448
449: 431 [sage] 2021/12/02(木) 11:57:32.43 ID:nKskuO+T ありがとうございます 分岐で分けることにしました http://mevius.5ch.net/test/read.cgi/tech/1544620479/449
450: 440 [sage] 2021/12/02(木) 22:29:47.92 ID:vu0CN48k もうちょっと俺を信用してもええんやないかと思ったが 出来たんならええか http://mevius.5ch.net/test/read.cgi/tech/1544620479/450
451: デフォルトの名無しさん [sage] 2021/12/08(水) 11:00:44.75 ID:8eCyKUYS データベースに対し、レポートを外部データの取込で追加するのですが、 この操作をGUIでなくコマンドで行う事は出来ますでしょうか。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/451
452: デフォルトの名無しさん [] 2021/12/08(水) 11:36:19.36 ID:XFpeOKs/ mdbファイルまるごと差し替えでok http://mevius.5ch.net/test/read.cgi/tech/1544620479/452
453: デフォルトの名無しさん [sage] 2021/12/08(水) 14:57:00.86 ID:8eCyKUYS >>452 返信ありがとう やっぱ基本はＤＢごと差し替えになるんですね・・・ 最新を管理しないといけないということですか http://mevius.5ch.net/test/read.cgi/tech/1544620479/453
454: デフォルトの名無しさん [sage] 2021/12/08(水) 16:58:22.13 ID:sRvDCOgH >>450 レコード入れずに試してみてました あとで確認してみます http://mevius.5ch.net/test/read.cgi/tech/1544620479/454
455: デフォルトの名無しさん [sage] 2021/12/08(水) 18:12:44.70 ID:ixTDMdmo >>451 access起動コマンドラインオプションに /x マクロ名 で自動実行可能 向きが逆だけどオブジェクトのコピーでレポートをコピー出来る http://mevius.5ch.net/test/read.cgi/tech/1544620479/455
456: デフォルトの名無しさん [sage] 2021/12/08(水) 20:30:00.04 ID:FsTgnRus >>451 DoCmd.TransferDatabase acImport http://mevius.5ch.net/test/read.cgi/tech/1544620479/456
457: デフォルトの名無しさん [sage] 2021/12/13(月) 11:19:46.91 ID:HhLRYuYl >>440,450 ありがとうございます、確認しました dummy テーブルにレコードを入れて動作しました INSERT INTO t_table(id, name) SELECT 1, "name" FROM dummy WHERE NOT EXISTS( SELECT * FROM t_table WHERE(id = 1) ); http://mevius.5ch.net/test/read.cgi/tech/1544620479/457
458: デフォルトの名無しさん [] 2022/01/15(土) 00:52:56.35 ID:ALzAiADU VBAって、サポート切れてんの？ 企業とかこれから、多数のツールどうすんだろうね。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/458
459: デフォルトの名無しさん [sage] 2022/01/15(土) 07:46:29.84 ID:8MS0rOI1 サポート気にするような部署でvbaを採用するだろうか？ http://mevius.5ch.net/test/read.cgi/tech/1544620479/459
460: デフォルトの名無しさん [sage] 2022/01/17(月) 00:16:00.31 ID:oS3b1eNW VBAって単独の製品じゃないんだが そもそもVBAがサポート切れってどこの情報だ？ http://mevius.5ch.net/test/read.cgi/tech/1544620479/460
461: デフォルトの名無しさん [sage] 2022/01/17(月) 12:28:46.14 ID:t8m0YBBL OneDriveにコードをバックアップして直接開いたところ http://imgur.com/qO7I0AB.jpg こういった線が付きました Office2016 Proなのですが設定等でVBエディターでも表示できますでしょうか またお恥ずかしながらこの線の一般的な名称も教えて頂けませんでしょうか http://mevius.5ch.net/test/read.cgi/tech/1544620479/461
462: デフォルトの名無しさん [sage] 2022/01/17(月) 17:44:28.15 ID:hBkYcVxQ >>461 何で開いたのかは知らんけど、AccessとかのVBAエディタには、そういった今どきの便利な機能は無いかと 一般名称かどうかはしらんけど、VSCodeとかの設定では Indent Guide でひっかかるんじゃないかな http://mevius.5ch.net/test/read.cgi/tech/1544620479/462
463: デフォルトの名無しさん [sage] 2022/01/17(月) 20:02:01.14 ID:r2vXEkpI >>462 ありがとうございます 名称のほうぐぐってみまして、確かにVS関連の情報が多く出てきました 大変便利ゆえに残念です！ http://mevius.5ch.net/test/read.cgi/tech/1544620479/463
464: デフォルトの名無しさん [sage] 2022/01/31(月) 11:21:11.42 ID:ZCY1so+a Microsoft 365 Access Runtime ダウンロードリンクが動作してないのですが ダウンロードできた方おられます?? http://mevius.5ch.net/test/read.cgi/tech/1544620479/464
465: デフォルトの名無しさん [sage] 2022/01/31(月) 11:29:43.23 ID:Di33df7w >>464 見てみたけど、ダメだねぇ http://mevius.5ch.net/test/read.cgi/tech/1544620479/465
466: デフォルトの名無しさん [sage] 2022/02/22(火) 22:36:04.61 ID:h8gQU92u アクセス2010でVBA内でエクセルのブックを操作するためにブック選択ダイアログを開こうとしています．ブックが存在するフォルダーはc:\x\y内にあります． それでChDirでGetOpenFilename実行時に開くフォルダーをc:\x\yにしたいのですが，規定のドキュメントフォルダーが開きます． Debug.Print CurDirは"C:\x\y"を返しますので，システムが認識するカレントフォルダーが"C:\x\y"に変わっているのは確認済みです．GetOpenFilenameが開くフォルダーをG
etOpenFilenameに変更できないことが問題です． sub test ChDir "C:\x\y" Debug.Print CurDir Set exApp = CreateObject("Excel.Application") ChDir "C:\x\y" Debug.Print CurDir res = exApp.GetOpenFilename("Csv Files (*.csv), *.csv") end sub ところがエクセルのVBA内でtest2を実行するとフォルダーc:\x\yが開きます． sub test2 ChDir "C:\x\y" res=aplication.GetOpenFilename("Csv Files (*.csv), *.csv") end sub アクセスのVBAのから操作するとうまくいきません．解
決策はないでしょうか？ http://mevius.5ch.net/test/read.cgi/tech/1544620479/466
467: デフォルトの名無しさん [sage] 2022/02/22(火) 22:38:16.30 ID:h8gQU92u 間違えました。 GetOpenFilenameが開くフォルダーをGetOpenFilenameに→ GetOpenFilenameが開くフォルダーをc:\x\yに http://mevius.5ch.net/test/read.cgi/tech/1544620479/467
468: デフォルトの名無しさん [sage] 2022/02/23(水) 09:19:56.78 ID:yBLUqW/Q https://hironimo.com/prog/excel/vba-excel-open/#:~:text=%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E9%96%8B%E3%81%8F%E3%81%AB%E3%81%AF,%E3%83%A1%E3%82%BD%E3%83%83%E3%83%89%E3%81%A7%E9%96%8B%E3%81%8D%E3%81%BE%E3%81%97%E3%82%87%E3%81%86%E3%80%82 WorkBooks.Open http://mevius.5ch.net/test/read.cgi/tech/1544620479/468
469: デフォルトの名無しさん [sage] 2022/02/23(水) 10:16:59.77 ID:/GeE/zJY >>468 GetOpenFilenameでダイアログが立ち上がったときのフォルダーをc:\x\yにしたいという意味です。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/469
470: デフォルトの名無しさん [sage] 2022/02/23(水) 14:00:43.13 ID:3ksW4w1X FileDialogを使う http://mevius.5ch.net/test/read.cgi/tech/1544620479/470
471: デフォルトの名無しさん [sage] 2022/02/23(水) 15:58:28.79 ID:noR6ud0U https://officevba.info/filedialog/ こっちスかね メリットもデメリットも書いてあって親切 http://mevius.5ch.net/test/read.cgi/tech/1544620479/471
472: デフォルトの名無しさん [sage] 2022/02/23(水) 16:48:55.01 ID:/GeE/zJY >>470 ありがとうございました． FileDialogだとカレントフォルダーで開いてくれました． http://mevius.5ch.net/test/read.cgi/tech/1544620479/472
473: デフォルトの名無しさん [sage] 2022/02/23(水) 16:53:30.10 ID:/GeE/zJY >>472 ありがとうございます。この説明はとても親切ですね。よくわかりました http://mevius.5ch.net/test/read.cgi/tech/1544620479/473
474: デフォルトの名無しさん [sage] 2022/02/24(木) 15:49:02.02 ID:G5PhgONP >>466 Excel.ApplicationのDefaultFilePathを設定していったん終了したら、 次からそこで開くっぽいぞ Set exApp = CreateObject("Excel.Application") exApp.DefaultFilePath = "C:\x\y" exApp.Quit Set exApp = CreateObject("Excel.Application") res = exApp.GetOpenFilename("Csv Files (*.csv), *.csv") こんな感じか 実行したらエクセルのオプション変わっちまったｗｗ デフォルト何だっけな http://mevius.5ch
.net/test/read.cgi/tech/1544620479/474
475: デフォルトの名無しさん [sage] 2022/02/28(月) 11:00:59.24 ID:JmI4xSUc 初歩的な質問でお恥ずかしいのですが教えて下さい 面倒な計算や処理をして値を返す関数Aがあった場合 その戻り値を判定したい場合 If A = 1 or A = 2 then と記述するとaccessは 2回処理することになるのでしょうか それでしたら仮に変数(V)を用意して、一旦 V = A のように格納してから If V = 1 or V = 2 then と記述したほうが処理的には一回で済むという解釈になりますでしょうか すみませんがご教示頂けたらと思います http://mevius.5ch.net/test/read.cgi/
tech/1544620479/475
476: デフォルトの名無しさん [sage] 2022/02/28(月) 11:49:10.60 ID:JmI4xSUc すみません、試してわかりました。 後者は一回で済みました。 質問することでその後すぐ簡単な確認方法を思いつくことがよくあります お恥ずかしい。スレ汚し失礼しました； http://mevius.5ch.net/test/read.cgi/tech/1544620479/476
477: デフォルトの名無しさん [sage] 2022/02/28(月) 12:38:27.12 ID:jOzz1fM6 どんまい 気付きや学びに成りゃ無駄じゃ無い http://mevius.5ch.net/test/read.cgi/tech/1544620479/477
478: デフォルトの名無しさん [sage] 2022/02/28(月) 12:41:50.52 ID:frLBMESq ちょっと違う話だけど、VBAにもOrElseやAndAlsoが欲しいなと思うときはある http://mevius.5ch.net/test/read.cgi/tech/1544620479/478
479: デフォルトの名無しさん [sage] 2022/03/06(日) 15:10:37.27 ID:R+n9Kzax SQLの勉強をさいきんはじめました 動的SQLによる数独の超高速解法 というのを読みました 動的にSQLを生成するため ・一つはJDBCを使う方法 ・もう一つはストアド・プロシージャを用いた方法 云々って書いてあります これらって、アクセスのSQLでもできそうなものでしょうか？ （過去に話題として出てたらごめんなさい） できそうならやってみようかと 茨の道ならあきらめます http://mevius.5ch.net/test/read.cgi/tech/1544620479/479
480: デフォルトの名無しさん [sage] 2022/03/06(日) 16:34:17.90 ID:TgGQVPNx 2つとも分からんけど、VBAが使える環境なら動的SQLは可能なはず http://mevius.5ch.net/test/read.cgi/tech/1544620479/480
481: 479 [sage] 2022/03/06(日) 17:10:27.06 ID:R+n9Kzax SQLとは、使用人から経営者になることだ 今まで自分で作業してたのをしなくてよくなる 使用人に、「こういうのを出してくれ」と 言うだけでよい 数独についてであれば、今まで 総当りするプログラムとか 条件判定とかを自分で考えていたが SQLならそうしたものは自分で考えなくてよい 勝手に総当りして勝手に判定してくれる ・・・ということが書いてありました これって、既存のプログラムの要件を SQLで表現できれば中身は考えなくてよい ってことですよね けっこうおもしろいかも htt
p://mevius.5ch.net/test/read.cgi/tech/1544620479/481
482: デフォルトの名無しさん [sage] 2022/03/07(月) 07:14:29.39 ID:xVPINsIe 経営しなくてもお金が稼げるSQLがどこかに書いてあると良いのに。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/482
483: デフォルトの名無しさん [sage] 2022/03/07(月) 12:53:13.63 ID:+OeG3Wfd >>479 JDBC Driver で Access MDB に接続できる つまりワカラン http://mevius.5ch.net/test/read.cgi/tech/1544620479/483
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の記事を１から読んでこい 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
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 277 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.017s