22/05/04 03:22:14 bSJdUNny.net
やっぱり馬鹿だった
510:デフォルトの名無しさん
22/05/04 08:25:20.61 L2QcoKdh.net
>>509
人のこと馬鹿、馬鹿ってほんとにうるさい奴だな
今回のアプリは俺しか使わずオブジェクト名変更も今回限りが確定しているんで、
オブジェクト名をデータ化できるCreateQueryDefなどを使う手間を省いてクエリデザイナーを使っているだけ。
そういう事情も含めて「もういいよ」と書いたんだけど、読み取れんわな。
お前は実生活で他人の事情を汲み取る力が弱くて他人から避けられてるだろう。
実生活では流石に馬鹿と面罵しないとは思うが態度にはでてると思うよ。
エクセルVBAのようにワッチョイ付きならNG登録するんだが。
511:デフォルトの名無しさん
22/05/04 12:11:33.62 T57Ht3+D.net
何人登録するつもり?
512:デフォルトの名無しさん
22/05/06 14:43:39.68 HOAU3QSN.net
>>510
もういいから馬鹿は黙ってろ
513:デフォルトの名無しさん
22/05/11 09:14:31.47 +mNN1hZ/.net
ここはBKのあつまりでつか?
514:44
22/06/18 22:47:23 yLkug1TW.net
味噌も糞もいるのがこういう掲示板の特徴
それが面白ければ来るし退屈なら来ない
文句言うのはカッコ悪い
515:デフォルトの名無しさん
22/06/19 06:53:58.66 R9q2ZnJn.net
>>514
こういうのかっこ悪い
516:44
22/06/19 07:49:57.69 ZfwUc+SV.net
>>515
いやいや本当のイケメンだろうな
517:デフォルトの名無しさん
22/06/21 16:34:11.41 q4pJaYn5.net
test
518:デフォルトの名無しさん
22/06/21 16:34:30.21 q4pJaYn5.net
アプリケーションタイトルについて質問です。
今使ってるmdbのタイトルが2種類あって、「Access」のものと「ファイル名:データベース-フルパス-Access」のものがあります。
全部後者のタイトルにしたいのですが、設定の仕方がわかりません。
ヤフー知恵袋の「Accessのタイトルバーにファイル名を表示させることはできますか。
Excelでは表示されるのですがAccessでは”Access”としか表示されず少し不便なので、、」
を読むと何の設定もしなくても後者のようになると書いている人がいます。
どうしたらそうなるのでしょうか?
後者のやつは別にAppTitleとかで設定していませんので不思議です。
519:516
22/06/21 17:34:19.49 q4pJaYn5.net
解決しました。
520:デフォルトの名無しさん
22/06/21 19:20:51.51 EkCiEQiW.net
>>519
どうやって?
知りたい
521:516
22/06/21 19:44:50.71 q4pJaYn5.net
>>520
いろいろ試したけど、結論は超簡単。
ファイル→オプション→現在のデータバース→アプリケーションオプション→ドキュメントウィンドオプション→タブ付ドキュメントをon
これでファイル名とパス名が表示されて複数のmdbを起動しても混乱しなくなりました。
522:デフォルトの名無しさん
22/06/21 20:23:15.71 QtwFSmmg.net
OS:win10
Ver:365 16.0
フォルダの中に複数のExcelファイルがあります
accessで全てのエクセルの同一セルの文字をテーブルにまとめたいのです
Accecc vba エクセルの特定のセル
などで検索してみましたが解決に至っていません
どうかお力添えお願いします
523:デフォルトの名無しさん
22/06/21 20:46:00.64 kU7/2TZz.net
何がしたいかと、どこまで出来て何がわからないのか詳しくかけ
524:デフォルトの名無しさん
22/06/22 10:12:43 N/5JiATv.net
>>522
Excelシート全てインポートすればクエリー加工出来ると思うが、、
525:デフォルトの名無しさん
22/06/22 10:16:19 N/5JiATv.net
>>522
Excelシートリンクでも良いぞ
526:デフォルトの名無しさん
22/06/22 10:27:56.84 lUHG2pSs.net
ネ申エクセルからデータを拾いたいとかそんな話じゃね?
CreateObject("Excel.Application")
使って対象ファイル開いて、そっからさきはExcel VBAの範疇やろ
527:デフォルトの名無しさん
22/06/22 12:36:20.21 N/5JiATv.net
なんだ
Accessでテーブル化したい、のでは無いのか?
何やりたいのか分からんな
528:デフォルトの名無しさん
22/06/22 15:16:59.53 Z6mZqai9.net
「AccessVBAからexcelファイルのセル参照ってどうやるの?」ていう質問でしょ
529:デフォルトの名無しさん
22/06/22 20:19:24.91 rLKMJdnt.net
質問には答えられるけど
答えるとまた次の質問が来るのが予測出来るからまんどくせ
530:デフォルトの名無しさん
22/06/23 06:46:56.49 nErcbU9U.net
>>529
スレに来ないと良いよ
531:デフォルトの名無しさん
22/06/23 07:36:49.86 xe+L83Np.net
>>523-525
なにをやりないか再度確認してコード見直していたら不具合点見つかって前進しました…
>>527
やりたいのはこれで30個程度のエクセルがあって全てフォームは統一されています
a3とb4とw30の値をテーブルにズドンと引っ張りたいのです
もうちょっと頑張ってみます
遅くなってごめんなさい
532:デフォルトの名無しさん
22/06/23 12:13:27.06 jwJvRDT9.net
ACCESS VBA EXCEL CELLでクグルと沢山出て来ますね。
ACCESSからEXCEL開いて操作できると便利です、頑張ってください。
533:デフォルトの名無しさん
22/06/23 12:56:15.59 uoofWh9e.net
>>531
CreateObject("Excel.Application")でエクセルを操作できるようにする
対象とするシートからa3とb4とw30の値を取得して変数 X Y Z に格納する
変数 X Y Z の値をAccess のテーブルに追加する
この二つの処理を全てのシートにループで行う
釣りが終わったExcel オブジェクトを閉じる
Access のオブジェクトの閉じる
これでいけるんじゃね?
534:デフォルトの名無しさん
22/06/24 06:07:38.19 X+tgL9yK.net
>>533-534
ありがとうございます
こう書くとすごくわかりやすいですね
テーブル追加やLOOPは調べて書き方を学べそうなのでやってみます!
535:デフォルトの名無しさん
22/06/26 13:37:45.11 DTfGvOZF.net
URLリンク(www.youtube.com)
536:デフォルトの名無しさん
22/06/26 22:59:47.94 Ter0iV/V.net
たびたびすみません
ばしっとフォルダ内のファイル名を取得することはできました
>CreateObject("Excel.Application")でエクセルを操作できるようにする
これの意味がようやくわかりました ありがとうございます
C:\Users\sanae\Desktop\vba\Book1.xlsx というExcelファイルのa3を変数に入れようとしているのですが
ぐぐったところファイルパスをつける書きかたが参考にできるページがみあたらず詰まっています
(このあたりにファイルパスとかシートとかを指定して)range(3.1) みたいなやり方かなあなんて思っているのですがどれもエラーになっちゃいました
参考になるページでもご教示いただければ幸いでございます
537:デフォルトの名無しさん
22/06/27 00:21:56.25 LR8Jvthl.net
>>536
URLリンク(officetanaka.net)
を参考にしてください。
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はクリエイトオブジェクトで作ったエクセルオブジェクトね
あと変数は適当に定義しておいてね。
538:デフォルトの名無しさん
22/06/27 01:42:38.20 Yed1CrTu.net
>>537
おおお
できてきました とても進みました
・フォルダを指定してファイル名を取得
・変数XYZに特定のセルの値を取得
・
539:デフォルトの名無しさん
22/06/27 01:45:22.88 Yed1CrTu.net
すみませんCTRL+エンターで送信になってしまいました
・フォルダを指定してファイル名を取得
・指定したシートから変数XYZに特定のセルの値を取得
・XYZの値をテーブルに追加
超進みました
後は指定したシート名を持たないファイルに遭遇した時にどんなエラーになるのかが気になりますので
近々時間みつけて頑張ろうと思います
ありがとうございました!超ハッピー!
540:デフォルトの名無しさん
22/06/27 01:59:55.53 YAQt7RYR.net
馬鹿は二度と来るなよ
541:デフォルトの名無しさん
22/06/27 08:41:44.29 yeeW9wqV.net
VBAでやらなくてもテーブルimportで出来るやろ
無駄な努力だな
542:デフォルトの名無しさん
22/06/27 11:56:31.55 LR8Jvthl.net
>>541
ブック数が多いから VBA でやりたいんじゃないの?
インポートでできる量だったら手でコピペの方が早いだろ
543:デフォルトの名無しさん
22/06/27 15:59:24.18 jKYPD+Yx.net
対象のExcelファイルが固定なのか、頻繁に入れ替わるかどうかにもよるわな
544:デフォルトの名無しさん
22/06/27 20:22:09.19 UdQiWAN3.net
どなたか教えてください。
売掛金消し込みのマクロを作成しています。VBAでソルバーを自動化したいと思っています。
目的セル、制約条件の参照セルの開始行が40行ごとに下がっていき、指定値は数値ではなく、セルを指定したいです。
とりあえず、全部の変数をvariant型にしてますが、なかなか上手くいきません。
545:デフォルトの名無しさん
22/06/27 20:42:56.65 NFVjaUBh.net
なんでAccessVBAスレにまで書いてるんだよ
546:デフォルトの名無しさん
22/06/28 12:01:23.56 W8L8uteA.net
こんな奴が作るプログラムで金勘定とか笑えるわ
己を知らないって馬鹿の特徴なんだよな
547:デフォルトの名無しさん
22/06/28 12:08:16.40 S7aFTH1N.net
>>544
Access VBAスレでExcelの質問するなよ
548:デフォルトの名無しさん
22/06/28 12:53:23.92 illrnTHm.net
EXCELで記録したVBAをACCESSで実行するとEXCELはXlmxにしなくても良いからじゃないの?
ソルバーは使い方わからんのでなんにも言えなくてスマン。
549:デフォルトの名無しさん
22/06/28 13:14:48.17 v0i+TmEN.net
>>548
Excel VBAスレみればなにがあったのか分かるよ
550:デフォルトの名無しさん
22/06/28 21:08:59 i28fB/zi.net
昨日アホな質問した541です。
accessスレにexcel VBAについて投稿してしまい、すみませんでした。
VBA初心者なので、よくわからずに投稿してしまいました。
551:デフォルトの名無しさん
22/06/29 10:01:41.27 Es0nfTu8.net
初心者を言い訳にする香具師は同じ失敗を繰り返す
552:デフォルトの名無しさん
22/06/29 12:18:55.14 C7zOwXa/.net
狭量にすぎる
553:デフォルトの名無しさん
22/06/29 12:31:17.45 WL8L6KaP.net
スレを間違ったことではなくマルチが問題なのだがな
554:デフォルトの名無しさん
22/06/29 13:27:42.53 tPok425v.net
>>553
それだけ焦ってたんでしょ。Excel VBA で反応がなければ藁をもすがる気持ちで アクセス VBA で聞いたんじゃない。
広い気持ちで
555:デフォルトの名無しさん
22/06/29 13:50:40.09 Es0nfTu8.net
x VBA初心者
o 5ch初心者
o パソコン初心者
o コミュ障入門者(上級)
556:516
22/06/30 01:00:46.93 1OP/W/CA.net
DoCmd.OpenReport "レポート名", acViewPreview
DoCmd.PrintOut acPrintAll, , , acHigh, 枚数
新規レポートにラベルを貼っただけものだと希望どおりの枚数が印刷される.
しかし,別のレポートだと常に1枚しか印刷されない.
ネットでも同じ報告を確認した.バグ説もある.
皆さんはどうですか?やっぱりバグですかね?
557:516
22/06/30 16:01:17.27 1OP/W/CA.net
解決した.
デコンパイルとコンパクトしたらいつの間にか設定した枚数が印刷されるようになった.
accessはマジで面倒くさいなあ.
デコンパイルとコンパクトの待ち時間をを返して欲しいよ
558:デフォルトの名無しさん
22/06/30 19:00:33.50 PX9/MxY9.net
デコンパイル、知りませんでした。
559:デフォルトの名無しさん
22/06/30 20:22:38.17 1+oYjPxt.net
デコンパイル、昔は割と鉄板の解決方法だったんだけどね
それでだめなら新規作成して全モジュールインポートとかもあったな
最近は必要性が減ったけど、まだたまにはあるんだな
560:516
22/06/30 22:53:16.59 1OP/W/CA.net
コンパクトだけでも良かったのかも知れないが,習慣で両方やることにしている
ついいましがたも.Docmd.OpenReportのOpenArgsがレポートに渡らなくて困っていたが,コンパクトをしたら作動した.
終了時にコンパクトするオプションがあるくらいだから頻繁にやるべきなんだろうね.
コード書いているときは非常に頻繁に破損するからね.
561:デフォルトの名無しさん
22/06/30 23:46:30.14 1+oYjPxt.net
あれはデータ領域を圧縮するのが主で、コード部分にはあまり影響しなかった気がするが
最近のアクセスでコードが破損するのはだいぶ減ったと思うが
VBEからコンパイルするだけで解決してたんじゃないか?
562:516
22/07/01 00:40:02.55 SILFs/Ha.net
くわしいことはわからないが,挙動不審が治ることがあるんだよねえ
とにかく,試行錯誤していると必ずと言っていいほど,壊れるよねえ.
メモリーが不足していますとか出始めると,その日のうちに全フォーム消失とか起こるからなあ.
563:デフォルトの名無しさん
22/07/01 10:45:11.72 x9gnk4T5.net
試行錯誤の過程のほとんどを貯め込むからな 設定で「終了時に最適化」で、都度終了を心掛けるか
大幅な改修の度にコンパイルのクセを付けるか ファイルサイズに気を付けて、「こんなサイズのはずは無い」ってな時は要注意
で、それは、お道具の使い方が雑、間違ってるってだけで、すぐAccessのせいにする連中はお里が知れる ってこと
564:516
22/07/07 15:33:38.95 9tJXVGoG.net
下のコードで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
565:デフォルトの名無しさん
22/07/07 16:12:50.20 N4ENiOaQ.net
>>564
mdb/accdbファイルの場所が欲しいのなら
CurrentProject.Path
を使おう
CurDir$や>>564の例なんかで返されるカレントディレクトリはファイルダイアログとかで開いたフォルダになるっぽい
その辺の仕様に関する資料は知らんけど
566:デフォルトの名無しさん
22/07/07 19:57:05.70 V/fQnZ1U.net
そもそも、
>vbsならscriptの存在するディレクトリ
が間違ってる気がするが
カレントディレクトリの概念って最近は説明されてるの見ないなぁ
GetFolder(".")が返してるのはカレントディレクトリ(からの相対パスで自分自身)
カレントディレクトリはACCESS.EXEの場所や.MDBファイルの場所とは別に存在する
まあMDB開くときはそこをカレントにする場合が多いけどな
つねに一致してるとは限らん
567:516
22/07/07 20:26:42.06 9tJXVGoG.net
>>566
> そもそも、
> >vbsならscriptの存在するディレクトリ
> が間違ってる気がするが
VBSで稼働していたスクリプトをVBAに移植している際に気づいたので、正しいと思います。
スクリプトを任意のフォルダにコピーしてそのフォルダ内のファイルを一括処理するのに使っていましたので。
568:デフォルトの名無しさん
22/07/07 20:31:06.22 ty1oWU7C.net
chdirで変えられちゃうけど
569:516
22/07/07 20:55:49.31 9tJXVGoG.net
ユーザはおいら1人だからいいのです。
570:デフォルトの名無しさん
22/07/07 21:30:15.27 V/fQnZ1U.net
いやだから、scriptの存在するディレクトリじゃなくて、
カレントディレクトリが表示されてるって話なんだがな
たまたまそれが同じだっただけだ
ここ理解しないと思ったディレクトリが表示されない理由が理解できないぞ
571:デフォルトの名無しさん
22/07/07 22:24:24.15 rKn8i4wF.net
馬鹿に何を言っても無駄な例だぞ
572:デフォルトの名無しさん
22/07/08 10:33:00.73 aHYxM19P.net
>>567
そのスクリプトをショートカットにして、
作業フォルダを変えて動かしてみたい
573:デフォルトの名無しさん
22/07/08 12:10:02.96 /znuHP85.net
カレントディレクトリみたいな、あやふやなものを使ってはいけない。
これが使えるのは、絶対に変化しない場合だけ
起動時に、特定のフォルダを指定するとか、
あらかじめ定数などに保存しておく
574:デフォルトの名無しさん
22/07/08 12:16:33.93 /znuHP85.net
例えばデスクトップに、以下のショートカットを作ると、
WSL2 で、Ubuntu 18.04 を起動して、
その /home/ユーザー名/test ディレクトリを、VSCode で開く
リンク先
C:\Windows\System32\wsl.exe code .
作業フォルダ
\\wsl$\Ubuntu-18.04\home\ユーザー名\test
575:デフォルトの名無しさん
22/07/08 12:30:53 PreZKXp3.net
もはやAccess VBAとは関係ない話になってるし、元質問者は聞く耳持たないみたいだから
これ以上続ける意味無いよ
576:デフォルトの名無しさん
22/07/11 11:04:56.16 1W23UOpt.net
>>564
fso使ってるんだから当たり前
577:デフォルトの名無しさん
22/07/12 17:20:09.84 xDQ7ywi9.net
>>576
なぜ「fsoを使うと」なにが、「当たり前」なんだい?
578:デフォルトの名無しさん
22/07/13 18:08:17.37 sooqvjiy.net
7月12日のWindows Updateを実施した端末で軒並み「要求されたタイプ ライブラリまたはウィザードは VBA プロジェクトではありません。」
というエラーが出てAccessで作ったものが起動できない症状が出てるんだけど、何か知ってる?
ちなみにAccess Runtimeを再インストールすると直る。修復ではダメ。
579:デフォルトの名無しさん
22/07/13 18:15:29.57 sooqvjiy.net
>>578 書き忘れたけど手元で問題が発生しているのはAccess Runtime 2013 32bitの端末。
OSはWin8.1とWin10の両方で発生してる。
580:デフォルトの名無しさん
22/07/13 19:12:40.99 PtV2v+lq.net
うちの環境とほぼ同じですね、まだ発生してないけど明日あたり起きるのかな。
runtimeの入れ直しですね、了解っす。
581:デフォルトの名無しさん
22/07/14 09:57:45.69 gGJjrJSy.net
>>578
特定した。
KB5002121を入れると症状が発生する。
Access Runtimeを再インストールしても再度Windows Updateを実施すると元に戻るから
KB5002121をブロックしないとダメだ。
582:44
22/07/14 12:52:21.90 Fq9OF9ol.net
迷惑な話ですねえ。
MSのプログラマーがアホなのは今に始まったことじゃないけど
583:デフォルトの名無しさん
22/07/14 18:41:39.80 Zi9qyvS+.net
昔EXCELのVBAで似たような話が合った気がするな
その時はテンポラリディレクトリの掃除したら起動するようになったはずだから
いちど試してみては
584:デフォルトの名無しさん
22/07/18 12:31:42.55 1omE+gQa.net
MSは自社製品のテスト駆動開発すらしてない
テストが面倒になるとサポート打ち切り
585:デフォルトの名無しさん
22/07/18 13:02:03.33 dNd6yRIh.net
>>584
それソースあるの?
586:デフォルトの名無しさん
22/07/19 13:18:07.18 4mWHj4S5.net
2022年7月パッチで「Microsoft Access」に問題、バージョンが異なるとファイルが開けない
URLリンク(forest.watch.impress.co.jp)
>異なるバージョンの「Microsoft Access」で作成されたデータベースファイル(ACCDE/MDE)を開こうとすると、「要求されたタイプ ライブラリまたはウィザードは VBA プロジェクトではありません」というエラーが発生する場合がある
587:デフォルトの名無しさん
22/07/20 10:36:39.60 Rwr2SDqT.net
Formを変数にSetするとき下の二つのやり方のどちらが速いか試したら、結構まちまちなんですよね。
後者はEarly Bindingだと思うんだけど、ループさせると前者が速いことも結構あって不思議だ。
だれかこのあたりの事情をご存じの方いますか?
Dim F As Form
Set F = Forms!FormName
Dim F As Form_FormName
Set F = Forms!FormName
588:デフォルトの名無しさん
22/07/20 11:16:41.39 2HHkZJi9.net
>>586
runtime版でそれ出たな、試行錯誤でruntime2016からruntime365に変えたら動いたw事がある。
589:デフォルトの名無しさん
22/07/20 15:41:40 qJwz0nM8.net
runtimeは糞
590:デフォルトの名無しさん
22/07/20 18:29:58.22 BaO5YoZA.net
>>587
あってるかどうかは知らんが
!は実行時に列挙する気がするんだが
後者は型チェックと変換が入るから後者のほうが遅いと思う
前者も入るかもしれんが、そうなるとForm型とForm_FormName型でどっちのキャストが早いかで
結局やっぱり後者が遅い気がする
どっちにしたってFは型指定されているので事前バインドだが、
それが差に出るのはFのメンバーを使うときだぜ
まあ、なんにしても誤差レベルだと思うが
591:デフォルトの名無しさん
22/10/28 11:06:17.52 L4jXkRvB.net
PC画面のスクショを撮って、印刷させたいのですが
とっかかりすら分からない初心者です
検索しても該当サイトはなかったので
よろしければご教授願いたいです
592:デフォルトの名無しさん
22/10/28 12:19:16.61 QXDDHW1b.net
>>591
Windows標準の切り取り&スケッチを使えばできます
ACCESSからコントロールしたいのですか?
593:デフォルトの名無しさん
22/10/28 12:33:34.88 L4jXkRvB.net
>>592
はい、ExcelかAccessでとのことで、
今後の勉強含めAccessに挑んでいます。
不特定多数が使用する環境で
(リテラシーが低い人も混在)
ボタン一つで全画面スクショ印刷と
アクティブウィンドウのみスクショ印刷
の2通りできるようにしたいです
(スクショしたデータは印刷後削除される仕様にしたい)
今のところ全画面スクショはできたのですが
アクティブウィンドウと
その後の印刷と削除で、つまづいてます。
ド初心者なので、見当違いな質問をしていたら
申し訳ありません
594:デフォルトの名無しさん
22/10/28 12:48:59.54 14o/00kf.net
API経由で[PrtSc](全画面)、[Alt]+[PrtSc](アクティブウィンドウのみ)を押せばクリップボードに画面キャプチャができるだろうから
それをレポート上のImageに突っ込んで印刷すればいいんじゃないのかな?
試してないから実際にできるかは知らんけど
595:デフォルトの名無しさん
22/10/28 18:23:03.59 ivdM6iIS.net
>>594
ありがとうございます
土日に試してみます!
596:デフォルトの名無しさん
22/12/09 21:17:19.25 XI7rGRQs.net
サーバーから検索したいのに上手くいかない
どこか修正するとこありますか?
Private Sub CommandButton1_Click()
Const BASE_PATH = "\\L\設計\図面"Dim myPath As String, myName As String
Dim FSO As Object, oFolder As Object, oSubFolder As Object, oFile As Object
On Error Resume Next
If TextBox1.Value = ""Then Exit Sub
ListBox1.Clear
Set FSO = CreateObject("Scripting.FileSystemObject")
Set oFolder = FSO.GetFolder(BASE_PATH)
For Each oSubFolder In oFolder.SubFolders
For Each oFile In oSubFolder.Files
If LCase(oFile.Name) Like LCase(TextBox1.Value) &"*.pdf"Then
Debug.Print oFile.Path
myPath = oFile.ParentFolder &"\"myName = oFile.Name
ListBox1.AddItem myName
ListBox1.List(ListBox1.ListCount - 1, 1) = myPath
End If
Next
Next
Set FSO = Nothing
End Sub
597:デフォルトの名無しさん
22/12/10 17:10:55.98 HwePKFIg.net
何がどううまくいかないんだ?
On Error Resume Next外して、エラー内容かけ
598:デフォルトの名無しさん
22/12/11 02:53:35.00 08xatqWx.net
知らんけど、コマンドプロンプトで取得した方が速いと思うぞ。
599:デフォルトの名無しさん
22/12/11 14:47:06.06 BK2dpDEr.net
ネットワークだとビックリするほど遅いよね
600:デフォルトの名無しさん
22/12/21 12:29:44.27 29nQbkr4.net
表形式にしたフォーム上の一行一行に対して、そのレコードのID.pdfが指定のフォルダにあれば○、無ければ空白って文字を連結したテキストボックスに入れたいんだけど。
Dir使って判定させるところまでは出来たけど、vbaを実行させるタイミングの問題なのかな?
詳細セクションの描画時選んだら代入出来ませんって出た。
試しに詳細セクションダブルクリックだと該当レコードだけは入ったけど。。
一括で全レコード対象にする方法あるんでしょうか。。?
601:デフォルトの名無しさん
22/12/21 13:19:20.60 oTvIdtcL.net
データシートビューのソースの段階でクエリ使ってる?
〇や(空白)を入力するフィールドは確保されてる?
元のソースにpdfファイルがあるか無いかを画面上で比較しながらひとつずつ入力するつもり?
仮のテーブル作ってフォルダ内のpdfのファイル名をDir使ってそのテーブルに代入すれば
簡単に元のソースにも反映出来ると思うけど どうしてもデータシートビューで比較しながら入れたい?
pdfが入ってるフォルダ内がしょっちゅう追加・変更・削除がある場合だとしても、仮のテーブル使っとけば
都度最新の状況での比較が可能だと思えるし、不足してるからpdf作らなきゃ、の指針にも成るような気がする
でも、元のソースに〇のフィールド作っちゃうと、pdf削除されても〇のまま消えない可能性もあるから対策必要か
つまり、一括で全レコード対象にするなら、Dir結果をcsvなりtxtなりに落とし込んで、それと元ソースで更新クエリがいちばん早い
602:デフォルトの名無しさん
22/12/21 14:08:13.72 29nQbkr4.net
>>601
ありがとうございます
一旦別のテーブルなりCSVなりにファイル一覧作ってみる事にします!
思い付きもしませんでした
603:デフォルトの名無しさん
23/03/02 17:30:45.61 oTm0acsN.net
値にtrueやfalseが含まれるexcelファイルをDocmd.TransferSpreadsheetを使ってテーブルに取り込むと、
数値として反映されてしまうんですが、理論値のまま取り込む方法はありますか?
変換かけるしかないのかな
604:デフォルトの名無しさん
23/03/05 12:31:16.13 Yb2sf8rL.net
>>603
取り込んだ後でクエリーで値変えれば良かろうに
605:デフォルトの名無しさん
23/03/24 00:30:10.12 higFVnZ+.net
recordset.Fields.Append "フィールド名", adChar, 200
とかでフィールドを新規設定するといろいろと挙動不審になって、エラーが頻発した。
俺が気がついたのはLen関数がおかしな数字を返すこと。スペースの数を返す。
これのおかげなのか、DictionaryのKeyが変なことになり、ただしいItemが取得出来なくて2日潰したわ。
Trim関数に入れたらまともに動き出した。よけいなスペースが付加されていたため、本来の値と異なっていた。
このあたりの事情を書いたものあるのかなあ?
606:デフォルトの名無しさん
23/03/24 10:46:32.87 pyQciQm5.net
Recordsetの作成(DAO編)
URLリンク(www7b.biglobe.ne.jp)
レコードセットの作成(ADO編)
URLリンク(www7b.biglobe.ne.jp)
第4話 DAOとADOの違い
URLリンク(www.r-staffing.co.jp)
同一システム内でDAOとADOを併用しないよう留意 とか?
607:デフォルトの名無しさん
23/03/25 11:49:45.50 zs10i3Ml.net
エラーが出るもんだから、VarType関数使って疑わしい変数を調べたら、18が返ってきた。
しかし、そんな定数ないんだよなあ。これはどういうことだ?
608:デフォルトの名無しさん
23/03/25 11:59:33.48 nHkGBQf7.net
値の合計なので、10と8とか 5と6と7とか 思い当たるのをひとつずつ潰してく
609:デフォルトの名無しさん
23/03/25 13:37:32.34 zs10i3Ml.net
>>608
ありがとう。
Msgboxでそような定数の合計をしますね。
ところで、そのような知識は私の持っているVBA、VBS、Accessの本には記載されていない様な気がします。
もしかしたら、Visual Basicでは常識なのでしょうか?それとも一般的なプログラミングの世界での常識ですか?
私は仕事でVBAをいじるだけで、一般的なプログラミングはほとんど知らないのでお尋ね致します。
610:デフォルトの名無しさん
23/03/25 14:20:16.26 nHkGBQf7.net
本はあくまでも全体のほんの一部を抽出して購買欲そそるタイトル付けて売ってるだけ
MSのリファレンスに頼るのが本筋
URLリンク(learn.microsoft.com)
URLリンク(learn.microsoft.com)
ネットの情報でも、ご丁寧にスクショ混ぜて説明してるのに、すでにUI変わってて役に立たないとかも多い
紛らわしい情報が氾濫する中で、どれがじぶんの求めるお宝なのかを見極める目を養うのもだいじ
611:デフォルトの名無しさん
23/03/27 19:32:00.21 zT0GYsm+.net
>>605
CHARとVARCHARの違い
まあ、SQLの型の基本なんだが、ACCESS関連であまりちゃんと解説してるのみたことないな
URLリンク(learn.microsoft.com)
OLE DB プログラマリファレンスの第 13 章および付録 A を参照してください、らしい
612:デフォルトの名無しさん
23/03/27 19:43:31.02 zT0GYsm+.net
>>609
ビットマスクって考え方があって、別にVBAに限った話じゃない
が、VarTypeで18ってリファレンス見る限りないな。
どんな変数がその値だったんだ?
613:デフォルトの名無しさん
23/03/29 07:20:36.71 P3Zmpymz.net
AIに書いてほしいコードを聞くと正しく動くコードが返ってくる
bingとchatGPTは頼れる、かも
614:デフォルトの名無しさん
23/04/04 10:14:28.50 Az13f9J9.net
最近の VisualStudio に搭載されたコード補完は
おせっかいなくらいにコードの続き出てくるな
615:デフォルトの名無しさん
23/04/04 16:33:58.07 vSpSLcg3.net
>>613
俺はChat GPTに嘘ばかり教えられている。
用語の定義から間違えている。
Chat GPTの吐いた嘘を貼り付けるページがあったら参加したいわ。
616:デフォルトの名無しさん
23/04/04 17:16:46.37 SG+vqM06.net
>>615
確かに鵜呑みには出来ないね、よく嘘を言ってくる。ある程度自力で捌けないとヤバいね
617:デフォルトの名無しさん
23/04/05 00:48:28.57 wtS5Em1S.net
嘘を嘘と見抜けない人の利用はお勧めできない、か
どっかで聞いた話だな
618:デフォルトの名無しさん
23/04/05 19:08:02.04 iYloijFa.net
GPTのウソ、具体例有ったら教えて
619:デフォルトの名無しさん
23/04/08 23:18:08.84 m5gy6cDu.net
Excelスレに貼られていたWebview2のコードはワロタ
620:デフォルトの名無しさん
23/04/10 19:36:08.19 YifXJ3Ct.net
今日も大嘘をつかれました。
質問
MS Accessのvbaで既に存在するプログラム中に宣言されていない変数があります。これを探して,宣言するvba プロシジャーを教えて。
回答
MS AccessのVBAで、プログラム中で宣言されていない変数を検出して、宣言するための手順を説明します。
MS Accessを開き、VBAエディターを起動します。
検索機能を使用して、すべてのモジュール内の未宣言の変数を検索します。
未宣言の変数を検索するには、VBAエディターで「Ctrl + F」を押して、「検索」ダイアログボックスを開きます。ダイアログボックスで「未定義の」または「未宣言の」を検索キーワードとして入力し、「検索」または「次へ」ボタンをクリックします。これにより、未宣言の変数が使用されている場所がすべて検索されます。
未宣言の変数を見つけたら、変数の宣言を追加します。
例えば、未宣言の変数「myVariable」が使用されている場合、以下のように宣言を追加できます。
Dim myVariable As DataType ' 変数の宣言
DataTypeは変数のデータ型を指定するために使用されます。例えば、myVariableが数値である場合、データ型はLong、Integer、Doubleなどになります。文字列である場合は、データ型はStringになります。
全ての未宣言の変数を宣言したら、プログラムを保存して実行してください。
これにより、未宣言の変数エラーが回避され、プログラムが正常に実行されるようになります。
621:デフォルトの名無しさん
23/04/12 18:35:03.42 b8lcjBjc.net
未宣言の変数が300種類くらいあるポンコツ業務用mdbがある。Option Explicit化して手作業で未宣言変数を探すとものすごく時間がかかる。ローカル変数だけならテキストに対しての構文解析だけで出来そうだけど、誰かやり方知ってますか?
Access用の解析ツールは時間がかかりすぎるので諦めました
622:デフォルトの名無しさん
23/04/14 12:20:23.58 ooEkRg5K.net
全角数字を含むフォームは普通VBEのプロジェクトエクスプローラでも全角数字で表示される。
しかし、俺の持っているmdbはなぜかフォームによってはVBEで半角の場合がある。
つまりForm1番→Form1番
というように半角になっている。
フォームのもっている名前とモジュールの名前が異なるので検索漏れが発生して何かと不便。
解決策ありますかね?
623:デフォルトの名無しさん
23/04/19 15:36:15.06 hTeej4zs.net
>>622
Accessのバージョンによって全半角を同一視されるのとされないのがあったよーな
半角に統一して、置換するしかないんじゃね
624:デフォルトの名無しさん
23/04/19 21:07:01.70 UiOYL9zn.net
>>623
VBEはクラスオブジェクトのリネームはできないんですよねえ
Text化してファイル名を統一してから読み込みますかねえ?それでなおるか未確認ですが。
今は検索文字列のパターンを増やして対応してますが、邪道だなあと思いながらやってます。
625:デフォルトの名無しさん
23/04/20 00:39:31.09 Ck2wYtqO.net
ACCESS側で名前変更しても、VBE側が変わらないことがあるっぽいな
フォームの コード保持 を いいえ にして保存してから はい にしたら同じになったぞ
まあ、コード全部いったん消えるがな
626:デフォルトの名無しさん
23/04/20 10:07:33.88 b7y+tf5m.net
>>625
テキスト化してフォームと同じ全角のファイル名にしてからLoadしたらVBEのクラスオブジェクトの名前と一致させることが出来ました。
思うに、このプログラムを書いた人はテキスト化して、お好みのエディタで書いていたんでしょうね。
だからOption Explicitなんてしてなくて、問題なく書けるので、変数のスペルミスがあります。
今回はファイル名の全角半角を間違えてままLoadしてフォーム名とクラスオブジェクト名が一致しないということになったと思います。
よほどVBEを使いたくなかったんでしょうね。
627:デフォルトの名無しさん
23/04/28 05:20:11.81 d0ZMhP2N.net
やけにエラーが出るので調べたら、クラスオブジェクトの名前のカッコが前側が半角、後側が全角のものを発見。しかも複数。
俺はプロじゃないけど、このデータベースに毎月金を払っている。金取るならちゃんとしたものを作って欲しいわ。
宣言だけして読み書きしない変数が約2000個、呼び出されないプロシジャーと空のプロシジャーが100個以上がもあるし、どうなっているんだ?
戻り値のないプロシジャーをFunctionにして,呼び出すだけのために変数を使ったりしてアホかと思うことばかり
628:デフォルトの名無しさん
23/05/03 21:33:01.68 u6AyBhT9.net
クエリがいくつかあってそのなかであるテーブルを使ってるかどうか検索する方法ないですか
629:デフォルトの名無しさん
23/05/03 21:34:54.38 u6AyBhT9.net
これVBA関係ないな
630:デフォルトの名無しさん
23/05/04 13:12:55.46 xnh5NJU8.net
関係無いけど、ヒマだから
URLリンク(www.feedsoft.net)
この手順でコツコツ「リレーションシップ」を出力してけば把握できる
631:デフォルトの名無しさん
23/05/04 20:33:29.74 i/jCXYvG.net
QueryDefsのSQLプロパティをinstringで調べる
それをループ かな
632:デフォルトの名無しさん
23/05/10 00:24:35.45 qaMHPguU.net
>>631
これがベストだね
633:デフォルトの名無しさん
23/05/12 20:45:34.35 nGf/Bj/G.net
流行りのChatGPTをACCESSで使えるようにしてみた
BingやBardもレスポンス良く使えるようになったのであまり意味はなかったが面白かった
VBAコードはChatGPTに書かせたのをほぼコピペで動くようにできた
634:デフォルトの名無しさん
23/05/13 09:19:13.17 uR6hVfud.net
スレの意図を無視するがAccessは出来るだけVBA使わず作成する方がバージョンアップにも対応し易い
635:デフォルトの名無しさん
23/05/13 13:15:28.85 JkElVRfp.net
お客様に納品するならそういう気遣いも要りますね
自家用なので気の済むまで作り込みます
自社の50人くらいが快適なように
636:デフォルトの名無しさん
23/05/13 16:13:18.44 74jfRr8+.net
どうした? 総合で同意が得られなかったから改めてコッチに書いたのか?
Accessをインストールだけして使わないでいればバージョンアップもへったくれも無いから、そうした方がいいぞ?
637:デフォルトの名無しさん
23/05/14 08:52:04.69 UU9sI9hc.net
Rubberduckは大きいデータベースだとパース中にエラーが出て使い物にならないねえ
数年前よりはるかにマシになったけど。
638:デフォルトの名無しさん
23/05/16 21:12:36.24 dmITDlP3.net
msgboxの戻り値を格納する変数の型をvbMsgboxResultにするかLongにするか悩んだので、
時間を計ろうと思って、古い本を引っ張り出して、二つを比較するプロシジャーを書いた。
ふと、全く同じテストをしたらどうなるのか気になったので、やってみたら、全く同じプロシジャー同士の比較なのに30%位スピードに差が出る。さっきやったら最大で37%速度差があった。
一方が速いこともあれば、もう一方が速いときもある。こんなのでスピード比較する意味あるのかなあ?
時間測定はGetTickCountを使って、変数宣言のみ100万回のループをするプロシジャーを100回呼び出すという感じ。
なんかいい測定方法ありますかね?
639:デフォルトの名無しさん
23/05/16 21:52:45.08 Mqz2m8JL.net
timer使っても同じかな
640:デフォルトの名無しさん
23/05/17 06:33:48.44 AOXlzNDq.net
timerが秒単位でGetTickCountはミリ秒単位と古い本に書いてあったなあ
あと、timerはそれ自体の動作が遅いって書いてあった
641:デフォルトの名無しさん
23/05/18 18:57:23.27 8+QzSev9.net
ユーザーフォームが大きいんで下半分を隠す、上半分を隠す、という2つのコードを書きたいんです。下半分を隠す、はハイト プロパティを小さくすれば可能なんだけど、上半分を隠す、は不可能なんですかね。
642:デフォルトの名無しさん
23/05/18 20:29:25.05 FTp82+/Y.net
>>641
何をやりたいのかイマイチ分からんけど、タブコントロールじゃだめなん?
643:デフォルトの名無しさん
23/05/18 21:32:12.21 UaeB70YO.net
上半分を隠したら×ボタン無くなってにっちもさっちも行かなくなるぞ
644:デフォルトの名無しさん
23/05/18 21:36:12.00 /q1eE0wB.net
>>641
2つのフォームに分けたら良いと思うの
645:デフォルトの名無しさん
23/05/19 21:09:14.22 j+pEmA6B.net
>>642
>>644
ありがとう。皆さんのアイデアをためします
646:デフォルトの名無しさん
23/05/23 14:00:02.22 MnQDcyxi.net
質問です。
Excelファイルを読み込んで、加工してからテーブルとして保持したいんですが、
Excelファイルのまま編集してinsertするのと、
一度テーブルとして読み込んでから編集してinsertするのはどちらが高速でしょうか?
647:デフォルトの名無しさん
23/05/23 14:42:54.35 3uLTyIP1.net
insert ? inport の手順なら下記リンク先を参考に
URLリンク(hamachan.info)
Excelファイルをリンクでもいけるし 同作業を何度も繰り返すとかでも、操作を保存しとけば楽だし
データのボリューム次第とかマシンスペックとかも兼ね合いがあるから、どちらとも
ウィザードの途中画面をよく見て、事前にExcel側を整えて置けば inport も楽だし
編集内容がより細かく設定できるのはExcelなのかAccessなのかを知る事でも、どちらの方法を採るかの判断になる
648:デフォルトの名無しさん
23/05/23 15:03:14.67 MnQDcyxi.net
いろいろありがとございます、しかしimportではなくinsertです
内容を見て既存のテーブルに1行ずつinsert(もしくはupdate)していく形になります。
649:デフォルトの名無しさん
23/05/23 15:26:17.99 3uLTyIP1.net
んーと、Access側のテーブルはあくまでもデータストック用な立ち位置?
事前にExcelでの編集が伴うなら、Accessのテーブルとしてから編集するのはムダなような
URLリンク(tonari-it.com) コッチのが参考に成るかも 実行速度の検証もしてる様子
650:デフォルトの名無しさん
23/05/23 16:47:55.53 MnQDcyxi.net
ありがとうございます!
いまさらっとですが見てみたところ、速度比較などもしていて参考になりそうです。
見てみます!
中間テーブルを作成してから編集した方がいいよ、という声を聞いたんですが
いちいち使わないテーブルに投入する必要はないのでは?と思い質問いたしました。
事前編集方式でやってみます!
651:デフォルトの名無しさん
23/05/23 18:12:18.40 3uLTyIP1.net
Excelの元データと、何をどう編集したいかも判らないから、中間テーブルの必要性は当人しか判断不能
上でも書いたけど、編集内容がExcelの方が楽で早いのかAccessの方なのかでも手順は変わるような
速さを第一に求めているように読めるけど、「一行ずつ」って書かれた部分で「おや?」と
スムースにデータを移行させるには、最初のリンク先の「データクレンジング」も読んでおいてもムダには成らない
アチコチに目を配らなければならない様子でお疲れ でもそれがじぶんの糧に成る
652:デフォルトの名無しさん
23/05/24 08:46:04.47 AU7HKxhu.net
>>646
ExcelインポートしてAccessで加工する方が速いよ
ExcelでVBAでデータ加工するなんて愚の骨頂
653:デフォルトの名無しさん
23/05/24 10:26:10.15 eouMPy16.net
みなさまいろいろありがとうございます
自分の説明不足&理解不足ですみません。
ACCESSに入っている一覧情報を定期的に更新しなければならず、
その更新情報がExcelで来るのでそれを読み込んで…とやる感じです。
ACCESS側で固有に更新している情報もあるのでまるっと上書きではなく、
一行ずつ確認して該当の列のみ追加や上書きをしなくてはいけません。
それを、いまはAccessVBA内でExcelファイルを開いて
一行ずつ読み込んで内容確認して内容によってSQL流して…とやっているのですが、
もしかしてExcelファイルを中間テーブルにimportしてから
操作した方が早いのかな??と悩んで書き込んだ次第です。
「ExcelインポートしてACCESSで加工」と言ってくださってるのは
後者の場合を指しているのですかね?
今はとりあえずサンプルを作って動かして比較しようかと思っています。
654:デフォルトの名無しさん
23/05/24 10:50:21.63 l+gVJ33A.net
そういうことなら中間テーブルに取り込んで、テーブル同士の差分をチェックかな
URLリンク(tasukete-access.com)
[フィールド単位での差分をチェックする] この方法のが近いのか
655:デフォルトの名無しさん
23/05/24 23:16:20.24 CzWxWRtY.net
返信遅れてすみません!ありがとうございます!
こんなやり方ができるんですね!
全部SQL書こうと想ってましたがクエリで楽に作れるかもしれず嬉しいです。
参考に書いてみます、本当にありがとうございます!
656:デフォルトの名無しさん
23/05/26 17:24:59.84 sT8UcBqC.net
500以上のモジュールにOption Explicitが書いてない。
当然、宣言されていない変数が何百もある。
ここにOption Explicitを書くと、宣言されていない変数を見つけるたびにコンパイルが止まるので面倒。
一括して発見する方法を知ってる人いますか?
VBEが発見できるので、その方法が分かればユーザにも分かるはずだと思うが、検索しても見つからない。
Cのコンパイラを自作する技術があれば、文法解析の手法が使えると思って調べたけど、全余暇時間をコンパイラ自作に割り当てても6ヶ月かかったと言ってる人がいて、踏み出せない。
657:デフォルトの名無しさん
23/05/26 19:16:13.82 +AT6wCCw.net
こんなん見付からはりました
URLリンク(stabucky.com) 実際に検証はしてないんで、自己責任 ←重要!!
現物mdb(そんなのはAccdbでは無くmdbだと勝手に決め付けてる)では無く、コピーしたファイルで
尚且つネットから切り離しスタンドアロンで、更に30秒後に発火するかも知れないので消火器用意してから
試してみてください 結果報告が期待されます
VBE上でCtrl + Spaceで入力支援機能(サジェストっつーの?)を出して、いっこずつTABで拾いだす案を
提案しようと思いつつぐぐってたら出てきた代物 宣言してなかったら自動メンバー表示(どの名称が正式か知らん)
にも出てこないのか!?と、ようやく気付いたレベルの人間のレスなので、眉唾しながら(若しくはスルー推奨)
VBAでJavaScriptを使うには?という場合は : URLリンク(extan.jp) とか
あと、『なお「unique」という自作の関数を使っています』とあるので、それも併せておかないと動作しないかも(きっと)
658:デフォルトの名無しさん
23/05/29 16:07:15.09 AvjLnKXj.net
>>657
ありがとう。
少しずつ試してみます。
いろいろ調べて、いまはFlexとbisonという奴でもやってみたくなっています。
659:デフォルトの名無しさん
23/06/08 22:05:58.45 tPqYzYSn.net
配布したaccdbを365runtimeで動かしてて、今朝突然レポートが開かなくなった
ほぼ午前中すったもんだして2013runtimeならレポートの印刷やプレビューが問題無い事がわかってruntime差し替えた
こんな目にあったひと他にいない?
660:デフォルトの名無しさん
23/06/09 03:25:01.10 i6Y59lYy.net
>>659
はい、います
365で突然、帳票の罫線が消えた事があります
その時はAccessのバージョンを1つ前にロールバックして解決しました
方法は以下のURL参照
■Office - Microsoft コミュニティ
URLリンク(answers.microsoft.com)
今だと一つ前はバージョン 2304 (ビルド 16327.20248)ですかね
それでダメならもう一つ前へ
661:デフォルトの名無しさん
23/06/09 04:50:51.47 uT9lsXlY.net
ロールバック、覚えときます
ありがとう
662:デフォルトの名無しさん
23/06/09 12:36:00.93 G8Vh+N8B.net
それって、MSからバグフィックスや修正が為されたのを察知するにはどうしたらいい?
ロールバックしっ放し? 勝手にアプデされてまだ直らなかったら二つ前にロールバック?
ずっと修正されなかったらロールバックバックバックとかに成らん?
663:デフォルトの名無しさん
23/06/09 16:09:51.45 XhtkwaOO.net
>>662
察知は毎月リリースページを確認していました
バグが修正されるまでは Office の自動更新を止めます
なのでロールバックは最初の1回だけです
バグが修正されたら自動更新を有効に戻して最新版にする感じでした
更新は重大バグ修正の時のみ、原則自動更新は使わないという運用もあります
これに関してはお客さん次第ですかね
664:デフォルトの名無しさん
23/06/09 16:20:24.73 G8Vh+N8B.net
そうだよね 委託を請けてる業者さん目線だよね
エンドのユーザーはそんなのに目を通さないしね 見てもどれが自分の不具合に当て嵌まるか解かり辛いしね
じゃあ内製のユーザーはロールバックバックバックし続けるしか無いよね
アプデを停め続けるひとも居るかも知らんけど、そうすると1年分とか溜まってそれはそれで地獄を見るしね
やっぱこういう場所で症状とかを意見交換するのは貴重なんだ、と再認識
665:デフォルトの名無しさん
23/06/09 17:23:51.20 XhtkwaOO.net
>>664
はい、開発委託業者です
確かにエンドユーザーさんにリリースページは無縁ですよね
一応システム担当者さんにはお知らせしましたけど、こちらで随時チェックという感じでした
また修正されてもリリースページに載らない細かい不具合修正も多いです
レポートの罫線不具合はまさにそれでした
■最新チャネル リリースのリリース ノート - Office release notes | Microsoft Learn
URLリンク(learn.microsoft.com)
666:デフォルトの名無しさん
23/06/10 18:20:00.00 u0MJNtiG.net
あと、マクロだと screen.active.control とか出来ないよね
667:664
23/06/10 18:20:16.44 u0MJNtiG.net
誤爆
668:デフォルトの名無しさん
23/06/11 17:21:05.93 /gnEKRu3.net
sleep をどんだけにするかどうやって決めるの?
669:デフォルトの名無しさん
23/06/13 15:38:15.16 bu7CkXDV.net
VBAで自作のクラスモジュール作成したんですが、
それを引数で渡す関数の書き方がわかりません
Sub test(ByVal hoge As Hoge)
みたいな感じで書いたのですがうまくいきません。
(As Hogeが自動でAs hogeと変換されるし、エラーになります)
どなたか教えていただけませんでしょうか?
670:デフォルトの名無しさん
23/06/13 19:34:42.68 d6Pomi9y.net
>>669
引数hogeに引っ張られるVBAの仕様です
VBAでは変数にクラス名を使うのは避けた方が良いですよ
プロジェクト内に変数hogeが存在している時も同様です
671:デフォルトの名無しさん
23/06/14 11:24:04.63 3Eu4F25u.net
>>669
VBAでクラスモジュールなんて不要
672:デフォルトの名無しさん
23/06/15 16:26:17.40 VlP0x+zk.net
>>671
流石にそれはない。クラスモジュールがある方が便利だよ。
673:デフォルトの名無しさん
23/06/15 19:09:52.15 y9q9PTdn.net
bindってのでクラスモジュールの有り難みを知りました
674:デフォルトの名無しさん
23/06/15 20:42:35.42 RAXKxz4R.net
俺もクラス使いたい派
保守性が全然違う
675:デフォルトの名無しさん
23/06/15 22:46:38.48 VlP0x+zk.net
クラス使わないと同じようなコードが量産されて面倒くさすぎる
676:デフォルトの名無しさん
23/06/15 22:47:32.53 VlP0x+zk.net
ただでさえポンコツな言語なんだから、クラスぐらい使おうよ。
677:デフォルトの名無しさん
23/06/16 20:25:21.43 cjNqE8A3.net
>>675
そのせいだったのか、クラス使えば良かった
678:デフォルトの名無しさん
23/06/21 20:54:02.92 b8UND1s3.net
ADOでCSVからテーブルを作ろうとしたらレコードが大きすぎますって怒られるんですよ!
1レコード2000バイトも無いのにですよ!
400列くらいあるのがダメなんですか?
2013なんですが。
679:デフォルトの名無しさん
23/06/21 21:15:42.66 gk5UG/Z5.net
フィールド数の上限は255だからかな
680:デフォルトの名無しさん
23/06/23 13:04:47.47 pHYUvccd.net
フィールド数上限は実は罠
681:デフォルトの名無しさん
23/06/23 15:26:54.30 X84KLwiQ.net
過去最大のフィールド数は500
テーブル分割して収納した
682:デフォルトの名無しさん
23/06/23 15:42:34.83 jhieer6M.net
分割したらフィールド数じゃないな
683:デフォルトの名無しさん
23/06/23 16:07:44.83 /GlO4XTI.net
メモ型にコンマ付で格納
684:デフォルトの名無しさん
23/06/24 09:17:24.69 5hQB8dV1.net
>>683
それに意味有るの?
685:デフォルトの名無しさん
23/06/26 19:43:31.70 nvUGoLmX.net
Access2019でリボン非表示にするのは、どうするの?
686:デフォルトの名無しさん
23/06/26 20:17:04.89 nvUGoLmX.net
>>685
細工されないようにXMLで記述したい
687:デフォルトの名無しさん
23/06/26 21:25:45.94 Ezf4n+79.net
XML???
VBAでなら
DoCmd.ShowToolbar "Ribbon", acToolbarNo
ってのがあるが
688:デフォルトの名無しさん
23/06/27 08:56:44.60 5UYjwK7S.net
それだと使用者に解除されちゃうので、XMLで空のカスタムリボン作って、オプション→現在のデータベース→リボンとツールバーのオプションに設定したいんよ
Access2019だとスクラッチからリボン作ってもファイルボタンが残っちゃうのが解ったので、それで我慢する
689:デフォルトの名無しさん
23/09/14 09:18:05.95 t/htNvkA.net
サブフォームをもつフォームにおいて、
親フォーム側から
Me.サブフォーム.Requery
を実行すると、サブフォームのCurrentイベントが2回発生するんだけど、なんでなんだろ?
690:デフォルトの名無しさん
23/09/14 10:41:11.21 UPFEbPP4.net
大抵はそう組まれているからそう動作する
親フォームからひとつずつチェックしてみれば「あぁ、ここか」が出てきたりする
691:デフォルトの名無しさん
23/09/14 10:50:23.10 t/htNvkA.net
>>690
検証のために、メインフォーム上ににサブフォームとサブフォームをRequeryさせるだけのボタンの最小限の構成にしても
687で書いた現象が発生している(サブフォーム側はCurrentイベントにdebug.printを書いただけ)
私は何か根本的な勘違いをしているのだろうか?それともAccessの仕様なのだろうか?
692:デフォルトの名無しさん
23/09/14 12:58:11.51 UPFEbPP4.net
フォームをデザインビューにした時に出て来るプロパティシート
おおむかし、あの枠が狭くて知らぬ間に二行に記載していたことは稀によくあった
Excelで言う、セル内改行をやってしまっていた 見た目はいっこなので気付きにくい
或いは、サブフォームをよりシンプルなものでテストするとか
仕様なら同様の質問疑問がてんこ盛りに投稿されるはず
と思って探ってみたら、こんなのが・・
URLリンク(yamav102.cocolog-nifty.com) これ系?
693:デフォルトの名無しさん
23/09/14 13:40:41.27 t/htNvkA.net
>>692
サブフォームは新規作成した状態のものにCurrentイベントにdebug.print書いただけのものでも2回発生してるのよ
提示していただいたページはこちらで調べたときに見ていますが、そのページで書かれてるのは自分自身に対するRequeryのようなのでちょっと事情が違うようです
frmMain
------------------
Option Compare Database
Option Explicit
Private Sub btnRequery_Click()
Debug.Print "clicked ------"
Me.frmSub.Requery
Debug.Print "--------------"
End Sub
--------------------
frmSub
--------------------
Option Compare Database
Option Explicit
Private Sub Form_Current()
Debug.Print "frmSub Form_Current"
End Sub
---------------------
こんなかんじの検証用のを用意
694:デフォルトの名無しさん
23/09/14 13:41:20.11 t/htNvkA.net
んで、実行結果(イミディエイトウィンドウ)が
clicked ------
frmSub Form_Current
frmSub Form_Current
--------------
695:デフォルトの名無しさん
23/09/14 14:52:05.24 UPFEbPP4.net
イメージだけで応答してたから、どうにもとっ散らかってた 現物当たって真似してみた
URLリンク(learn.microsoft.com)
このイベントは、フォームが開いたときと、フォーカスがレコード間を移動したときの
いずれの場合にも発生します。
複数回発生して当たり前だった
Form_Load (読み込み時) 或いは Form_Abtivate (アクティブ時) に変えればおk
どうしてもForm_Current (レコード移動時)に設定したい場合は見て見ぬ振りをするしか
696:デフォルトの名無しさん
23/09/14 15:04:03.08 t/htNvkA.net
>>695
loadやactivateではrequery時にイベントが発生しないので、本来の目的を達成できません
また、最初にフォームが開かれたときにはcurrentは一度しか発生していません
697:デフォルトの名無しさん
23/09/14 16:54:04.40 UPFEbPP4.net
btnRequery をクリックしても Requery できない?という意味?
Me.frmSub.Requery を Me!frmSub.Form.Requery にしてみては?
Me. か Me! かでも変わって来るし、.Form を付ける付けないでも挙動が変わったような
あと、frmMain を開いただけでも frmSub Form_Current が発生するのも違う気がするし
frmMain でパラメータ変えて frmSub を Requery させたいとかなら
URLリンク(teratail.com) このhatenaさんの回答を参考にしてみたり
Docmd.Requery でやっつけてみたり Requeryの使い方もクセがあるので切磋琢磨が
必要だったり
698:デフォルトの名無しさん
23/09/14 17:08:38.96 t/htNvkA.net
>>697
frmSubはfrmMainに貼り付けられているのでfrmMainを開くと当然frmSubも開かれるので、
Open, Load, Current等のイベントはひととおり発生します(仕様通り)
これについては特に問題ではありません
問題にしているのはbtnRequeryをクリックしたときに、Me.frmSub.Requeryを一度しか呼んでいないのに
frmSubのCurrentイベントが二度発生していることです
紹介いただいたteratailのページを参考にあれこれ試してみたいと思います
699:デフォルトの名無しさん
23/09/14 21:20:00.47 dY8DD9uu.net
AccessにGROUP_CONCATみたいなのなかった?
700:デフォルトの名無しさん
23/09/14 23:10:56.65 kQn+Df7T.net
サブフォームのレコードソースにテーブル指定して >>693 やってもカレントは一回しか表示されんけどな
レコードソース無ければ2回カレントは表示される
サブフォームにレコードソース指定してる?
701:デフォルトの名無しさん
23/09/15 08:38:48.79 cxAk3WqI.net
>>700
たしかにレコードソースはしていしていません
なるほど理由はよく分からないけれど、原因は分りました
ありがとうございます
702:デフォルトの名無しさん
23/10/03 11:54:07.91 BE4+HOMv.net
ちょっと不思議な話
よくある数値の切捨て処理のfunctionとして
Function RoundDownDec(decNum as Currency, intPlace as Integer) as Currency
RoundDownDec = Fix(decNum * 10 ^ intPlace) / 10 ^ intPlace
End Function
処理したいデータの都合で与える数値も戻り値も十進型としています
(正負の処理などは今回の本題から外れるので例からは省いています)
RoundDownDec(33.6, 2) としたときに、33.6が返ってくるのを期待しますが33.59が返ってきます
不思議!
functionの中身を
Dim tmp As Currency
tmp = Fix(decNum * 10 ^ intPlace)
Debug.Print tmp
RoundDownDec = tmp / 10 ^ intPlace
と段階を踏ませるとイミディエイトウィンドウに3359が出るので更に
tmp = decNum * 10 ^ intPlace
tmp = Fix(tmp)
と分解すると、期待通りの結果(33.6)が得られます
Fix()の引数はdoubleなんで、暗黙的な型変換が行われているせいなんだろうけれど、微妙に納得がいかない不思議な話でした
703:デフォルトの名無しさん
23/10/03 11:59:45.89 BE4+HOMv.net
ちなみに蛇足ですが、普通に
Function RoundDown(dblNum As Double, intPlace As Integer) As Double
とdoubleを引数にした場合は、特別なことをしなくても RoundDown(33.6, 2) の結果は33.6となります
704:デフォルトの名無しさん
23/10/04 10:07:17.16 e9fui2Qq.net
浮動小数点を経由するので誤差から免れることはできません(以下はイミディエイト ウィンドウでの実行と結果)
? Fix(33.6 * 10 ^ 2), Fix(33.6@ * 10 ^ 2), Fix(33.6! * 10 ^ 2)
3360 3359 3359
単精度でも同様
? Fix(33.6@ * 10 ^ 2) / 100, Fix(CCur(33.6@ * 10 ^ 2)) / 100, Fix(33.6@ * 100) / 100
33.59 33.6 33.6
べき乗を使うことが誤差を生む原因の一部でもあったりするので、CCur()で一度補正?したりで影響を減らすとかも考えられます。
705:デフォルトの名無しさん
23/10/04 10:57:33.10 95ZKO4kH.net
検証ありがとうございます
浮動小数点を経由するので誤差がでるのは理屈としては理解できるのですが、
わざわざ十進型を使ってるのに…というのや、Fix()に渡される式の結果ではなく、
渡された段階で暗黙的な型変換が行われているっぽいのが腑に落ちなさの一因なのでしょう
706:デフォルトの名無しさん
23/10/04 14:52:16.68 e9fui2Qq.net
? Fix(33.6@ * 10 ^ 2) , Fix(33.6@ * 100)
3359 3360
の結果からもわかるように、今回の場合は 10 ^ 2 の値が浮動小数点であり ≠100 である
ということです
なので「33.6@ * 浮動小数点」は33.6@を浮動小数点として計算する(はず)ので、その結果が
許容できない値になってしまったと
対策として CCur(33.6@ * 10 ^ 2)で本来の値に近くなるように書きましたが、
べき乗の部分を一度整数変数に代入してから「33.6@ * 整数変数」の形にしてもいいと思います(未検証)
この場合、通貨型は内部整数 * 整数なのでここまでの計算結果に誤差はでません。(乗数マイナスは別)
RoundDownDec()を大量に使用する場合はパフォーマンスも考慮しないといけませんが、乗数を整数変数経由に
する方が CCur()関数使うより早いのではと思います(昔、関数使うと遅いなと思った経験)。
100万回くらい(適当)ループして検証してみてください。
707:デフォルトの名無しさん
23/10/04 15:22:35.37 95ZKO4kH.net
更なる解説ありがとうございます
? TypeName(10^2)
Double
正直これは盲点でした
原因がはっきりわかりすっきりしました
ありがとうございます
708:デフォルトの名無しさん
23/10/04 21:35:38.35 GiHPLbjK.net
VBAの内部計算につかう型は結構複雑な変換をする
33.6@ * 整数変数の結果は、Currency型だぜ
多くの関数や演算子で、より精度の高い型を使おうとするんだが、べき乗はDoubleしか返さん仕様っぽいな
自分でCurrencyかDecimalでべき乗する関数作れば解決
709:デフォルトの名無しさん
23/10/04 23:36:55.88 hn2MViTp.net
OpenArgsってなんて読んでますか?
何の単語の略なんでしょうか
ご存じのかた教えてください
710:デフォルトの名無しさん
23/10/05 01:14:56.61 6f6nA7M7.net
>>708
CurrencyかDecimalでべき乗する関数ってどのような?
711:デフォルトの名無しさん
23/10/05 04:00:15.23 xIPl72Do.net
>>710
こまかい条件省くとこんな感じじゃね
Function pow(x As Currency, y As Integer) As Variant
Dim i As Integer
Dim ret As Variant
ret = CDec(x)
For i = 1 To y - 1
ret = ret * CDec(x)
Next
pow = ret
End Function
Decimalは直接定義できないからVariantで宣言してる
712:デフォルトの名無しさん
23/10/05 04:05:04.32 xIPl72Do.net
>>709
おーぷんあーぎゅめんつ
argsはargumentsの略 引数
713:デフォルトの名無しさん
23/10/05 18:08:52.91 dRlX4TIE.net
>>711
そんな低レベルな関数書いて「解決っ」とか言っちゃって時点でバカにも程がある
714:デフォルトの名無しさん
24/02/19 13:32:04.50 2EJLRmB3B
岸田異次元増税憲法カ゛ン無視地球破壞軍國主義売國奴文雄か゛崇拝する世界最惡のならす゛者國家か゛落とした広島原爆て゛14万人殺されたそうだか゛
WMOによると1970年以降確認されているだけで気侯変動による災害で殺された人数は200万人以上經済損失は600兆円以上な
カによるー方的な現状変更で都心まて゛数珠つなき゛でクソ航空機に私有地侵略させて住民ヰライラ犯罪惹起してる税金泥棒クソポリ公騒音ヘリ
だの住民の権利を強奪して私腹を肥やす強盗殺人テロ国家日本.広島の公園では肉を焼くでもなく無意味に火を燃やし続けて温室効果カ゛スまき
散らし続けてこんなハ゛カ丸出し自己滿足で盛大に人殺しに加担しなか゛ら何が平和た゛か笑わせんなって話だろ、挙句の果てにサミッ├だの
爺7テ口リス├と゛もが国民から強奪した莫大な金て゛住民の生命と財産を破壞しながらハ゛カ丸出しオナニ━集會,氣候変動させて日本どころか
世界中で土砂崩れに洪水,暴風,熱中症、森林火災にと災害連發させて,核なんかおもちゃに思えるほどの地球破壊による大量殺戮しなか゛ら
他国非難とか,クソシナ顔負けのプ囗パカ゛ンダ放送繰り返したところて゛騙されるのは知障だけだそ゛クソテ口政府
(ref.) URLリンク(www.call4.jp)
URLリンク(haneda-project.jimdofree.com) , URLリンク(flight-route.com)
URLリンク(n-souonhigaisosyoudan.amebaownd.com)
715:デフォルトの名無しさん
24/03/24 13:50:16.81 6zfiQZRE.net
業務用のmdbがポンコツコードだらけなので書き換えてるんだけど、IIFが最大4個ネストしてあった。
4個ネストしてあるのは変数の値の判定が条件になっているけど、3個以下のは関数を呼び出している。
皆さんだったらどうします?
716:デフォルトの名無しさん
24/03/24 19:36:20.19 S7ogYjm0.net
将来も含めてどのレベルの人がメンテしていくかだろうな
ソースの書き方も人それぞれ
例えばコメントの書き方でも、巷では行間に書くのが多いが、私は画面内に一度に表示できるロジックの行数減って見通し悪くなるから、行末側に書きたい
画面も横長だし
とか厳密に書き方決めないと人それぞれになってしまうのよね
ネストの段数にしても固定してしまうと、ムダに外出ししてしまうとかもあったり
ソースを見やすくするか、コメントで逃げるとかはもうコーティング規則にするか、それしないなら担当者判断でしかない
iifもネストなんて場合によりどちらでもいい
717:デフォルトの名無しさん
24/03/24 22:33:27.39 6zfiQZRE.net
とりあえず、測定用の簡単なVBAを作って、IIFのネストがどのくらい遅いのか確かめてみます。
変数の値の判定くらいなら差はほとんどないという記事を読んだことがあります。しかし、関数呼び出しをするとかなり違うという記事も読んだことがあります。
なので、呼び出された関数が10個、さらにそれぞれの関数が10個の関数を呼び出すようなコードでも書いて調べてみます。
昔Ken Getzの本を何冊か読んだ記憶ではOptimizationの章では揃ってIIfを避けるように書いてありましたね。
718:デフォルトの名無しさん
24/03/25 10:06:54.06 wTe6l7XU.net
>>717
あぁ、それなら全ての条件を評価する(初期の判定で達しないとこも)から、遅くはなる
そういう弊害があるから一律使わなくするなんてことは、あったりするだろうね
そういうの見ると「はぁ⤵」って思うけど
719:デフォルトの名無しさん
24/03/25 15:11:37.51 wTe6l7XU.net
>>718
ちなみにif~thenも全判定なので、iif禁止で問題解決になるわけでもない
720:デフォルトの名無しさん
24/03/26 00:35:40.91 YALkMi+F.net
>>717
Access のIIFの問題は判定結果に関わらず
TrueパートとFalseパートの両方が評価(関数なら実行)されてしまう仕様
a = IIF(True, funcA, funcB)
funcAだけでなくfuncBもコールされる
aにはfuncAの戻り値が入る
関数の実装内容によってはパフォーマンスに影響が出るでしょうね
IFではどちらか一方のみ結果パートが評価されます
721:デフォルトの名無しさん
24/03/26 12:43:56.27 H7z+7I0f.net
>>719
if thenが全判定てなにを言っているんだ
andとorがショートサーキット演算しないだけだぞ
基本vbaはショートサーキットしない
例外はif関数ぐらいか
722:デフォルトの名無しさん
24/03/26 13:57:38.44 kj3sgFU0.net
>>721
日本語理解できない、省略を補完する知識もないシナのアホが飛来したな
723:デフォルトの名無しさん
24/03/27 13:19:17.09 BmA2tbQj.net
Select CaseはTrueが出たところで打ち切るからTrueになりそうな条件を上の方に書くべきて読んだことがあるなあ
724:デフォルトの名無しさん
24/04/19 10:08:55.39 uD5nyH4z.net
>>723
普通の人間ならそうなるだろ?
レアパターンを先に評価するやつなんて変わり者
725:デフォルトの名無しさん
24/04/19 11:20:47.33 TeTgAng2.net
>>724
1、2、3……順とかにするのは普通
頻度順にまではしないことも多々ある
726:デフォルトの名無しさん
24/04/25 00:00:11.21 SJJcBnEk.net
>>725
マジックナンバーかよw
727:デフォルトの名無しさん
24/04/25 00:18:38.90 9pftPPPG.net
>>726
┐(´ー`)┌
728:デフォルトの名無しさん
24/05/07 09:19:02.24 dcFbjZui.net
MT4かよ
729:デフォルトの名無しさん
24/05/26 18:34:28.21 TVlTpabA.net
FileSystemObjectのDeleteFolderかFolder.Delete使うと
対象フォルダーにシンボリックリンクやジャンクションあると
リンクじゃなく参照先が削除されるから気を付けた方が良いよ
定期的に掃除するログやバックアップフォルダーに
大事なフォルダーへのリンクなんか悪戯で作成されると消えちゃう
仕込まれた日と削除される日に時間差があるので追跡難しい
Defenderも気付いてくれない
フォルダーの削除はRmDirにしとき
730:デフォルトの名無しさん
24/06/19 13:39:07.69 Z4GWURaA.net
恐ろしい
そんな罠が
最近fsoの方使ってるから気をつけなければ
情報thx
731:デフォルトの名無しさん
24/06/21 17:49:43.88 97rAWOJS.net
kill のが一般的だと思ってたが、そんなことは無かったのか
シンボリックリンクやジャンクション(つまりショートカット?)とかがある場合の挙動は知らないけど
比べた人が居て、ほぼおなじ動作なら kill のが楽だと
URLリンク(www.limecode.jp)
732:デフォルトの名無しさん
24/06/21 18:18:10.26 JmSRYM7J.net
削除の差異は意識してなかったからよくわからんけど、ファイルやフォルダの扱いがfsoの方が書きやすい、わかりやすいでこっち使い始めたかな…
再帰とかfsoの方が書きやすい(ソースがシンプル)はず…
733:デフォルトの名無しさん
24/06/21 21:19:36.24 jAZYV/Wx.net
BASICはOSだからな
734:デフォルトの名無しさん
24/06/22 08:54:35.35 wHSF3406.net
違うか フォルダの中に拡張子.lnk があるかどうか事前にチェックするべきか(他の対象外のファイルとかも
DeleteFolder や RmDir だと無条件で削除してしまうからキケンがあぶないってことか
キャベツを包丁で切ったら青虫まで一緒に切り刻んでしまいました
あらかじめ葉をむしって洗ってから切りましょう みたいなことだろうな
735:デフォルトの名無しさん
24/06/22 11:29:50.78 n6A/NZx5.net
チェックするの面倒だから豆腐切れない斬鉄剣で切るんじゃないの?
736:デフォルトの名無しさん
24/06/22 11:47:45.85 R3uDiOs/.net
rm -rf /
737:デフォルトの名無しさん
24/06/22 13:28:14.09 AjNB02TK.net
NG🚮
738:デフォルトの名無しさん
24/06/22 13:38:00.95 o/eWDsQ7.net
どっちかというとやばいのは
rm -rf *
の方だったかな
739:デフォルトの名無しさん
24/06/24 00:37:34.39 sso3G8sO.net
>>733
それはBASICインタプリタが起動しているだけ
740:デフォルトの名無しさん
24/06/24 15:47:37.22 W/0xkGee.net
Accessに限らんじゃん Word でも Excel でもてことだよな
Excel連中に知られたら、阿鼻叫喚の世界だな あいつら節操無いし
741:デフォルトの名無しさん
24/06/24 16:26:48.42 F40a+XEU.net
知らなくても知ってたといいはるからなw
逆に知らなかったことにすることあるわ
森は大切に育てないとな
742:デフォルトの名無しさん
24/10/01 09:21:59.28 TDdMwhQJ.net
Conpact & Repairを内部からVBAで命令しようと思ってAIに訊きながら何時間も格闘したあとにググったらできないことが判明した。
Claude3.5とGemini Proがここまで馬鹿とは。
何度も提案してくるけどシンタックスエラー出しまくるし。基本構文すら間違えるようでは人間プログラマーはまだまだ安泰だね。
743:デフォルトの名無しさん
24/12/03 11:46:34.24 dxkeCahd.net
ファイルメニューのオプションで、閉じるときに最適化する を選んでおくだけでいいような
これをチェックしないまま使い続けて「壊れた」とか「容量が」とか大騒ぎする方々が多い気がする
気がするだけだけど ×Conpact ○Compact
744:デフォルトの名無しさん
24/12/03 14:00:15.98 En2cnAMO.net
毎回圧縮してたらすぐ壊れるよ
745:デフォルトの名無しさん
24/12/03 16:54:24.51 dxkeCahd.net
数十社(延べ数百台)の業務アプリこなして来たけど、そんな事例は一件たりとも経験していない
じぶんが開発用とか運用テスト用とかで仕立てて来たマシンでも、そんな事態に陥った経験は無い
圧縮と書いているけど、最適化を指定しておけば修復もするはず 修復できたものは壊れたとは呼ばない
それでも尚壊れたというなら、お作法に則って無い制作物だったとかなのかも知れない
少なくとも「すぐ壊れる」事態には陥らない
開発途中で、試行錯誤を重ねてあれこれ試してしまった ←ようなケースでも、その作業の途中で
手動で最適化する、或いは一旦閉じて最適化をさせるだけで悲劇からは回避できる
746:デフォルトの名無しさん
24/12/03 21:02:10.99 BzSKhMhy.net
中身全部別ファイルにコピーしないと、なんて事も珍しくはないけどね
747:デフォルトの名無しさん
24/12/04 00:01:04.29 hze6J6h6.net
運用中に壊れたことないけど、昔は開発中に度々壊れてた(壊してた)な…
昼と夜にバックアップしてた懐かしい思い出w
748:デフォルトの名無しさん
24/12/04 11:09:06.60 oDv/ROvl.net
Accessが安定したのは2000くらいからだよ
749:デフォルトの名無しさん
24/12/04 11:12:46.01 HphOCGl2.net
>>746
最適化は全部別ファイルにコピーしているよ
750:デフォルトの名無しさん
24/12/04 17:06:47.73 ZnmFvaLG.net
ニホンゴムツカシイネ
最適化の最中は隠しファイル作ってソッチにコピーした後圧縮して、完了したら元ファイルに上書きしてる
てことを言いたいのだろうが
(おれは)最適化(したファイル)は全部別ファイルに・・とも読めて、一瞬「無駄だろ?」とか思った
751:デフォルトの名無しさん
24/12/04 20:59:10.46 hze6J6h6.net
日本語プロパティになった時は、なんて事しやがるねんて思った
特定文字列がうまく認識されなかったり(T_T)
初心者にはわかりやすかったけれども
752:デフォルトの名無しさん
25/03/28 20:56:49.89 DlL+MxYf.net
ACCESSには散々、世話になったがもう要らないんでvisual studioにレポートとサブフォームの機能だけ移行して亡くなっていいよ
753:デフォルトの名無しさん
25/03/29 13:14:03.44 vo1WPeF9.net
ACCESSの便利さが全くわかってない素人w
あれをvsでやろうなんて全く思わない
vsでの書き方を覚えるのは不要な労力でしかない
vsでやれと言われたら従ってね。できなくはないからw
754:デフォルトの名無しさん
25/03/29 13:17:20.16 vo1WPeF9.net
>>753
ちなみに試しかけてはみたよ
ACCESS消滅するまでムダだとわかった
その頃の書き方も変わる可能性もあるし
755:デフォルトの名無しさん
25/03/29 16:02:13.66 M3jsTRd4.net
ADODBですねわかります
756:デフォルトの名無しさん
25/03/30 08:20:15.93 F3fFdGm1.net
>>753
>>754
何を一人でゴチャゴチャ言ってんだ?
757:デフォルトの名無しさん
25/03/30 09:20:48.46 bJrIExL2.net
草
758:デフォルトの名無しさん
25/03/30 22:12:48.36 GlW9emcv.net
何も言い返せない素人の捨て台詞
759:デフォルトの名無しさん
25/04/01 08:24:46.89 4aIYCmIe.net
Visual Studio って、開発環境では?
C# + Visual Studio とか .Net + Visual Studio とかのように、言語+IDEと捉えるもののような
そこへAccessのレポート組み込め、サブフォーム(←なぜサブ?)の機能加えろとか、思い違いも甚だしい
760:デフォルトの名無しさん
25/04/01 10:39:47.09 KG0zKw3F.net
昔はVSにクリスタルレポートのサブセットとかバンドルされていたからレポートほしいという要望は普通では?
自作ではページングとか面倒だし
WinFormならあるからサブなんでしょ
見せるだけならデータバインドでいいけど編集するには標準コントロールでは物足りない
Access相当の連結コントロールがタダであれば捗るとは思う
Access廃止するならコントロールライブラリを提供するぐらいやって欲しい
761:デフォルトの名無しさん
25/04/02 01:27:05.55 JuxZeGhm.net
クリスタルレポートはACCESSのに似てて期待したが、全然ACCESS相当まで機能追加されなかったので結局使われなかったな
(顧客へのシステムとして)
DB使わない部分では使ってたチームあったかもしれん
762:デフォルトの名無しさん
25/04/02 12:09:23.32 k9Y5euIy.net
>>761
ほんそれ
763:デフォルトの名無しさん
25/04/02 12:27:12.37 5a/oTSSC.net
クリレポ、一応はDB使った納品書かなんかで使ったわ
情報が全然なくて自分で弄りながら作ったからエラい苦労した記憶しかない
764:デフォルトの名無しさん
25/04/02 14:23:11.10 DR9S3YFG.net
Visual Studio の WinForms から Reportコンポーネント じゃあダメなんか?
URLリンク(www.agtech.co.jp)
True WinReports for .NET なんてのもあるけど、使えないのか?
URLリンク(www.componentsource.co.jp)
Accessのレポートのように、微に入り細を穿つ作りはヨソのコンポーネントぢゃあ面倒 だとしても
用意されたものを使うっきゃ無いだろうに
ハナシが逸れついでにググって見ただけだから君らの一件との整合性は知らん
レポートコントロールってのも追加できるようだが、それもすでに使い物に成らんのか?
URLリンク(qiita.com) サイトの情報が古いてか
765:デフォルトの名無しさん
25/04/02 16:22:13.97 kFN7dZ5N.net
クリレポを買収して中身一緒なの
766:デフォルトの名無しさん
25/04/02 17:44:39.81 DR9S3YFG.net
じゃあ、それで解決じゃん?困らないじゃん?
なんでわざわざAccessスレでVisual Studioのクリスタルレポートのボヤキしてるん?
767:デフォルトの名無しさん
25/04/02 18:38:29.39 kFN7dZ5N.net
そもそもAccessスレはム板には相応しくないのかもしれん
引用
未だにCrystalReportの呪いがある人でそんなたいした帳票を出してない人には選択肢の一つとなると思います。
ネットで結構有名なC#等の質問サイト等に行くとすぐに「ActiveReportを導入しなさい」的な書き込みが多く見られます。
私が昔から尊敬するネットで良く質問に答えて下さる様な人たちも同じ返答をします。
ActiveReportって結構良い値段します。
なぜMicrosoftReportなのか?
無料だという事とコンポーネントの互換を気にしなくて良い事です。
768:デフォルトの名無しさん
25/04/02 18:43:56.93 kFN7dZ5N.net
軒並み古いな
URLリンク(www.youtube.com)
URLリンク(www.youtube.com)
769:デフォルトの名無しさん
25/04/02 23:12:24.47 1Uz6aYIb.net
>>767
マクロしか使ってないやつはそう考えるだろなw
770:デフォルトの名無しさん
25/04/03 07:43:51.31 LP+5khva.net
結構いい値段しようが、デベロッパーなら価格転嫁できるだろうに プライベートユースで開発してンのか?
小規模向けでぜんぶ込みで安価になんでも開発できるAccess、しかももう改良の余地も無いほどに洗練されてる(w)
こんなレガシーな開発環境他に類を見ないだろ AccessのAccessたる所以ってことで、独自の地位を確立してるでいいじゃん
771:デフォルトの名無しさん
25/04/04 10:57:00.22 22bgX6/4.net
AccessでマクロとかVBA使うより
MDEだけ使ってあとはVS(VC/VC#)だろこの板なら常考
772:デフォルトの名無しさん
25/04/04 13:05:53.92 BXxq7UNx.net
か、かんちがいしないでよね!
サーバーなんかじゃないんだから!
って言い張るためだけに存在を許されている
773:デフォルトの名無しさん
25/04/04 13:27:46.05 EKlY2S8w.net
素人が必死
774:デフォルトの名無しさん
25/04/04 17:00:30.03 W5FNOvW3.net
python良いよ
URLリンク(www.microsoft.com)
URLリンク(github.com)
URLリンク(qiita.com)
775:デフォルトの名無しさん
25/04/04 17:43:27.50 xkW8ZkKi.net
vbaでないならsqliteでよくない
776:デフォルトの名無しさん
25/04/04 18:11:15.64 VvPqqnTF.net
なら、ソッチで話題にしてりゃいいだけじゃんか
「DBなんか都合のいいのない?」「mdb・accdbでいいよ もしくはmde・accdeで」
っつーひと言で済む話
誰かがこの板にAccessスレ建てて、いくばくかの人達が参考にしてることの何がいけないんだか
Access単体で開発環境整ってるんだし、なぜことさら別のIDEの話題してんだか意味わからん
そのくせレポートがいいもの無いとか愚痴ボヤキはじめるし Accessだけなら一向に困らんのだが
777:デフォルトの名無しさん
25/04/04 20:00:14.25 uy+C0MOy.net
>>776
勝手に一人でキレてるバカ発見(笑)
778:デフォルトの名無しさん
25/04/04 22:44:01.18 GYnqFS+F.net
>>776
ほんそれ
明確にわかりやすいバカがいついてるなぁw
779:デフォルトの名無しさん
25/04/05 08:22:18.61 o7jWaKkN.net
>>776
お前756と同じやつ?
780:デフォルトの名無しさん
25/04/05 09:07:26.55 9ACWZmiM.net
そうです 私が756 761 763 767 773ですが、何か?
781:デフォルトの名無しさん
25/04/05 13:04:26.36 Ur9Vw4Z1.net
>>776
マクロしか使ってないやつはそう考えるだろなω
782:デフォルトの名無しさん
25/04/05 13:33:58.77 o7jWaKkN.net
>>780
「開発環境」の定義を自分の中で整理してから発言しろ
783:デフォルトの名無しさん
25/04/05 17:37:20.26 9ACWZmiM.net
そのぐらいエディタ(VBE)の事だとアタマの中で読み替えろ
コンパイラは不要だしデバッグもできるし 重箱の隅突っ突く事しか出来んのか
いちいち呼び止めといて用事はそれだけなのか? 鬱陶しいにも程がある 巣に帰れ
784:デフォルトの名無しさん
25/04/05 19:57:29.73 TpoqeJku.net
「DBなんか都合のいいのない?」「sqliteでいいよ もしくはsqliteで」
785:デフォルトの名無しさん
25/04/05 21:16:47.43 o7jWaKkN.net
>>783
おい、バカ
おーい、バーカ
ベーシックの勉強よりも日本語の勉強からしましょうね
定義って日本語覚えてきてね
アクセスかじったじむやさんかなんかのあいてしてるひまはえすいーのひとにはないんですよーwww
786:デフォルトの名無しさん
25/04/05 21:23:56.99 yx70iKi8.net
スレタイすら読めない馬鹿が居着いてしまったか
787:デフォルトの名無しさん
25/04/05 23:24:10.62 d+s1BeKK.net
>>785
無様なバカ
788:デフォルトの名無しさん
25/04/11 19:36:35.53 i2PY9ZNn.net
WIX
789:デフォルトの名無しさん
25/04/21 23:53:02.62 CmWZglYO.net
私はプログラマ歴20年ですが、お客様からUTF-8形式のデータを出力してほしいと言われました。
UTF-8って何ですか?
790:デフォルトの名無しさん
25/04/22 08:27:56.01 41LYkh+W.net
こないだビジネスsoft板のExcel総合相談所で話題に成った奴だな
寄せ集めの、ほぼ野良に近いデータ掻き集められたものは、文字コードがめちゃくちゃなのもあるという
TableからExcel出力とかじゃ無くて、一旦csvでUTF-8に限定して出力してみる
それを元データと比較して文字化けとかしてないことを念入りにチェックしなさいと
Excel上では見た目は見分け付かないけど、実は文字コードが全然違うものだった とかはよくあるらしい
データ入力時メイリオ使っててそれをPDF変換したものは勝手に中国語の同じ字に変換されてしまう、とか
Macで入力された文字が、Unix系で(ry とか、文字コードが勝手に変わる要因は様々らしい
スレリンク(bsoft板:600番)- 一応この辺から辿ってくと変遷が分かるかも
791:デフォルトの名無しさん
25/04/23 09:20:24.52 yoO2Q6CW.net
~と〜