Access VBA 質問スレ Part2

**デフォルトの名無しさん** · 2018/12/12(水) 22:14:39.18

Access の VBA に関する質問スレです

質問テンプレ(雛形)は用意しませんが、OSとAccessのバージョンぐらいは必ず書きましょう

前回のスレッド
Access VBA 質問スレ Part1
https://mevius.5ch.net/test/read.cgi/tech/1328536426/

**デフォルトの名無しさん** · 2021/05/13(木) 13:31:32.10

だからって一から自分でつくるってのは飛躍してない？
家建てるときにどこのメーカーがいいですか？
に対して自分で建てろといってるようなもん

**デフォルトの名無しさん** · 2021/05/13(木) 14:03:30.60

>>339
自分で作れ、とは言って無いよ
ソフトウェアハウスの手を借りれば良い

**デフォルトの名無しさん** · 2021/05/13(木) 14:07:34.22

>>340
ライセンス料より高い気が……

**デフォルトの名無しさん** · 2021/05/13(木) 14:56:12.91

>>341
馬鹿には無理なのだから他人に金を出して頼むしかないだろ
馬鹿のくせに金を出さずに人にやってもらおうとか、ゆとりか？

**デフォルトの名無しさん** · 2021/05/13(木) 15:00:43.59

>>341
ランニングコストってのが有ってだな、、
FileMakerだとライセンス1回切りじゃ無いから

**デフォルトの名無しさん** · 2021/05/13(木) 16:59:09.51

>>343
ソフトウェアハウスでも保守料かかるだろ
基本的には自分で改変できないし

**デフォルトの名無しさん** · 2021/05/13(木) 17:16:07.25

Web化って時点でファイルメーカー選ぶしか無い様な、、
外部からアクセスするしないが重要

**デフォルトの名無しさん** · 2021/05/13(木) 17:25:00.83

外から見たいだけなら、リモートデスクトップでいいんじゃなかろうか

**デフォルトの名無しさん** · 2021/05/13(木) 17:25:32.84

>>345
馬鹿

**デフォルトの名無しさん** · 2021/05/13(木) 17:48:02.70

>>345
それ有るの忘れてた

**デフォルトの名無しさん** · 2021/05/13(木) 18:13:16.22

ACCESSで在庫更新したあとOneDriveフォルダにEXCELエクスポートします。
あとはスマホでもタブレットでも参照可能です。

**デフォルトの名無しさん** · 2021/05/13(木) 18:26:55.54

デ、データアクセスページ……

**デフォルトの名無しさん** · 2021/05/13(木) 20:11:21.52

>>345
｢Web化って時点でファイルメーカー選ぶしか無い｣
なぜこういう嘘を書くのか。それとも本当にそう思っているならそんな頭の弱い人は書かなきゃいいのに。

**デフォルトの名無しさん** · 2021/05/14(金) 10:03:38.95

>>350
実際使ってる例って有るのかな?

**デフォルトの名無しさん** · 2021/05/14(金) 10:10:19.21

>>352
とっくの昔にお亡くなりになったような記憶が…

**デフォルトの名無しさん** · 2021/05/14(金) 10:18:39.71

>>353
実例がほとんど無いね
https://support.microsoft.com/ja-jp/office/sharepoint-ロードマップの-access-services-497fd86b-e982-43c4-8318-81e6d3e711e8?ui=ja-jp&rs=ja-jp&ad=jp
Access Webアプリも無くなってる
ファイルメーカーの有利な点だな

**デフォルトの名無しさん** · 2021/05/22(土) 19:40:24.10

ちょっと前までGoogleでデータベース・サービス持ってたのにいつの間にかなくなっちゃたな。
最近VBAよりGASが面白くなってきたので手を出そうと思ってたのに。
やはり無料じゃGoogleも厳しいか。

**デフォルトの名無しさん** · 2021/05/27(木) 01:00:52.60

レポートやフォーム作るときに、拡大できないの致命的だよね
win標準の拡大ではぼやぼやで目がたえりれない
エクセルあたりでは普通に拡大できるのになあ
これだけでファイルメーカーに乗り換えようと思ったりしてよ

**デフォルトの名無しさん** · 2021/05/27(木) 02:13:23.53

馬鹿がファイルメーカー、ファイルメーカーとしつこく繰り返しているから絶対に使わない

**デフォルトの名無しさん** · 2021/05/27(木) 08:19:11.99

と馬鹿が申しております

**デフォルトの名無しさん** · 2021/05/27(木) 12:00:09.01

FM→ACCESSときたけど
レイアウトつくるのはびっくするくらい大変
そして頑張っても前時代的なのになってしまう
金額の問題だけで以降したんだけどね
ACCESSは365についてるから無料みたいなもの
FMは約6万

**デフォルトの名無しさん** · 2021/05/27(木) 12:05:37.62

サブスクは5ユーザからのみで年¥96,000
というびっくりプライス

**デフォルトの名無しさん** · 2021/05/27(木) 14:45:17.54

Report は pdf 出力やろ常考

**デフォルトの名無しさん** · 2021/05/27(木) 15:51:14.66

>>361
フィールドの位置とか外部ソフトでできるの？

**デフォルトの名無しさん** · 2021/05/27(木) 15:53:14.54

ACCESSでA4に収まるように8ptくらいのフィールド配置してたら目が痛くなって具合が悪くなったな

**デフォルトの名無しさん** · 2021/05/29(土) 06:45:06.05

>>363
ノートだとそうなんかな…
自作のときはずっと9ptがデフォだけど何ともないな…
拡大鏡でも使った方が楽な気がする

**デフォルトの名無しさん** · 2021/05/29(土) 12:27:27.87

>>364
拡大鏡ってぼやぼやになるからなあ

**デフォルトの名無しさん** · 2021/05/29(土) 12:27:43.67

ん？ノート？

**デフォルトの名無しさん** · 2021/05/30(日) 02:44:36.28

右側のプロパティって時間小さすぎるよな
レイアウト配置よりこっちをでかくできるようにしてほしい

**デフォルトの名無しさん** · 2021/05/30(日) 02:46:50.94

あれもうちょっとどうかならないんだろうか
一日使うにはストレスがすごすぎる

**デフォルトの名無しさん** · 2021/05/30(日) 08:25:31.88

ユーの眼球レベルにあった
でかくて低解像度のモニター使え

**デフォルトの名無しさん** · 2021/05/30(日) 11:48:00.52

ユー買っちゃいなyo!

**デフォルトの名無しさん** · 2021/06/01(火) 06:40:30.63

共有ファイルとして使う場合
処理がバッティングすると、待ち？っぽい動きするんだけど、この待ち時間を短くとか長くとか設定できない？

**デフォルトの名無しさん** · 2021/06/04(金) 04:59:49.95

>>365
整数倍にすればボケませんよ

**デフォルトの名無しさん** · 2021/06/04(金) 05:01:18.78

>>372
150でも200でもぼける

**デフォルトの名無しさん** · 2021/06/04(金) 06:58:24.85

5年ほど前に作った製品ラベルのレポートを修整しようとしたら、老眼は進んでるわ液晶の解像度は上がってるわ、マウスカーソルの移動量を増やしてるわで大変だった。デザインビューの拡大出来るようになると良いですね。

**デフォルトの名無しさん** · 2021/06/05(土) 16:40:26.94

ファイルメーカーの体験版使ったらACCESSに戻れなくなってしまった
ACCESSになんかメリットある？

**デフォルトの名無しさん** · 2021/06/05(土) 18:22:16.60

馬鹿がファイルメーカー、ファイルメーカーとしつこく繰り返しているから絶対に使わない

**デフォルトの名無しさん** · 2021/06/05(土) 18:58:27.51

と馬鹿が申しております

**デフォルトの名無しさん** · 2021/06/05(土) 18:59:13.81

>>375
コストかな。
田舎の工場で低価格な電子部品作ってる。30台くらいのパソコンで使うからファイルメーカーなんてコストは現実的ではないんです。

**デフォルトの名無しさん** · 2021/06/05(土) 21:31:57.93

ファイルメーカーとAccessは得意分野が全然違うのでは？

**デフォルトの名無しさん** · 2021/06/05(土) 21:53:37.74

ファイルメーカーの宣伝でしょ

**デフォルトの名無しさん** · 2021/06/05(土) 22:47:17.80

>>380
ACCESSでうまくいかずもやもやするたびに体験版つかってみて
ライセンス料なんかが不安でACCESSにもどるってのを繰り返してる
ACCESSが現代的なGUIになってくれて
ある程度はコード書かなくてもできるよえになればいいんだが

**デフォルトの名無しさん** · 2021/06/06(日) 02:59:11.72

え！？ひとりでも最低
じゅじゅじゅじゅじゅうまんえーん！？
https://i.imgur.com/OGGBfwi.png
ちなみにキントーンもこの商法みたいだな

ACCESSはUIがクソなのと共有がほぼできない、ちょっとしたことでもコード書かなきゃならない、その代わりに激安ってことなんだろうな
逆にそこらを改善するのはこんくらい金とらなきゃできないことなのかもしれん

**デフォルトの名無しさん** · 2021/06/06(日) 04:17:17.40

馬鹿
↓
ACCESSは共有がほぼできない

**デフォルトの名無しさん** · 2021/06/06(日) 10:18:31.22

FileMake使いのやつって
Access使いを見付けると必ず攻撃してくるよね
なんで不況に熱心なのかな

**デフォルトの名無しさん** · 2021/06/06(日) 10:21:05.17

馬鹿
↓
FileMakerはコード書かなくていい(キリっ)

**デフォルトの名無しさん** · 2021/06/06(日) 11:26:09.24

と馬鹿が申しております

**デフォルトの名無しさん** · 2021/06/06(日) 14:07:30.75

いくらなんでも高すぎる
あれって全社員にipadもたせてリアルタイムでデータ共有するような大企業向けだろ
とはいえほかにACCESSしか選択肢がなくてACCESSは手間がかかり過ぎるが

**デフォルトの名無しさん** · 2021/06/06(日) 16:01:30.88

ACCESSは実質開発が停止してるからな
Web公開手段を再度実装したらFileMakerなんて駆逐出来るのに

**デフォルトの名無しさん** · 2021/06/07(月) 23:05:55.18

>>373
それ元がボケてるんやな
ディスプレイ買い換えるしかないな
うちは拡大してもクッキリやで

**デフォルトの名無しさん** · 2021/06/08(火) 00:47:30.58

>>389
んなことないだろEIZOのFLEX Scanだし
ぼやけるって言葉の認識だと思うが
ベクターとラスターの拡大みたいなこと
https://i.imgur.com/oT7FRjb.jpg

拡大鏡だと単純拡大だからガタガタのぼやぼや
スマホの拡大縮小だとおかしくならないよね？
ソフトに標準で拡大縮小が実装されているならそれと同じできれいに拡大できる
ACCESSはないから拡大鏡つかうことにかるから汚いしつかいにくい

**デフォルトの名無しさん** · 2021/06/10(木) 00:40:17.87

>>390
〉拡大鏡だと単純拡大だからガタガタのぼやぼや

単純拡大だからガタガタになるので正しい
しかしぼやぼやにはならない

頭（目？）悪そうだなこいつ

**デフォルトの名無しさん** · 2021/06/10(木) 01:23:12.45

文字が
https://i.imgur.com/oQ1lyeU.jpg
こうなるのをボヤボヤといってるんだと思う

MSゴシック使ってるやつはわからないかもしれないが
アンチエイリアス入ったフォントで拡大鏡使うとボヤボヤになるよ
https://i.imgur.com/B1re0t1.png

**デフォルトの名無しさん** · 2021/06/14(月) 20:33:26.59

getobjectでVBSからmdbへ接続してACCESSのモジュールを書き換えているんだけど、プロシジャーをチマチマ書き換えるのが面倒になってきたので、
既存モジュールの全行を削除してからModule.AddFromFile メソッドで新モジュールを一括して書き換えた。
mdbを保存する段になって「ファイルの共有ロック数が制限を超えています」と怒られた。

たしか、コミットトランスするんだよなあ、と資料を読んでみたが、それが出来るオブジェクトが存在しない。
一体どうしたらいいのかな？

**デフォルトの名無しさん** · 2021/06/15(火) 10:02:33.87

ACCESSを買えば良いと思います。

**デフォルトの名無しさん** · 2021/06/15(火) 11:17:25.55

>>394
Microsoft 365 for businessを使用してます。
ACCESSはしょっちゅう壊れるからVBSで出来ることはVBSでやりたいですね。

**デフォルトの名無しさん** · 2021/06/15(火) 13:21:19.21

>>395
そんな面倒なことw
2.0使いはじめた頃は間違った使い方してたのもあって壊しまくったが、ここんとこ壊れたことなどないぞ

**デフォルトの名無しさん** · 2021/06/15(火) 15:19:36.70

>>396
フォームのコマンドボタンの位置をほんの少しずらしただけで壊れこともあるし、最適化で壊れたこともある。
最近もどっかの記事でそのような記述を見たような気がする。

VBSはコードを見るのも書くのもサクサクだからお気に入りだよ。重たいACCESSを開かなくていいのは気が楽だよ。
でも、関数がVBAと少し仕様が違うとか面倒なことがあるのが玉に瑕だなあ。

**デフォルトの名無しさん** · 2021/06/15(火) 20:40:00.08

>>393
mdbからaccdbにすると壊れ難くなる気がします。

**デフォルトの名無しさん** · 2021/06/16(水) 09:49:56.68

>>398
面白そうですね。参照設定を変更するくらいで出来そうですね。だめなら宣言文にDAO.を加えれば出来そうな気がします。
今はほぼ全ての改造をVBS経由で行えそうだから、それで行き詰まったらやってみます。

**デフォルトの名無しさん** · 2021/06/16(水) 16:39:10.95

>>393
共有ロック数って言ってるんだから
VBSからmdbへ接続が何度も繰り返してるか間違ってるんじゃね

**デフォルトの名無しさん** · 2021/06/16(水) 18:15:04.80

プロシージャーを書き換えるプロシージャーを書くのって面白い？

**デフォルトの名無しさん** · 2021/06/16(水) 21:11:44.71

>>400
共有ロックの問題はMaxLocksPerFileを増やしたらあっさり解決しました。
>>401
手作業でプロシジャーを変更していたときより遙かに楽になりましたし。仕事が楽になる過程は面白いです。
なによりもAccessと違ってサクサク動くのがVBSの最大の魅力です。

**デフォルトの名無しさん** · 2021/06/16(水) 21:18:57.41

一括でモジュールを書き換えるのすら面倒になったのでLoadFromTxtに切り替えた。
これならフォームやレポートも丸ごと移植可能だわ。

**デフォルトの名無しさん** · 2021/06/22(火) 11:37:45.99

オフィス365でデーターを保存したときにウインドウの上のバーの箇所のタイトルに
「ファイル名＋保存しました・・」って表示になるけど、
これ出さないように出来ないのかな？

ウインドウのタイトルが変わるとRPAが誤作動をおこすので
いらない機能をつけるなよといつも思います。

**デフォルトの名無しさん** · 2021/06/22(火) 11:40:11.76

>>404
誤爆でした。ここAccessなんですね。。

**デフォルトの名無しさん** · 2021/06/22(火) 19:29:04.84

なんでVBA使わずRPAなの？

**デフォルトの名無しさん** · 2021/06/22(火) 20:23:21.77

そのVBAを操作する人間の操作を代行させるのがRPAなんやで

**デフォルトの名無しさん** · 2021/06/23(水) 19:45:53.16

なんで公共の場で地元言葉なの？

**デフォルトの名無しさん** · 2021/07/24(土) 13:25:46.25

レポートを変数「i」回だけ複数印刷しようとして、
PrintCountやFormatCountを使ったのですが、
「i」とPrintCount・FormatCountが一致しません。

PrintCountやFormatCountって、
ページ変更・ヘッダー・フッターなどでも、カウントが増えますか？

アルゴリズムそのものが間違いでしょうか？

**デフォルトの名無しさん** · 2021/07/24(土) 14:08:20.10

おまえごときがVBAやる事そのものが間違い

**デフォルトの名無しさん** · 2021/07/24(土) 19:42:05.93

なな、南斗

**デフォルトの名無しさん** · 2021/08/04(水) 20:55:05.72

[タイプ]が勝手に[ﾀｲﾌﾟ]になってしまう。
[ ]で囲んでるのに。なんぞこれ。

**デフォルトの名無しさん** · 2021/08/05(木) 08:02:56.74

あれ、今日は勝手に半角に戻らない。
再起動するだけで良かったのかも。
独り言スマンね。

**デフォルトの名無しさん** · 2021/08/05(木) 14:37:35.48

解決済みという事ですが
名称の勝手変換は[名前の自動修正]を有効にしていると起きます
初心者向けの親切機能ですが、オブジェクト名などを細かく定義している場合には逆に足枷になります
名称変更時に自動トレースしきれずバグを生み出したりします
ご参考までに

**デフォルトの名無しさん** · 2021/08/05(木) 18:07:31.70

いや、再発しました。
名前の自動修正、調べてみます。

**デフォルトの名無しさん** · 2021/08/07(土) 07:56:44.50

Windows11+ACCESS365の環境で発生してます。
ﾀｲﾌﾟ(半角)と入力しても行を移るとタイプ(全角)になっちゃう。[ ]でくくっても駄目。
Windows10+ACCESS365では[ ]でくくると勝手に全角にはならないので、Win11Betaのせいっぽいです。
アプリの修復試してみて、駄目ならWin11Betaのフィードバックに上げます。

**デフォルトの名無しさん** · 2021/08/07(土) 20:17:05.58

どっかに全角のタイプってオブジェクトがある（あった）んだろな

そういえばWIN10でNLSのバージョン変わって全角半角の判断がおかしくなる問題があったな
ちょっと試したWin10の詳細バージョン書いてくれ

Win11のＮＬＳってどうなってるんだろ

**デフォルトの名無しさん** · 2021/08/27(金) 14:57:39.16

すみません、見逃してた。
Windows10の21H1ですね。
NSLがなんの事かわかんないですが、確かに前にも経験したトラブルの様な気がします。

**デフォルトの名無しさん** · 2021/09/04(土) 15:37:28.00

明後日スタンダード試験だけどやばい模擬問題正答5割だわ

**デフォルトの名無しさん** · 2021/09/04(土) 16:34:10.88

ん、まぁ、ガンガレ

**デフォルトの名無しさん** · 2021/09/05(日) 03:44:21.58

外部からaccessの特定のレポートを開く方法ある？

**デフォルトの名無しさん** · 2021/09/05(日) 14:14:02.27

外部って？
普通にCOMで操作すれば良いんじゃねえのか

**デフォルトの名無しさん** · 2021/09/07(火) 12:53:43.40

パススルークエリのパラメータをaccess外から設定する機能教えてください。

**デフォルトの名無しさん** · 2021/09/07(火) 13:13:29.25

access外って？
何がやりたいかわからん

**デフォルトの名無しさん** · 2021/09/07(火) 14:16:04.54

ADO
ADODB
DAO

**デフォルトの名無しさん** · 2021/09/08(水) 22:14:40.15

>>425
データベースに
ドライバなしでvbaで接続する方法ってないの？

**デフォルトの名無しさん** · 2021/09/09(木) 01:34:00.79

>>426
https://docs.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/open-statement

**デフォルトの名無しさん** · 2021/10/09(土) 23:35:10.80

VBAエキスパートって取ったほうがいいでしょうか

**デフォルトの名無しさん** · 2021/10/10(日) 08:29:41.88

資格マニアを見る世間の目は冷たい

**デフォルトの名無しさん** · 2021/11/02(火) 07:37:22.79

>>428
資格より実践を積むべし

**デフォルトの名無しさん** · 2021/11/29(月) 15:04:38.27

レコードが存在しない場合に 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に、何か制限などありますでしょうか?

**デフォルトの名無しさん** · 2021/11/29(月) 15:15:06.43

直接の返答じゃないけど、SQL一発書きじゃなきゃだめなの？
事前にレコード数チェックして分岐じゃだめなの？

**デフォルトの名無しさん** · 2021/11/29(月) 15:17:50.75

UPDATE と組み合わせて、SQL一発を考えてます
無理であれば、おっしゃるように分岐かなと

**デフォルトの名無しさん** · 2021/11/29(月) 16:01:33.58

ちょっと気になったので手元で実験してみたけど、dummyテーブルが存在して空ではないときには
（多分）431の想定どおりの挙動をしていると思う
バッドノウハウ臭いので、おとなしく事前チェックして分岐かなぁ
まぁAccessのSQLって変だよね

**デフォルトの名無しさん** · 2021/11/29(月) 17:41:32.65

access はupdateいっぱつで初挿入もできたはず
しゅきーのヌルを上書きする感じで

**デフォルトの名無しさん** · 2021/11/30(火) 05:36:52.18

>>435
さすがにそんなことはないと思うが、ちょっとサンプルコード書いてみてくれ

**デフォルトの名無しさん** · 2021/11/30(火) 09:01:45.87

>>436
選択クエリは更新できる
UPDATE TableA RIGHT JOIN TableB ON TableA.ID = TableB.ID
SET TableA.ID = [TableB]![ID], TableA.Data1 = [TableB]![Data1], TableA.Data2 = [TableB]![Data2];

**デフォルトの名無しさん** · 2021/11/30(火) 10:50:50.28

>>431
values (1, "name")
じゃ駄目なの