21/01/14 21:01:21.37 yNTWs1ET.net
>>201
全体で1トランザクションになるようにトランザクション張るか
UpdateBatchで更新するか試してみてくれ
203:デフォルトの名無しさん
21/01/14 23:19:32.20 KOTB1sbE.net
>>202
ありがとうございます
参考にしながらやってみます。
URLﾘﾝｸ(www.google.co.jp)
URLﾘﾝｸ(docs.microsoft.com)
あと、トランザクションの以下のコードですが、参考にしようと思うのですがこれは全体で1トランザクションになっていますか？
URLﾘﾝｸ(excel-excel.com)
204:デフォルトの名無しさん
21/01/15 12:06:52.83 Z+pTsb/B.net
>>200
もう一度SQLでやってみたところ、インポートと同じ時間で処理できました。
ありがとうございます
>>202
UpdateBatchでは処理時間に違いがありませんでした
レコードセットへの書き込みに時間がかかっているのかもしれません。
ありがとうございます
205:デフォルトの名無しさん
21/01/16 21:45:45.19 wM/4uvwh.net
>>162
資格をモチベにしてる
206:デフォルトの名無しさん
21/01/26 12:20:07.19 pY3ojVqI.net
ウチの社内の情報システムの制限でwindowsカメラアプリが制限されてるんだけど、VBAで無理矢理動かせないだろうか、、、
いろいろ検索してみても古い情報しかなくて、、
64bit版でも出来るようなプログラムの見本とか有れば助かる。
207:デフォルトの名無しさん
21/01/26 12:31:00.16 bIVSUY/u.net
そんな事してバレたら懲戒処分にならない?
208:デフォルトの名無しさん
21/01/26 21:32:09.76 0moyOenU.net
>>207
少し言い方が悪かったかな。
端末でWEB会議してるから、カメラを使うのは問題無いんだけど、静止画を撮るソフトが入っていないもんで、静止画を撮ってDBと紐づけたいってなると、できなくて。
小規模グループでAccess使ってるから、システムに相談しても本気でかけあってくれなくて、、
それだったらVBAでどうにかならないかと思って。
209:デフォルトの名無しさん
21/01/26 22:49:05.99 5iMVHv+0.net
>>208
より悪いんだけど
210:204
21/01/27 17:26:57.82 Nmg5vWMl.net
スタンダード受かった（＾ω＾）v
211:デフォルトの名無しさん
21/01/29 13:44:54.10 Xkyf+iIu.net
>>210
もめでとう！
資格は財産！
凄いなスタンダードは
212:デフォルトの名無しさん
21/01/29 16:32:16.97 SG5MocSx.net
>>211
ありがとう。マイナー資格のせいか、
テキストは悪評にも関わらず他に選択肢ないし、
そのテキストもアプリもやたら高いけど、
一発合格のために全部ちゃんと買ったわー。
213:デフォルトの名無しさん
21/01/31 10:42:42.16 /4jghnKY.net
VB自体マイナーよりなのがね。。。
参考書の著者は名のある人(武藤玄さん？)だから安心でしょ
214:デフォルトの名無しさん
21/02/01 19:30:44.14 JChayj2G.net
「課題テーブル」 の項目「ファイル：添付ファイル型（拡張子は.xlsx）」をSQLで取得して(1)、
そのファイル名を変更して保存(2)しようと思っています。
(2)の処理は問題ないのですが、肝心な（1）の処理が分かりません
SQLだと以下のような感じかと思うですが、これだと、「ファイル」の名称も取得すらできないようです。
なにかしらヒントをいただけないでしょうか。
検索にヒットするようなキーワードでもかまいません。
よろしくお願いいたします。
"SELECT ファイル FROM 課題テーブル where ID = 1" （件数は1件）
215:デフォルトの名無しさん
21/02/01 20:47:30.12 g0s2XOHS.net
ファイルを取り出したいのか、ファイル名を変えたいだけなのか、何がしたいのかがわからない。
216:デフォルトの名無しさん
21/02/01 20:48:57.97 g0s2XOHS.net
ファイルをSELECTするとファイルが出てくるというのは奇妙な発想だな
217:デフォルトの名無しさん
21/02/01 20:52:05.66 1CLvOTQ1.net
>>215
ファイルを取り出したいんだけど、
SQLでなくクエリーでやるべきなの？
先日Access始めたから見様見真似。
添付ファイルを取得すれば、renameして保存するところはわかるんだけど。
218:デフォルトの名無しさん
21/02/01 20:58:59.00 90ziZ1xl.net
エクセルファイルはAccessには入ってないだろ
フォルダから取り出すのか？
219:デフォルトの名無しさん
21/02/01 20:59:30.52 90ziZ1xl.net
何がしたいのかマジで分からんｗ
220:デフォルトの名無しさん
21/02/01 20:59:46.61 1CLvOTQ1.net
Accessのテーブルの添付ファイル型の項目に入っている
221:デフォルトの名無しさん
21/02/01 21:01:37.65 90ziZ1xl.net
そのアドレスをエクセルで開いてリネーム保存すればいいじゃん
222:デフォルトの名無しさん
21/02/01 21:03:39.26 90ziZ1xl.net
Dim MyExcel As New Excel.Application
とか使って
223:デフォルトの名無しさん
21/02/01 21:12:34.68 1CLvOTQ1.net
>>222
それ使ってるんですけど添付ファイル型ってchar型とかと同じように扱えれるんですかね、
よろしければもう少しヒントを。
224:デフォルトの名無しさん
21/02/01 21:22:03.72 1CLvOTQ1.net
ファイルをディスクのどこかに保存するのは、SaveToFile メソッドですかね？
なんか使えそうに思うけどいかがですか？
225:デフォルトの名無しさん
21/02/01 21:43:47.01 FgW8bRhe.net
そんな新しいAccessなんて持ってないから知らん
226:デフォルトの名無しさん
21/02/01 21:44:43.65 90ziZ1xl.net
URLﾘﾝｸ(oshiete.goo.ne.jp)
添付ファイル型はレコードセットになっていて
その中のフィールドのひとつ（3つ目。つまりF(2)）がファイルネームになっていて、
それを取得する。らしい。
227:デフォルトの名無しさん
21/02/01 21:45:48.50 90ziZ1xl.net
>>224
普通にSaveAsじゃあかんの？
228:デフォルトの名無しさん
21/02/01 21:48:22.88 c76bdQcs.net
ありがとうございます。
少しヒントが得られたかも。
明日試してみます。
229:213
21/02/02 11:31:56.15 UTRQGX0/.net
添付ファイル型データのデータとファイル名取得が出来たので
参考に記載します。ありがとうございました。
URLﾘﾝｸ(www.proton.jp)
（参考URL）添付ファイル型フィールドのファイルを開くには
コーディング抜粋
----------------------------------------------------------------
Dim SQL, fileName As String
Dim DB As DAO.Database
Dim RS,RS2 As DAO.Recordset
Set DB = CurrentDb
'なお、下記「フアイル」は「.xlsx」形式のデータ
SQL = "SELECT ファイル FROM テストテーブル where ID = 1 ; "
Set RS = DB.OpenRecordset(SQL)
'「ファイル」データ取得
Set RS2 = RS.Fields(0).Value
'「ファイル」データファイル名称取得
fileName = RS2.Fields("FileName").Value
------------------------------------------------------------------------------------
230:デフォルトの名無しさん
21/02/02 14:27:49.60 CQc47MX2.net
それ、SQLとRSは無駄にVariantになってないか？
231:デフォルトの名無しさん
21/02/04 15:46:42.10 QbGo6q9b.net
OLEオブジェクト型はどうやってSQL（select 文）で抽出するの？
232:デフォルトの名無しさん
21/02/04 20:11:15.64 XRB3PpKu.net
select文は普通に列名とテーブル指定するだけじゃないのか？
そっからどうやってデータ取得するかはどうやってDBアクセスしてるかによるんじゃね
とりあえずDAOかADOかとバージョンぐらい書け
233:デフォルトの名無しさん
21/02/04 20:23:44.53 w6PAg1HV.net
>>229
ファイルを取得したいと言っていたのに、ファイル内のデータでよかったのか？
234:デフォルトの名無しさん
21/02/05 00:26:34.08 OHtcWSU6.net
VBSでmdbに接続してaddnewしてupdateするだけの簡単なスクリプトの挙動がおかしい｡
sub や Functionにして callすると成功するくせに､subじゃなくて素のスクリプトだと何もしない｡
ちなみに読込みはどっちでも成功する｡
なぜ､addnewのときだけ､プロシジャーである必要があるのだろうか?
235:デフォルトの名無しさん
21/02/05 00:34:27.19 OHtcWSU6.net
vbseditがおかしいらしい｡
適当なディレクトリに保存して実行したら素のスクリプトでも成功した｡
わけわらん｡
236:230
21/02/05 10:13:06.16 s99X7duh.net
SELECT文でOLE型のファイル（拡張子.docx）を読み込んで保存しようとしています。
処理を行ったところ、「ファイル『temp.xls』は内容に問題があるため、開けませんでした。」という
メッセージが出ますが、「開いて修復」すれば元のファイルと同じに見えるので
SELECT文で項目だして、書き出すまである程度できているようなんですが、
どこがおかしいのでしょうか、ご意見をいただけたら幸いです。
参考サイト
URLﾘﾝｸ(www.moug.net)
画像を読み込む（GetChunkメソッド）
ソース一部抜粋
'OLE型用変数
Dim bytFile() As Byte
Dim nFileNo As Integer
Dim nSize As Long
Dim olename As String
Set DB = CurrentDb
'項目「OLE型データテスト」抽出のSELECT文の実行
Set rs = DB.OpenRecordset(sqlText)
nSize = rs.Fields("OLE型データテスト").FieldSize
bytFile() = rs.Fields("OLE型データテスト").GetChunk(0, nSize)
nFileNo = FreeFile
Open "C:\Users\testuser\Documents\test.docx" For Binary As #nFileNo
Put #nFileNo, , bytImage()
Close #nFileNo
237:デフォルトの名無しさん
21/02/05 13:09:23.30 7kBPI4G7.net
VBS って、まだシステムで使えるのか？
保守されてる？
238:デフォルトの名無しさん
21/02/06 11:30:21.47 PohEB++t.net
bytImage() の中身は docx に直接上書き保存できるものなのか？
239:デフォルトの名無しさん
21/02/07 12:21:08.72 EDRo6Y49.net
>>237
Windows 10そのものがまだ使っています。
240:デフォルトの名無しさん
21/02/26 16:49:44.25 v+ay/MML3
70億円調達のネットショップ作成サービスhey、｢我の弱い人同士の組織力｣武器にEC市場シェア拡大目指す
URLﾘﾝｸ(www.businessinsider.jp)
【劇団ノーミーツ1】役者も客も会わないオンライン演劇で7000人動員。制作チームは全員20代、半分は会社員
URLﾘﾝｸ(www.businessinsider.jp)
利用、無料。日本版衛星データプラットフォーム｢Tellus｣がすごい理由…“宇宙の視点”でビジネスはこう変わる
URLﾘﾝｸ(www.businessinsider.jp)
「起業ブーム」が新たなフェーズに 大学発ベンチャーへの想い
URLﾘﾝｸ(forbesjapan.com)
かつて学者がやっていたことを、今は起業家がやっている
URLﾘﾝｸ(diamond.jp)
番号やアドレス不要の無料通話アプリRe-mo登場 ドワンゴが配信開始
URLﾘﾝｸ(japanese.engadget.com)
10年間使い続けた WordPress を辞めた理由 a-blog cms を選んだユーザーのお話
URLﾘﾝｸ(webtan.impress.co.jp)
ノロケツイートがバズって起業！ カップル・夫婦向けサービス「ふたり会議」が反響を呼ぶワケ
URLﾘﾝｸ(www.itmedia.co.jp)
コロナで細る“起業”を手助け。クラウド会計freee、スマホアプリで設立書類を作成できるサービス
URLﾘﾝｸ(www.businessinsider.jp)
241:デフォルトの名無しさん
21/02/26 20:55:30.10 BHdQltm/.net
AccessからOracleに接続して、テーブル定義を取得しようとした場合、Currentdbにリンクテーブル作成してtabledefで取得するしかないですかね？
242:デフォルトの名無しさん
21/02/26 23:30:20.77 aSS4VuLP.net
>>241
そんな訳ないだろ
お前の頭には無理ってだけだ
243:デフォルトの名無しさん
21/02/26 23:38:57.64 JyNwBwDQ.net
>>242
どうやってやっているんですか？
そんなに人に偉そうにいうくらいならお詳しいんですよね？
244:デフォルトの名無しさん
21/02/27 00:39:35.09 lzDnqtNz.net
一応言っとくが、あわしろ氏は権威だぞ。
245:デフォルトの名無しさん
21/02/27 03:37:26.48 oWYDZ6ol.net
>>243
だからお前みたいな馬鹿には無理ってだけだ
246:デフォルトの名無しさん
21/02/27 09:00:35.16 kkUl7IkZ.net
わからないんだろ？
教えられないのに質問スレでマウント取って
かっこいいね！
247:デフォルトの名無しさん
21/02/27 13:52:55.39 oWYDZ6ol.net
馬鹿が聞き出そうとして必死だな
元の質問が、
「しかないですかね？」
だから、
「他にある。馬鹿にはわからないだけ」
これで完結
248:デフォルトの名無しさん
21/03/12 04:20:10.68 U5Mc6cIw.net
クライアントPC複数台にコピーしてあるaccdbの更新を自動化したいのですが、上手い方法が有ったらアドバイス下さい。
今は、終了時に更新版があればコピー専用のaccdbを開く、という方法です。
時々コピーに失敗したり、更新後の起動が出来なかったり、なんかスマートに出来ません。
249:デフォルトの名無しさん
21/03/12 07:03:59.49 bg4PRHHU.net
それぞれのPCに共有サーバーでクライアント各々に1つのものを使ってもらえば？
250:デフォルトの名無しさん
21/03/12 07:47:36.33 vZYfq0zb.net
え？
251:デフォルトの名無しさん
21/03/12 15:03:23.20 6lWZMdzy.net
>>249 コメントありがとうございます。
共有フォルダに置いたテーブルだけのバックエンドや、データベースサーバーにテーブルがあり、フロントエンドにリンクして使ってます。
各クライアントのフロントエンドを更新したいのです。
フロントエンドを共有フォルダに置いて皆んなで使うと壊れやすい、50台のクライアント全て閉じてもらわないと更新できないなどの問題があり、現在のかたちで運用しています。
252:デフォルトの名無しさん
21/03/12 16:26:24.53 ZUwUvURf.net
基本的には別ブログラム（Accessでなくてもいい）で上書きしてもらうしかないけど
タスクに登録して再起動してもらうとか
さがせばそれ用のツールとかありそうだけどな
253:デフォルトの名無しさん
21/03/12 18:43:58.19 6lWZMdzy.net
>>252
WSHで一日一回各クライアントで実行する例があったんですが、やってる事は同じなのです。なんかスマートな方法無いのかなあ。
もう少し探してみます。お騒がせしました。
254:デフォルトの名無しさん
21/03/17 08:24:13.18 o9MkZCaQ.net
他フォームや親フォームのコマンドを実行する時,
Call Forms!フォーム名.ボタン_Click
だと動かないのに,
With Forms!フォーム名
.ボタン_Click
End With
にすると動くのは私だけ?
255:デフォルトの名無しさん
21/03/17 08:27:13.40 o9MkZCaQ.net
まちがった.
256:デフォルトの名無しさん
21/03/17 08:27:40.08 o9MkZCaQ.net
With Froms!フォーム名
257:デフォルトの名無しさん
21/03/17 08:31:05.18 o9MkZCaQ.net
スレ汚しすみません、やり直し。
他フォームや親フォームのコマンドを実行する時,
Call Forms!フォーム名.ボタン_Click
だと動かないのに,
With Forms!フォーム名
Call .ボタン_Click
End With
にすると動くのは私だけ?
258:デフォルトの名無しさん
21/03/23 22:25:21.29 OYDSqGqD.net
レポートのテキストボックスが関数を呼び出すことがあるんだけど、それを検索する方法はないですかね？
VBEをいくら検索しても、ある特定のFunctionをCallしているのがなんなのかさっぱりわからなくて途方に暮れた後にレポートのテキストボックスと気づいたときの疲労感は凄かった。
スマートに一発検索する方法ありますか？
259:256
21/03/24 19:23:21.05 Oy88L6kY.net
どうも、ないようなので、for eachループを回して全部テキストにしました。
レポートの全部のコントロールを書き出したら24MBになりました。
コントロールから直接Callするのはお行儀が良くないですね。
260:デフォルトの名無しさん
21/03/24 19:53:42.42 Oy88L6kY.net
DoCmd.PrintOut
同じコードなのに、一方ではちゃんと複数枚印刷して、もう一方では常に1枚しか印刷できない。
ググると似たトラブルが見つかる。バグなんだろうか？ご存じの方いますか？
261:デフォルトの名無しさん
21/03/25 18:29:57.87 25o3kYjY.net
Access365 Windows10です。
Excel上からVBAでDAOにてAccessのクエリのレコードセットを取得しています。
Access上のクエリで表示されるレコード数と、Excel VBA DAOから取得したクエリのレコードセットのレコードの数が異なり、原因がわかりません。
それぞれのレコード一覧を出力してみると、あるフィールド(IIf(・・・,”対象外”, “督促対象”)としている部分) の値が、Access上のクエリでは「対象外」、Excelから取得したレコードセットでは「督促対象」となっているため、抽出条件が誤認識されてレコード数が異なることに気がつきました。
クエリの他の抽出条件にワイルドカード等を使っていないと思います。
クエリをDAOで取得した場合に、違いが生まれる原因を推測できる方はいらっしゃいませんでしょうか？ 回避策があればお教えいただけると助かります。
262:デフォルトの名無しさん
21/03/26 12:11:20.45 x01Nq0VC.net
>>261
Accessのテーブルを、Excelからのリンクテーブルにしているものがあるのですが、クエリを開いている状態で、ExcelからDAOでレコードセットを取得すると、テーブルにしているExcelファイルが自動で開かれます。
その状態で取得したレコードセットの内容がおかしいことに気がつきました。
なぜレコードセットの値が異なるのかは、不明なのですが、テーブルにしているブックが開かれているとエラーを出力するようにして、回避しました。
263:デフォルトの名無しさん
21/03/26 12:30:39.51 9TlDuTMy.net
わからん すまん
264:デフォルトの名無しさん
21/04/04 17:14:14.07 gjYxCKFw.net
基本的なことで申し訳ないんだけど
URLﾘﾝｸ(www.helpforest.com)
に書いてある開いてるファイルのバックアップとるコードで
strNameCopy = Left(strNameMoto, Len(strNameMoto) - 6) & "_" & Format(Now, "yymmdd") & ".accdb"
ってのがあるんですが Left(strNameMoto, Len(strNameMoto) - 6) の意味がわかりません。なぜ -6 なんでしょうか？
それと、
Format(Now, "yymmdd") だと 210404 になりますが”yy_mmdd_hhmm” としました
ここを 21_0404_17h15m とするにはどうしたらいいですか？
hやmの入れ方がわかりません
265:デフォルトの名無しさん
21/04/04 17:38:22.47 26lFIPnO.net
メッセージボックスは自動で閉じないしWSHもmessageboxtimeoutAもうまくできませんでした
通知の代わりに小さいフォームを0.5秒ほど表示させて閉じたいのですが、どのように記述したらいいですか？
266:デフォルトの名無しさん
21/04/04 21:11:55.53 3M5QmD23.net
>>264
-6は元ファイル名の".accdb"を取り除いてると予想。
"yy_mmdd_hh""h""nn""m"""で良いかな。
うまく行かない場合はグーグル先生に聞いてみて。
267:デフォルトの名無しさん
21/04/04 21:24:13.07 3M5QmD23.net
>>265
ちっさいフォームをダイヤログ形式で作成して、タイマーを500m秒に、タイマーイベントで
DoCmd.Close acForm, me.Name
だとどうかな。
268:デフォルトの名無しさん
21/04/04 22:50:03.97 gjYxCKFw.net
>>267
開くのはどうするんですか？
269:デフォルトの名無しさん
21/04/04 22:50:34.96 gjYxCKFw.net
ああこれで開いて閉じるのか
270:デフォルトの名無しさん
21/04/04 22:56:05.15 gjYxCKFw.net
>>266
取り除かないと拡張子が2つになってしまうからですね
そうしないと拡張子が2つついてしまうんですね
271:デフォルトの名無しさん
21/04/07 00:28:19.15 rJDYR4sC.net
レポートの詳細の一番下に線引くのってどうやるの？
フィールドや仕切り線だと線の真ん中が指定位置にくるようで、線の太さ分はみ出てしまう
272:デフォルトの名無しさん
21/04/07 05:48:31.03 Vznju2ao.net
詳細の最終行終わりにだけ線を引く方法が有るのか、知らんかった。
私はグループフッタの上に線を配置します。
273:デフォルトの名無しさん
21/04/07 12:38:41.43 RzHskyO4.net
>>271
VBAでEOFでVisible=trueにする
274:デフォルトの名無しさん
21/04/07 15:58:13.17 rJDYR4sC.net
>>273
図形の移動ってこう書くらしいんだけど
Sub TopAndLeftSamp1()
Dim Sh As Shape
For Each Sh In ActiveSheet.Shapes
Sh.Top = Range("B2").Top
Sh.Left = Range("B2").Left
Next Sh
End Sub
それはどう書くんですか？
太い線でもはみ出ないように一番下にくるんですか？
>>272
終わりにだけ、じゃなくて仕切り線を詳細の高さの最後に、はみ出ないようにおきたいということです
275:デフォルトの名無しさん
21/04/07 16:12:27.97 bHi8pMA7.net
>>274
それExcelじゃん
Accessのレポートの話じゃ無いの?
276:デフォルトの名無しさん
21/04/07 23:16:36.79 rJDYR4sC.net
>>275
ホントだ
ネット検索してコピペしたから間違えた
ACCESSでも似たようなので線書いたことあるんだけど
マウスで一番下にやってもラインの真ん中が一番下にくるみたいで、下半分がかけてしまう
277:デフォルトの名無しさん
21/04/08 23:29:31.27 JQVqmXIG.net
>>271
LINEで描けば自由自在
斜め線も描けるから試してみ
（あまり出番はないけど）
278:デフォルトの名無しさん
21/04/09 00:19:55.63 Gteazii/.net
いや韓国製はちょっと……
279:デフォルトの名無しさん
21/04/09 04:42:31.41 qNVyDJXN.net
ACCESSに将来はあるんだろうか
ライバルになるファイルメーカーもコロコロ社名変わってあやしいしもはや大規模事業者に焦点をあててるっぽい
mysqlとWeb系でつくるのがスタンダードになりつつあるの？
軽く勉強しようとしたけどVBA程度の知識じゃわけわからんかったというか何を勉強すればいいのかもよくわからん
sqlにhtml とcssも覚えなきゃならなくて
レポートとかどうやってつくるのかわからんし印刷関係はブラウザに依存するらしい
上記でGUIやレポートまでつくれるのかすらわからない
280:デフォルトの名無しさん
21/04/09 22:02:57.20 p4gVUybA.net
>>279
将来は分かりませんが代わりのツールは少ないですね
Officeは最低10年間はサポートされるのでスグには無くならないでしょう
たまにweb系の話が出るのはデスクトップアプリかブラウザアプリかの話ですよね
個人的にAccessの代わりにweb系というのは少し飛躍している様にも思えますが
どの基盤を使うかは用途や運用保守のし易さによって決めるものですのでその人次第です
281:デフォルトの名無しさん
21/04/10 12:39:36.27 UMFLPSSB.net
Access全盛期と違って、開発環境やDBが無償で提供されているし
ｈｔｍｌをテキスト出力するだけできれいなレポートも作れる
UIを自分でいじりながらデータ入力していくような人種にはいいんだが希少種だろう
282:デフォルトの名無しさん
21/04/10 14:43:14.97 UjDtjnXq.net
>>281
例えばどうするの？
283:デフォルトの名無しさん
21/04/11 09:47:57.70 5s7yLoxe.net
>>279
Accessはデータベースと言うより帳票ツールだよ
FileMakerはデータベースとしての機能が充実してるがFileMaker使うぐらいならMySQL、PostgreSQLで代替えが効く
どっちかと言うとFileMakerがライセンス料金の高さも有って残らないと思う
284:デフォルトの名無しさん
21/04/11 11:30:54.71 5s7yLoxe.net
FileMakerより(MySQL or PostgreSQL)+Accessで安くデータベース&クライアントシステムを作れると思う
285:デフォルトの名無しさん
21/04/11 17:50:34.38 X3jcs1bB.net
データベース部分よりもACCESSのフォームやレポートをつくる機能が貧弱なんだよね
>>284
MySQL or PostgreSQLに以降するのってどの規模になってから？
エクセルの延長線で使うレベルだとACCESSのままでいいですよね？
286:デフォルトの名無しさん
21/04/11 21:28:08.72 Zjk0ZDQj.net
ファイルメーカーはフォームやレポートの機能がリッチなの?
ファイルメーカーが良いかもよ。
287:デフォルトの名無しさん
21/04/11 21:33:55.74 X3jcs1bB.net
>>286
リッチどころじゃないよ
ACCESSがwin95
FMは10
288:デフォルトの名無しさん
21/04/11 22:19:59.40 Zjk0ZDQj.net
そりゃファイルメーカーに決まりだね
289:デフォルトの名無しさん
21/04/12 10:48:48.79 rGKItn7h.net
>>285
>>Excelの延長線上
Access mdbはある一定容量で破綻するからね
Excelで収まってるレベルでもMySQL Community EditionやPostgreSQLに移行した方が無料で使える訳だし
Excel,Access自体ライセンス必要だしライセンスフリーで使えるなら、それに越した事無い
290:デフォルトの名無しさん
21/04/12 10:51:16.61 rGKItn7h.net
FileMakerのメリットはWebサービス公開がし易いって所だよな
そういう使い方するにしてもLAMPとか使う方が安く簡単にWebサービス開始出来る
291:デフォルトの名無しさん
21/04/12 11:40:02.98 Ey8PGUUo.net
>>287
ファイルメーカーの45日無料評価版をインストールして少しいじってみました.
いまさら移行を考える程のメリットは感じられませんでしたが,確かにUIはシンプルで使いやすそうでした.
292:デフォルトの名無しさん
21/04/12 12:45:07.60 MyLZJXYd.net
>>291
>>いまさら移行を考える程のメリットは感じられませんでしたが,確かにUIはシンプルで使いやすそうでした.
それでライセンス料金は高い
あまりメリットが無い
293:デフォルトの名無しさん
21/04/12 16:33:34.27 Zar6nVa9.net
>>289
PostgreSQL使うとして一度設定してればACCESS使う感覚でレポートやクエリをつくれるんですか？
294:デフォルトの名無しさん
21/04/12 17:49:57.50 45/NLIkc.net
>>293
フロントエンドはAccess利用する
PostgreSQL固有のUIツールは無い
295:デフォルトの名無しさん
21/04/12 17:51:00.80 iBadv1fh.net
桐にしとけ
296:デフォルトの名無しさん
21/04/12 18:18:26.93 NqjzProv.net
>>294
ACCESSをフロントエンドで使う場合、という意味でした
297:デフォルトの名無しさん
21/04/12 18:32:01.84 45/NLIkc.net
>>296
PostgreSQLのテーブルにAccessからLinkはるだけ
そこでクエリー駆使しながらFormやレポート作れる
FileMakerより安く作れる
298:デフォルトの名無しさん
21/04/12 21:43:20.13 5xDeJx97.net
>>295
桐の価格を調べてきました
40台で使用するために1,115,400でした
機能がどうとか以前のお話しでした
299:デフォルトの名無しさん
21/04/13 07:41:55.91 b5G9r+g0.net
>>294
Accessの外部DBなら親和性の高いSQL Serverが多数だとは思います
Expressなら無料でライセンスも商用OKです
機能面もAccessで扱うDBサイズならお釣りが来ます
あえてPostgreSQLを推す理由を教えて欲しいです
無料以外のメリットはありますか？
300:デフォルトの名無しさん
21/04/13 11:23:44.71 3B0ES/zA.net
>>299
URLﾘﾝｸ(rainbow-engine.com)
ケースバイケースだがSQL Server Expressでも良いかも知れませんが
Linuxサーバーとかで稼働させる技術蓄積が少ない
PostgreSQL、MySQLはLinuxサーバーでの技術蓄積が多い
まさかWindowsサーバーでSQL Server Express動かすと思って無いか?
無償で構築したいからね
301:デフォルトの名無しさん
21/04/13 13:20:04.54 b5G9r+g0.net
>>300
Access案件でLinuxサーバー導入はかなりのレアケースだと思います
Linuxに明るい個人ならそれでも良いですが
一般的な企業では運用リスクと保守費用の面から現実的ではないのです
Access案件でその様な提案をしたらほぼ蹴られてしまいます
技術蓄積についてもAccess+PostgreSQLよりAccess+SQL Serverの方が遥かに多いです
そもそもこのスレに相談に来ている方はLinuxサーバーを前提に話していないと思いますよ
302:デフォルトの名無しさん
21/04/13 13:32:35.21 3B0ES/zA.net
>>Access案件でLinuxサーバー導入はかなりのレアケースだと思います
Linuxに明るい個人ならそれでも良いですが
>>一般的な企業では運用リスクと保守費用の面から現実的ではないのです
Access案件でその様な提案をしたらほぼ蹴られてしまいます
.NET COREとか提案したら蹴られるのか?
.NET CORE案件も相当数出てるよ
LinuxサーバーでDB,APサーバー運用するのは今や常套手段でしょ
>>技術蓄積についてもAccess+PostgreSQLよりAccess+SQL Serverの方が遥かに多いです
Windows製品ゆえ多いってだけだと思うよ
>>そもそもこのスレに相談に来ている方はLinuxサーバーを前提に話していないと思いますよ
Accessフロントエンドにした場合、サーバー側がWindowsサーバーしか前提としか無い、てのは狭量以外の何物でも無いと思うよ
303:デフォルトの名無しさん
21/04/13 13:46:56.78 LjzwNZrT.net
Access案件でのサーバーなんて、（是非は別として）テキトーなPCの共有フォルダでのaccdb(mdb)の共有で賄ってるだけなんて珍しくも無かろう
304:デフォルトの名無しさん
21/04/13 13:47:53.05 3B0ES/zA.net
中小企業にWindowsサーバー提案するってコストかかって仕方ない
CALの価格を知らないのかな?
中小企業ほどLinux導入し易いのに
305:デフォルトの名無しさん
21/04/13 13:48:51.64 3B0ES/zA.net
>>303
適当なサーバーだから無償のLinuxで十分
306:デフォルトの名無しさん
21/04/13 14:52:00.66 b5G9r+g0.net
>>302
.NET COREを挙げられてますが、Access案件での話です
Linuxサーバー自体は否定しません
実際Access外案件では昔より増えました
単純にAccessの外部DBにPostgreSQLを推す無料以外のメリットが知りたかっただけです
Linuxサーバーという予想外でしたが
長い間Access開発にも携わっており現実はほぼWindowsなんです
確かにAccessの機能自体は様々なデータソースが扱えますから
その意味では狭量と言われてしまっても仕方ありませんね
307:デフォルトの名無しさん
21/04/13 14:55:38.30 3B0ES/zA.net
>>306
CAL払える企業なら問題は何も無いよ
現実はCALで苦しんでる中小企業が多い
そこを見越して提案出来るかだと思う
308:デフォルトの名無しさん
21/04/13 20:50:49.88 b7IZM+9u.net
サーバーも含めて無料で構築したいだけなのにな
Windowsサーバー使ってCAL払い続けるなんて皆金持ってるんだなw
309:デフォルトの名無しさん
21/04/14 06:25:02.05 iZ4KD1hd.net
コピー中のExcelのデータをACCESSにいれるときは、テーブル自体を表示させないとペーストできませんか？
310:デフォルトの名無しさん
21/04/14 06:49:23.30 Y6ryzCuB.net
>>309
インポートが簡単です。
コピペは知らん、すまん。
311:デフォルトの名無しさん
21/04/14 07:42:09.50 DQnn+aVQ.net
excel vbaでsql叩くのが確実
312:デフォルトの名無しさん
21/04/14 08:49:11.55 iZ4KD1hd.net
>>311
初心者なのでイマイチわかりません
313:デフォルトの名無しさん
21/04/14 10:15:39.10 G8f2jTvc.net
>>312
AccessからExcelよりのインポートすれば良い
URLﾘﾝｸ(www.crie.co.jp)
314:デフォルトの名無しさん
21/04/14 10:16:31.17 G8f2jTvc.net
>>312
ExcelデータのインポートをAccessから実行すれば良い
315:デフォルトの名無しさん
21/04/14 10:25:33.61 G8f2jTvc.net
>>312
インポートで出来る
316:デフォルトの名無しさん
21/04/14 10:26:17.99 G8f2jTvc.net
>>312
import
317:デフォルトの名無しさん
21/04/14 13:18:00.15 5eouqB2E.net
お前ら「コピー中」を無視するなよ
318:デフォルトの名無しさん
21/04/14 13:26:51.89 g6z8n+hy.net
コピー中、なんてもともと出来ないべ
319:デフォルトの名無しさん
21/04/14 18:59:43.46 Y6ryzCuB.net
クリップボードのデータを貼り付けるなら手作業をなぞってテーブル開いて新規レコードに位置付けしてペーストすれば良さそう。クリップボード操作するapiサンプルコードが何処かにあったような、すまんまた明日。
320:デフォルトの名無しさん
21/04/16 09:00:21.71 V1Kjbl/r.net
試してないよ？
Excelで貼り付けたいテーブルと同じレイアウトのデータをコピーしてある状態で
DoCmd.GoToRecord,,acNewRec
DoCmd.RunCommand acCmdPaste
すると張り付いたりしないかな。
321:デフォルトの名無しさん
21/04/17 16:25:08.91 beZyyPJh.net
OLEオブジェクトって手動じゃないと挿入できないの?
VBAでの挿入を試みているんだけど､似て非なるオブジェクトが作られてしまう｡プロパティの数が少し少ない変なオブジェクトが作られて困ってる｡
とりあえずレポートにオブジェクトをつくるのはCreateReportControl メソッドを使えばできるんだけど､リンク親フィールド､リンク子フィールド､値集合ソース､値集合タイプがないオブジェクトが作られる｡
そのうえ､OLEタイプが読み取り専用だからOLEの設定が出来ない｡
どうしたらいいのかな?
322:デフォルトの名無しさん
21/04/17 17:21:36.76 rlSH46Cx.net
>>321
VBAプロジェクトでそのOLEオブジェクトを参照追加する必要有る
その前提を整えたらVBAで出来るんじゃ無いのかな
URLﾘﾝｸ(teratail.com)
Formに画像追加する例
323:デフォルトの名無しさん
21/04/17 17:43:49.92 beZyyPJh.net
>>322
手動なら非連結オブジェクトフレームを挿入するとオブジェクトの種類のダイアログが出てくるので､そこで種類を選びますね｡
この作業をVBAでやっておけばいいということですね｡
ちょっと読んでみますね｡
324:319
21/04/17 21:01:55.24 GNfw/saY.net
だめだああ
なにをやってもうまくいかない
325:デフォルトの名無しさん
21/05/07 07:32:03.14 DloXWpsH.net
いまだにAccess 2.0を所有中
326:デフォルトの名無しさん
21/05/07 12:12:51.35 nZH7MU+b.net
Windows3.1の頃? 95だったかな。
327:デフォルトの名無しさん
21/05/13 02:39:37.83 fH5L5fl1.net
ACCESSで在庫管理や備品管理作っても出先でみることができません（Androidスマホなので）
みなさんどうしていますか？
Webシステムを組むほど大きいわけでもないので予算もありません
適宜レポートを作っておきExcelやPDFにしてクラウドにいれとくとかですか？
328:デフォルトの名無しさん
21/05/13 04:25:52.50 HlQKEMAc.net
>>327
お前みたいな馬鹿には無理なだけ
329:デフォルトの名無しさん
21/05/13 05:05:22.97 4K+rsr0c.net
あーそうかい‼💢
330:デフォルトの名無しさん
21/05/13 06:42:53.98 l6yrLvBl.net
>>327
リモートデスクトップとかTeamViewerでWindowsにログインかな？
331:デフォルトの名無しさん
21/05/13 07:15:26.91 Ak9zxoyZ.net
>>327
データベース更新後にEXCEL作ってクラウドに保管するのを自動化すれば充分な気がしますね。
332:デフォルトの名無しさん
21/05/13 07:26:32.47 NATYYilK.net
そもそも、Windows 用のアプリはパソコン用だから、インターネットで使えない。
それに、文字コードも違うから読めない
インターネット用の表計算アプリを使えば？
333:デフォルトの名無しさん
21/05/13 08:30:28.57 hOYLqCl+.net
ストアでMDBを検索したら見れそうなやついっぱいあるやん
334:デフォルトの名無しさん
21/05/13 11:30:23.03 yB8C7/7J.net
>>327
Webアクセスする目的ならAccessよりFileMakerになるよ
そこまでするならデータベースをMySQLかPostgreSQLに移行してVB.NETでアプリ作る方が良いけどね
335:デフォルトの名無しさん
21/05/13 11:48:19.49 63TpZ/FZ.net
クエリーが上手く作動して、ニコニコしながら、sqlビューへ切り替えてコピーして、VBEでペースト。
余計なカッコを取り除いてdebug.printに打ち出すと結果が違うことがある。
なにが原因なのかなあ？いまはADOでやってるけど、DAOならうまくいくもんかなあ？
クエリーのSQLとADOのクエリーが仕様が違うのかなあ？
同じMS謹製だからANSIとかなんとか気にしなくていいのかと思っていたけど、違うのかな？
336:デフォルトの名無しさん
21/05/13 12:20:50.87 igbBK4jX.net
>>334
ファイルメーカーからハードル上がりすぎだろ
337:デフォルトの名無しさん
21/05/13 12:36:51.71 yB8C7/7J.net
>>336
FileMakerはライセンス料高いからね
Visual Studio習得してアプリ作れるならその方が良い
Webサーバーは必要だけどね
338:デフォルトの名無しさん
21/05/13 12:42:45.76 aIL5A3Qh.net
>>337
VB.netでwebサーバとか完全にもう別物ですやん
339:デフォルトの名無しさん
21/05/13 12:55:37.00 GXeEY8R8.net
>>335
カナ？はカタカナにしろ
340:デフォルトの名無しさん
21/05/13 13:09:30.39 yB8C7/7J.net
>>338
高いライセンス払う余裕有ればFileMakerで良いよ
現実は高いライセンス料払いたく無い企業が多いからね
FileMakerが普及しないのもこれが原因
341:デフォルトの名無しさん
21/05/13 13:31:32.10 DinFNpWn.net
だからって一から自分でつくるってのは飛躍してない？
家建てるときにどこのメーカーがいいですか？
に対して自分で建てろといってるようなもん
342:デフォルトの名無しさん
21/05/13 14:03:30.60 yB8C7/7J.net
>>341
自分で作れ、とは言って無いよ
ソフトウェアハウスの手を借りれば良い
343:デフォルトの名無しさん
21/05/13 14:07:34.22 fH5L5fl1.net
>>342
ライセンス料より高い気が……
344:デフォルトの名無しさん
21/05/13 14:56:12.91 HlQKEMAc.net
>>343
馬鹿には無理なのだから他人に金を出して頼むしかないだろ
馬鹿のくせに金を出さずに人にやってもらおうとか、ゆとりか？
345:デフォルトの名無しさん
21/05/13 15:00:43.59 9/CKV48N.net
>>343
ランニングコストってのが有ってだな、、
FileMakerだとライセンス1回切りじゃ無いから
346:デフォルトの名無しさん
21/05/13 16:59:09.51 fH5L5fl1.net
>>345
ソフトウェアハウスでも保守料かかるだろ
基本的には自分で改変できないし
347:デフォルトの名無しさん
21/05/13 17:16:07.25 9/CKV48N.net
Web化って時点でファイルメーカー選ぶしか無い様な、、
外部からアクセスするしないが重要
348:デフォルトの名無しさん
21/05/13 17:25:00.83 MH+VlhFF.net
外から見たいだけなら、リモートデスクトップでいいんじゃなかろうか
349:デフォルトの名無しさん
21/05/13 17:25:32.84 HlQKEMAc.net
>>347
馬鹿
350:デフォルトの名無しさん
21/05/13 17:48:02.70 9/CKV48N.net
>>347
それ有るの忘れてた
351:デフォルトの名無しさん
21/05/13 18:13:16.22 6ddXJmx+.net
ACCESSで在庫更新したあとOneDriveフォルダにEXCELエクスポートします。
あとはスマホでもタブレットでも参照可能です。
352:デフォルトの名無しさん
21/05/13 18:26:55.54 hOrZuwcL.net
デ、データアクセスページ……
353:デフォルトの名無しさん
21/05/13 20:11:21.52 R/rAXCYS.net
>>347
｢Web化って時点でファイルメーカー選ぶしか無い｣
なぜこういう嘘を書くのか。それとも本当にそう思っているならそんな頭の弱い人は書かなきゃいいのに。
354:デフォルトの名無しさん
21/05/14 10:03:38.95 wh02PaxN.net
>>352
実際使ってる例って有るのかな?
355:デフォルトの名無しさん
21/05/14 10:10:19.21 A+WZ3bIw.net
>>354
とっくの昔にお亡くなりになったような記憶が…
356:デフォルトの名無しさん
21/05/14 10:18:39.71 wh02PaxN.net
>>355
実例がほとんど無いね
URLﾘﾝｸ(support.microsoft.com)ロードマップの-access-services-497fd86b-e982-43c4-8318-81e6d3e711e8?ui=ja-jp&rs=ja-jp&ad=jp
Access Webアプリも無くなってる
ファイルメーカーの有利な点だな
357:デフォルトの名無しさん
21/05/22 19:40:24.10 1Qe3fJgv.net
ちょっと前までGoogleでデータベース・サービス持ってたのにいつの間にかなくなっちゃたな。
最近VBAよりGASが面白くなってきたので手を出そうと思ってたのに。
やはり無料じゃGoogleも厳しいか。
358:デフォルトの名無しさん
21/05/27 01:00:52.60 3lF12N8K.net
レポートやフォーム作るときに、拡大できないの致命的だよね
win標準の拡大ではぼやぼやで目がたえりれない
エクセルあたりでは普通に拡大できるのになあ
これだけでファイルメーカーに乗り換えようと思ったりしてよ
359:デフォルトの名無しさん
21/05/27 02:13:23.53 J8UpNeL3.net
馬鹿がファイルメーカー、ファイルメーカーとしつこく繰り返しているから絶対に使わない
360:デフォルトの名無しさん
21/05/27 08:19:11.99 qf3Pvmmz.net
と馬鹿が申しております
361:デフォルトの名無しさん
21/05/27 12:00:09.01 3lF12N8K.net
FM→ACCESSときたけど
レイアウトつくるのはびっくするくらい大変
そして頑張っても前時代的なのになってしまう
金額の問題だけで以降したんだけどね
ACCESSは365についてるから無料みたいなもの
FMは約6万
362:デフォルトの名無しさん
21/05/27 12:05:37.62 3lF12N8K.net
サブスクは5ユーザ からのみで年¥96,000
というびっくりプライス
363:デフォルトの名無しさん
21/05/27 14:45:17.54 U0nLnJgd.net
Report は pdf 出力やろ常考
364:デフォルトの名無しさん
21/05/27 15:51:14.66 ksqD/aLA.net
>>363
フィールドの位置とか外部ソフトでできるの？
365:デフォルトの名無しさん
21/05/27 15:53:14.54 UBVWS17P.net
ACCESSでA4に収まるように8ptくらいのフィールド配置してたら目が痛くなって具合が悪くなったな
366:デフォルトの名無しさん
21/05/29 06:45:06.05 b7REYRZH.net
>>365
ノートだとそうなんかな…
自作のときはずっと9ptがデフォだけど何ともないな…
拡大鏡でも使った方が楽な気がする
367:デフォルトの名無しさん
21/05/29 12:27:27.87 hFIjeD7o.net
>>366
拡大鏡ってぼやぼやになるからなあ
368:デフォルトの名無しさん
21/05/29 12:27:43.67 hFIjeD7o.net
ん？ノート？
369:デフォルトの名無しさん
21/05/30 02:44:36.28 gYrIGJpw.net
右側のプロパティって時間小さすぎるよな
レイアウト配置よりこっちをでかくできるようにしてほしい
370:デフォルトの名無しさん
21/05/30 02:46:50.94 gYrIGJpw.net
あれもうちょっとどうかならないんだろうか
一日使うにはストレスがすごすぎる
371:デフォルトの名無しさん
21/05/30 08:25:31.88 13wLe9nW.net
ユーの眼球レベルにあった
でかくて低解像度のモニター使え
372:デフォルトの名無しさん
21/05/30 11:48:00.52 AsIzYzCY.net
ユー買っちゃいなyo!
373:デフォルトの名無しさん
21/06/01 06:40:30.63 UJDWMLaS.net
共有ファイルとして使う場合
処理がバッティングすると、待ち？っぽい動きするんだけど、この待ち時間を短くとか長くとか設定できない？
374:デフォルトの名無しさん
21/06/04 04:59:49.95 JYH5jKrW.net
>>367
整数倍にすればボケませんよ
375:デフォルトの名無しさん
21/06/04 05:01:18.78 4UOZ506g.net
>>374
150でも200でもぼける
376:デフォルトの名無しさん
21/06/04 06:58:24.85 pJrSJSTA.net
5年ほど前に作った製品ラベルのレポートを修整しようとしたら、老眼は進んでるわ液晶の解像度は上がってるわ、マウスカーソルの移動量を増やしてるわで大変だった。デザインビューの拡大出来るようになると良いですね。
377:デフォルトの名無しさん
21/06/05 16:40:26.94 RpMlRy13.net
ファイルメーカーの体験版使ったらACCESSに戻れなくなってしまった
ACCESSになんかメリットある？
378:デフォルトの名無しさん
21/06/05 18:22:16.60 HEfJq5i5.net
馬鹿がファイルメーカー、ファイルメーカーとしつこく繰り返しているから絶対に使わない
379:デフォルトの名無しさん
21/06/05 18:58:27.51 vqCzfq5H.net
と馬鹿が申しております
380:デフォルトの名無しさん
21/06/05 18:59:13.81 ZYY2LhyT.net
>>377
コストかな。
田舎の工場で低価格な電子部品作ってる。30台くらいのパソコンで使うからファイルメーカーなんてコストは現実的ではないんです。
381:デフォルトの名無しさん
21/06/05 21:31:57.93 3DV79FRa.net
ファイルメーカーとAccessは得意分野が全然違うのでは？
382:デフォルトの名無しさん
21/06/05 21:53:37.74 mImo/W/A.net
ファイルメーカーの宣伝でしょ
383:デフォルトの名無しさん
21/06/05 22:47:17.80 RpMlRy13.net
>>382
ACCESSでうまくいかずもやもやするたびに体験版つかってみて
ライセンス料なんかが不安でACCESSにもどるってのを繰り返してる
ACCESSが現代的なGUIになってくれて
ある程度はコード書かなくてもできるよえになればいいんだが
384:デフォルトの名無しさん
21/06/06 02:59:11.72 g1lC8rmM.net
え！？ひとりでも最低
じゅじゅじゅじゅじゅうまんえーん！？
URLﾘﾝｸ(i.imgur.com)
ちなみにキントーンもこの商法みたいだな
ACCESSはUIがクソなのと共有がほぼできない、ちょっとしたことでもコード書かなきゃならない、その代わりに激安ってことなんだろうな
逆にそこらを改善するのはこんくらい金とらなきゃできないことなのかもしれん
385:デフォルトの名無しさん
21/06/06 04:17:17.40 I3Drh9AD.net
馬鹿
↓
ACCESSは共有がほぼできない
386:デフォルトの名無しさん
21/06/06 10:18:31.22 9mmqAG88.net
FileMake使いのやつって
Access使いを見付けると必ず攻撃してくるよね
なんで不況に熱心なのかな
387:デフォルトの名無しさん
21/06/06 10:21:05.17 9mmqAG88.net
馬鹿
↓
FileMakerはコード書かなくていい(キリっ)
388:デフォルトの名無しさん
21/06/06 11:26:09.24 tDAG+yA0.net
と馬鹿が申しております
389:デフォルトの名無しさん
21/06/06 14:07:30.75 g1lC8rmM.net
いくらなんでも高すぎる
あれって全社員にipadもたせてリアルタイムでデータ共有するような大企業向けだろ
とはいえほかにACCESSしか選択肢がなくてACCESSは手間がかかり過ぎるが
390:デフォルトの名無しさん
21/06/06 16:01:30.88 /p4HIOC8.net
ACCESSは実質開発が停止してるからな
Web公開手段を再度実装したらFileMakerなんて駆逐出来るのに
391:デフォルトの名無しさん
21/06/07 23:05:55.18 7Tyglgss.net
>>375
それ元がボケてるんやな
ディスプレイ買い換えるしかないな
うちは拡大してもクッキリやで
392:デフォルトの名無しさん
21/06/08 00:47:30.58 Cnc+U0Kq.net
>>391
んなことないだろEIZOのFLEX Scanだし
ぼやけるって言葉の認識だと思うが
ベクターとラスターの拡大みたいなこと
URLﾘﾝｸ(i.imgur.com)
拡大鏡だと単純拡大だからガタガタのぼやぼや
スマホの拡大縮小だとおかしくならないよね？
ソフトに標準で拡大縮小が実装されているならそれと同じできれいに拡大できる
ACCESSはないから拡大鏡つかうことにかるから汚いしつかいにくい
393:デフォルトの名無しさん
21/06/10 00:40:17.87 BRYBvkaF.net
>>392
〉拡大鏡だと単純拡大だからガタガタのぼやぼや
単純拡大だからガタガタになるので正しい
しかしぼやぼやにはならない
頭（目？）悪そうだなこいつ
394:デフォルトの名無しさん
21/06/10 01:23:12.45 /1oHskcz.net
文字が
URLﾘﾝｸ(i.imgur.com)
こうなるのをボヤボヤといってるんだと思う
MSゴシック使ってるやつはわからないかもしれないが
アンチエイリアス入ったフォントで拡大鏡使うとボヤボヤになるよ
URLﾘﾝｸ(i.imgur.com)
395:デフォルトの名無しさん
21/06/14 20:33:26.59 bsW07B0Y.net
getobjectでVBSからmdbへ接続してACCESSのモジュールを書き換えているんだけど、プロシジャーをチマチマ書き換えるのが面倒になってきたので、
既存モジュールの全行を削除してからModule.AddFromFile メソッドで新モジュールを一括して書き換えた。
mdbを保存する段になって「ファイルの共有ロック数が制限を超えています」と怒られた。
たしか、コミットトランスするんだよなあ、と資料を読んでみたが、それが出来るオブジェクトが存在しない。
一体どうしたらいいのかな？
396:デフォルトの名無しさん
21/06/15 10:02:33.87 Bs75sj8Q.net
ACCESSを買えば良いと思います。
397:デフォルトの名無しさん
21/06/15 11:17:25.55 KpoHzIzW.net
>>396
Microsoft 365 for businessを使用してます。
ACCESSはしょっちゅう壊れるからVBSで出来ることはVBSでやりたいですね。
398:デフォルトの名無しさん
21/06/15 13:21:19.21 HnTVFPij.net
>>397
そんな面倒なことw
2.0使いはじめた頃は間違った使い方してたのもあって壊しまくったが、ここんとこ壊れたことなどないぞ
399:デフォルトの名無しさん
21/06/15 15:19:36.70 KpoHzIzW.net
>>398
フォームのコマンドボタンの位置をほんの少しずらしただけで壊れこともあるし、最適化で壊れたこともある。
最近もどっかの記事でそのような記述を見たような気がする。
VBSはコードを見るのも書くのもサクサクだからお気に入りだよ。重たいACCESSを開かなくていいのは気が楽だよ。
でも、関数がVBAと少し仕様が違うとか面倒なことがあるのが玉に瑕だなあ。
400:デフォルトの名無しさん
21/06/15 20:40:00.08 XJxpvmdE.net
>>395
mdbからaccdbにすると壊れ難くなる気がします。
401:デフォルトの名無しさん
21/06/16 09:49:56.68 ni17rAhE.net
>>400
面白そうですね。参照設定を変更するくらいで出来そうですね。だめなら宣言文にDAO.を加えれば出来そうな気がします。
今はほぼ全ての改造をVBS経由で行えそうだから、それで行き詰まったらやってみます。
402:デフォルトの名無しさん
21/06/16 16:39:10.95 uJQ6HHCX.net
>>395
共有ロック数って言ってるんだから
VBSからmdbへ接続が何度も繰り返してるか間違ってるんじゃね
403:デフォルトの名無しさん
21/06/16 18:15:04.80 5mM/xZpb.net
プロシージャーを書き換えるプロシージャーを書くのって面白い？
404:デフォルトの名無しさん
21/06/16 21:11:44.71 ni17rAhE.net
>>402
共有ロックの問題はMaxLocksPerFileを増やしたらあっさり解決しました。
>>403
手作業でプロシジャーを変更していたときより遙かに楽になりましたし。仕事が楽になる過程は面白いです。
なによりもAccessと違ってサクサク動くのがVBSの最大の魅力です。
405:デフォルトの名無しさん
21/06/16 21:18:57.41 ni17rAhE.net
一括でモジュールを書き換えるのすら面倒になったのでLoadFromTxtに切り替えた。
これならフォームやレポートも丸ごと移植可能だわ。
406:デフォルトの名無しさん
21/06/22 11:37:45.99 Ug3/ZHCp.net
オフィス365でデーターを保存したときにウインドウの上のバーの箇所のタイトルに
「ファイル名＋保存しました・・」って表示になるけど、
これ出さないように出来ないのかな？
ウインドウのタイトルが変わるとRPAが誤作動をおこすので
いらない機能をつけるなよといつも思います。
407:デフォルトの名無しさん
21/06/22 11:40:11.76 Ug3/ZHCp.net
>>406
誤爆でした。ここAccessなんですね。。
408:デフォルトの名無しさん
21/06/22 19:29:04.84 jEG7fGSr.net
なんでVBA使わずRPAなの？
409:デフォルトの名無しさん
21/06/22 20:23:21.77 BN5S6vpx.net
そのVBAを操作する人間の操作を代行させるのがRPAなんやで
410:デフォルトの名無しさん
21/06/23 19:45:53.16 G1+Cnxf/.net
なんで公共の場で地元言葉なの？
411:デフォルトの名無しさん
21/07/24 13:25:46.25 1ILHRw72.net
レポートを変数「i」回だけ複数印刷しようとして、
PrintCountやFormatCountを使ったのですが、
「i」とPrintCount・FormatCountが一致しません。
PrintCountやFormatCountって、
ページ変更・ヘッダー・フッターなどでも、カウントが増えますか？
アルゴリズムそのものが間違いでしょうか？
412:デフォルトの名無しさん
21/07/24 14:08:20.10 Q5wmuS+A.net
おまえごときがVBAやる事そのものが間違い
413:デフォルトの名無しさん
21/07/24 19:42:05.93 g6yRedEM.net
なな、南斗
414:デフォルトの名無しさん
21/08/04 20:55:05.72 +oxSmlyp.net
[タイプ]が勝手に[ﾀｲﾌﾟ]になってしまう。
[ ]で囲んでるのに。なんぞこれ。
415:デフォルトの名無しさん
21/08/05 08:02:56.74 MUFJqoFE.net
あれ、今日は勝手に半角に戻らない。
再起動するだけで良かったのかも。
独り言スマンね。
416:デフォルトの名無しさん
21/08/05 14:37:35.48 hIo3G+nj.net
解決済みという事ですが
名称の勝手変換は[名前の自動修正]を有効にしていると起きます
初心者向けの親切機能ですが、オブジェクト名などを細かく定義している場合には逆に足枷になります
名称変更時に自動トレースしきれずバグを生み出したりします
ご参考までに
417:デフォルトの名無しさん
21/08/05 18:07:31.70 Xn5oJsvt.net
いや、再発しました。
名前の自動修正、調べてみます。
418:デフォルトの名無しさん
21/08/07 07:56:44.50 GRpq7tgL.net
Windows11+ACCESS365の環境で発生してます。
ﾀｲﾌﾟ(半角)と入力しても行を移るとタイプ(全角)になっちゃう。[ ]でくくっても駄目。
Windows10+ACCESS365では[ ]でくくると勝手に全角にはならないので、Win11Betaのせいっぽいです。
アプリの修復試してみて、駄目ならWin11Betaのフィードバックに上げます。
419:デフォルトの名無しさん
21/08/07 20:17:05.58 51b7egKe.net
どっかに全角のタイプってオブジェクトがある（あった）んだろな
そういえばWIN10でNLSのバージョン変わって全角半角の判断がおかしくなる問題があったな
ちょっと試したWin10の詳細バージョン書いてくれ
Win11のＮＬＳってどうなってるんだろ
420:デフォルトの名無しさん
21/08/27 14:57:39.16 2jUlNhAQ.net
すみません、見逃してた。
Windows10の21H1ですね。
NSLがなんの事かわかんないですが、確かに前にも経験したトラブルの様な気がします。
421:デフォルトの名無しさん
21/09/04 15:37:28.00 s2WpiZ/S.net
明後日スタンダード試験だけどやばい模擬問題正答5割だわ
422:デフォルトの名無しさん
21/09/04 16:34:10.88 JBLhGxRz.net
ん、まぁ、ガンガレ
423:デフォルトの名無しさん
21/09/05 03:44:21.58 Ocn+wvkQ.net
外部からaccessの特定のレポートを開く方法ある？
424:デフォルトの名無しさん
21/09/05 14:14:02.27 ICYnYWWd.net
外部って？
普通にCOMで操作すれば良いんじゃねえのか
425:デフォルトの名無しさん
21/09/07 12:53:43.40 3mZ93kfX.net
パススルークエリのパラメータをaccess外から設定する機能教えてください。
426:デフォルトの名無しさん
21/09/07 13:13:29.25 7P2mUzTw.net
access外って？
何がやりたいかわからん
427:デフォルトの名無しさん
21/09/07 14:16:04.54 QthkAqNV.net
ADO
ADODB
DAO
428:デフォルトの名無しさん
21/09/08 22:14:40.15 jpM3jR9r.net
>>427
データベースに
ドライバなしでvbaで接続する方法ってないの？
429:デフォルトの名無しさん
21/09/09 01:34:00.79 4EZcQadY.net
>>428
URLﾘﾝｸ(docs.microsoft.com)
430:デフォルトの名無しさん
21/10/09 23:35:10.80 uMcy1fPR.net
VBAエキスパートって取ったほうがいいでしょうか
431:デフォルトの名無しさん
21/10/10 08:29:41.88 fy4lWk3l.net
資格マニアを見る世間の目は冷たい
432:デフォルトの名無しさん
21/11/02 07:37:22.79 0Z1mhYfJ.net
>>430
資格より実践を積むべし
433:デフォルトの名無しさん
21/11/29 15:04:38.27 vB15GkdT.net
レコードが存在しない場合に 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に、何か制限などありますでしょうか?
434:デフォルトの名無しさん
21/11/29 15:15:06.43 MiFRCJa7.net
直接の返答じゃないけど、SQL一発書きじゃなきゃだめなの？
事前にレコード数チェックして分岐じゃだめなの？
435:デフォルトの名無しさん
21/11/29 15:17:50.75 vB15GkdT.net
UPDATE と組み合わせて、SQL一発を考えてます
無理であれば、おっしゃるように分岐かなと
436:デフォルトの名無しさん
21/11/29 16:01:33.58 MiFRCJa7.net
ちょっと気になったので手元で実験してみたけど、dummyテーブルが存在して空ではないときには
（多分）431の想定どおりの挙動をしていると思う
バッドノウハウ臭いので、おとなしく事前チェックして分岐かなぁ
まぁAccessのSQLって変だよね
437:デフォルトの名無しさん
21/11/29 17:41:32.65 XYio4/pG.net
access はupdateいっぱつで初挿入もできたはず
しゅきーのヌルを上書きする感じで
438:デフォルトの名無しさん
21/11/30 05:36:52.18 KirC+CSy.net
>>437
さすがにそんなことはないと思うが、ちょっとサンプルコード書いてみてくれ
439:デフォルトの名無しさん
21/11/30 09:01:45.87 qEKwfbTR.net
>>438
選択クエリは更新できる
UPDATE TableA RIGHT JOIN TableB ON TableA.ID = TableB.ID
SET TableA.ID = [TableB]![ID], TableA.Data1 = [TableB]![Data1], TableA.Data2 = [TableB]![Data2];
440:デフォルトの名無しさん
21/11/30 10:50:50.28 d0QAjKSx.net
>>433
values (1, "name")
じゃ駄目なの
441:デフォルトの名無しさん
21/11/30 10:58:46.58 +NfPg838.net
>>440
単純にinsertするだけならそれでいいんだけど、existsを使って条件付けようとしてるのでvaluesは使えない（エラーになる）
442:デフォルトの名無しさん
21/11/30 12:38:13.11 nsxxcWz3.net
それ自分でDUALという名称でテーブルを作って1レコード入れておけば出来るよ。
OracleのDUALも実体はそんな感じだったと思う。
443:デフォルトの名無しさん
21/11/30 16:33:37.59 KirC+CSy.net
>>439
更新はできるけど、存在しない行を更新しようとしたとして
その行を新規追加することなんてないだろ．．．
と思ったけど、追加されるのか
ACCESS無茶苦茶しやがるな
リンクテーブルに対してでも追加しやがる
SQL ServerだってFromでJoinしてUPDATEできるけど、
さすがに行が追加されることなんてないぞ
エラーの原因が分からない？
444:デフォルトの名無しさん
21/11/30 16:35:34.50 KirC+CSy.net
あ、最後なんか変な行入った
445:デフォルトの名無しさん
21/11/30 17:23:09.43 aruulzL7.net
あくせく働くぜ
446:デフォルトの名無しさん
21/11/30 18:49:33.51 VsTnDahT.net
>>443
Access的には「更新可能クエリ」はテーブルと同等の扱いなのだろう
447:デフォルトの名無しさん
21/11/30 22:05:19.66 KirC+CSy.net
>>446
Viewが実テーブルとほぼ同じ扱いってのは別に問題じゃない
UPDATE文でテーブルの行数が変わるのが無茶苦茶なんだよ
448:デフォルトの名無しさん
21/11/30 22:10:51.28 VsTnDahT.net
SELECT * FROM TableA RIGHT JOIN TableB ON TableA.ID = TableB.ID
これの更新だから行数は変わっていない
449:デフォルトの名無しさん
21/11/30 23:40:10.71 KirC+CSy.net
UPDATE文で実テーブルの行数が、な
450:デフォルトの名無しさん
21/12/01 09:46:36.82 dv4Z+qI2.net
>>433
SQL一発では出来ないよ
残念だが
DOループで回す事になる
451:431
21/12/02 11:57:32.43 nKskuO+T.net
ありがとうございます
分岐で分けることにしました
452:440
21/12/02 22:29:47.92 vu0CN48k.net
もうちょっと俺を信用してもええんやないかと思ったが
出来たんならええか
453:デフォルトの名無しさん
21/12/08 11:00:44.75 8eCyKUYS.net
データベースに対し、レポートを外部データの取込で追加するのですが、
この操作をGUIでなくコマンドで行う事は出来ますでしょうか。
454:デフォルトの名無しさん
21/12/08 11:36:19.36 XFpeOKs/.net
mdbファイルまるごと差し替えでok
455:デフォルトの名無しさん
21/12/08 14:57:00.86 8eCyKUYS.net
>>454
返信ありがとう
やっぱ基本はＤＢごと差し替えになるんですね・・・
最新を管理しないといけないということですか
456:デフォルトの名無しさん
21/12/08 16:58:22.13 sRvDCOgH.net
>>452
レコード入れずに試してみてました
あとで確認してみます
457:デフォルトの名無しさん
21/12/08 18:12:44.70 ixTDMdmo.net
>>453
access起動コマンドラインオプションに
/x マクロ名
で自動実行可能
向きが逆だけどオブジェクトのコピーでレポートをコピー出来る
458:デフォルトの名無しさん
21/12/08 20:30:00.04 FsTgnRus.net
>>453
DoCmd.TransferDatabase acImport
459:デフォルトの名無しさん
21/12/13 11:19:46.91 HhLRYuYl.net
>>442,452
ありがとうございます、確認しました
dummy テーブルにレコードを入れて動作しました
INSERT INTO t_table(id, name)
SELECT 1, "name"
FROM dummy
WHERE NOT EXISTS(
SELECT * FROM t_table WHERE(id = 1)
);
460:デフォルトの名無しさん
22/01/15 00:52:56.35 ALzAiADU.net
VBAって、サポート切れてんの？
企業とかこれから、多数のツールどうすんだろうね。
461:デフォルトの名無しさん
22/01/15 07:46:29.84 8MS0rOI1.net
サポート気にするような部署でvbaを採用するだろうか？
462:デフォルトの名無しさん
22/01/17 00:16:00.31 oS3b1eNW.net
VBAって単独の製品じゃないんだが
そもそもVBAがサポート切れってどこの情報だ？
463:デフォルトの名無しさん
22/01/17 12:28:46.14 t8m0YBBL.net
OneDriveにコードをバックアップして直接開いたところ
URLﾘﾝｸ(imgur.com)
こういった線が付きました
Office2016 Proなのですが設定等でVBエディターでも表示できますでしょうか
またお恥ずかしながらこの線の一般的な名称も教えて頂けませんでしょうか
464:デフォルトの名無しさん
22/01/17 17:44:28.15 hBkYcVxQ.net
>>463
何で開いたのかは知らんけど、AccessとかのVBAエディタには、そういった今どきの便利な機能は無いかと
一般名称かどうかはしらんけど、VSCodeとかの設定では Indent Guide でひっかかるんじゃないかな
465:デフォルトの名無しさん
22/01/17 20:02:01.14 r2vXEkpI.net
>>464
ありがとうございます
名称のほうぐぐってみまして、確かにVS関連の情報が多く出てきました
大変便利ゆえに残念です！
466:デフォルトの名無しさん
22/01/31 11:21:11.42 ZCY1so+a.net
Microsoft 365 Access Runtime ダウンロードリンクが動作してないのですが
ダウンロードできた方おられます??
467:デフォルトの名無しさん
22/01/31 11:29:43.23 Di33df7w.net
>>466
見てみたけど、ダメだねぇ
468:デフォルトの名無しさん
22/02/22 22:36:04.61 h8gQU92u.net
アクセス2010でVBA内でエクセルのブックを操作するためにブック選択ダイアログを開こうとしています．ブックが存在するフォルダーはc:\x\y内にあります．
それでChDirでGetOpenFilename実行時に開くフォルダーをc:\x\yにしたいのですが，規定のドキュメントフォルダーが開きます．
Debug.Print CurDirは"C:\x\y"を返しますので，システムが認識するカレントフォルダーが"C:\x\y"に変わっているのは確認済みです．GetOpenFilenameが開くフォルダーをGetOpenFilenameに変更できないことが問題です．
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のから操作するとうまくいきません．解決策はないでしょうか？
469:デフォルトの名無しさん
22/02/22 22:38:16.30 h8gQU92u.net
間違えました。
GetOpenFilenameが開くフォルダーをGetOpenFilenameに→
GetOpenFilenameが開くフォルダーをc:\x\yに
470:デフォルトの名無しさん
22/02/23 09:19:56.78 yBLUqW/Q.net
URLﾘﾝｸ(hironimo.com)
WorkBooks.Open
471:デフォルトの名無しさん
22/02/23 10:16:59.77 /GeE/zJY.net
>>470
GetOpenFilenameでダイアログが立ち上がったときのフォルダーをc:\x\yにしたいという意味です。
472:デフォルトの名無しさん
22/02/23 14:00:43.13 3ksW4w1X.net
FileDialogを使う
473:デフォルトの名無しさん
22/02/23 15:58:28.79 noR6ud0U.net
URLﾘﾝｸ(officevba.info) こっちスかね
メリットもデメリットも書いてあって親切
474:デフォルトの名無しさん
22/02/23 16:48:55.01 /GeE/zJY.net
>>472
ありがとうございました．
FileDialogだとカレントフォルダーで開いてくれました．
475:デフォルトの名無しさん
22/02/23 16:53:30.10 /GeE/zJY.net
>>474
ありがとうございます。この説明はとても親切ですね。よくわかりました
476:デフォルトの名無しさん
22/02/24 15:49:02.02 G5PhgONP.net
>>468
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")
こんな感じか
実行したらエクセルのオプション変わっちまったｗｗ
デフォルト何だっけな
477:デフォルトの名無しさん
22/02/28 11:00:59.24 JmI4xSUc.net
初歩的な質問でお恥ずかしいのですが教えて下さい
面倒な計算や処理をして値を返す関数Aがあった場合
その戻り値を判定したい場合
If A = 1 or A = 2 then
と記述するとaccessは 2回処理することになるのでしょうか
それでしたら仮に変数(V)を用意して、一旦
V = A
のように格納してから
If V = 1 or V = 2 then
と記述したほうが処理的には一回で済むという解釈になりますでしょうか
すみませんがご教示頂けたらと思います
478:デフォルトの名無しさん
22/02/28 11:49:10.60 JmI4xSUc.net
すみません、試してわかりました。
後者は一回で済みました。
質問することでその後すぐ簡単な確認方法を思いつくことがよくあります
お恥ずかしい。スレ汚し失礼しました；
479:デフォルトの名無しさん
22/02/28 12:38:27.12 jOzz1fM6.net
どんまい 気付きや学びに成りゃ無駄じゃ無い
480:デフォルトの名無しさん
22/02/28 12:41:50.52 frLBMESq.net
ちょっと違う話だけど、VBAにもOrElseやAndAlsoが欲しいなと思うときはある
481:デフォルトの名無しさん
22/03/06 15:10:37.27 R+n9Kzax.net
SQLの勉強をさいきんはじめました
動的SQLによる数独の超高速解法
というのを読みました
動的にSQLを生成するため
・一つはJDBCを使う方法
・もう一つはストアド・プロシージャを用いた方法
云々って書いてあります
これらって、アクセスのSQLでもできそうなものでしょうか？
（過去に話題として出てたらごめんなさい）
できそうならやってみようかと
茨の道ならあきらめます
482:デフォルトの名無しさん
22/03/06 16:34:17.90 TgGQVPNx.net
2つとも分からんけど、VBAが使える環境なら動的SQLは可能なはず
483:479
22/03/06 17:10:27.06 R+n9Kzax.net
SQLとは、使用人から経営者になることだ
今まで自分で作業してたのをしなくてよくなる
使用人に、「こういうのを出してくれ」と
言うだけでよい
数独についてであれば、今まで
総当りするプログラムとか
条件判定とかを自分で考えていたが
SQLならそうしたものは自分で考えなくてよい
勝手に総当りして勝手に判定してくれる
・・・ということが書いてありました
これって、既存のプログラムの要件を
SQLで表現できれば中身は考えなくてよい
ってことですよね けっこうおもしろいかも
484:デフォルトの名無しさん
22/03/07 07:14:29.39 xVPINsIe.net
経営しなくてもお金が稼げるSQLがどこかに書いてあると良いのに。
485:デフォルトの名無しさん
22/03/07 12:53:13.63 +OeG3Wfd.net
>>481
JDBC Driver で Access MDB に接続できる
つまりワカラン
486:デフォルトの名無しさん
22/03/07 13:11:37.42 3lxJ/2QX.net
これかな？
URLﾘﾝｸ(codezine.jp)
URLﾘﾝｸ(codezine.jp)
URLﾘﾝｸ(codezine.jp)
記事中においてJavaでSQLを生成している部分はVBAで書けるだろうけれど、
他のRDBMSで使えるSQLの全てがAccessでも使えるわけじゃないから
その辺をうまく置き換えたりVBAで補ったりする必要はあると思う
487:デフォルトの名無しさん
22/03/07 14:07:14.74 tjPYNfUL.net
各DBで使えるSQL構文一覧表
(ROLLUPは jet使えない oracleはokとか)
のページが昔あったのに
今見たら見あたらなかったわ
488:デフォルトの名無しさん
22/03/08 06:28:34.40 fGzXxwFZ.net
総あたりする場合、SQLはどうやって
候補を管理してるんだろ？
ふつうにメモリ上に持ってたら
メモリが足りないような
489:デフォルトの名無しさん
22/03/08 20:13:50.94 fGzXxwFZ.net
数字の書かれたパネルがあります
このパネルのマスをいくつか
ぬりつぶし、残った数字の積が、
たて・横のどの列も12になるように
してください
2523
6257
5262
2334
これぐらいの規模の問題で
練習したほうがいいかも
ぬりつぶしは1に置き換える
490:デフォルトの名無しさん
22/03/09 11:17:27.88 wDARNtYc.net
動的SQLっていうから
DBエンジンにSQL投げる
↓
その結果を受けて自分を書き換えて
再度新しいSQL投げる
↓
望む結果になるまで繰り返す
みたいな話を期待したら
拍子抜けだった
491:デフォルトの名無しさん
22/03/10 18:36:45.22 y/Xk/sN2.net
>>489
SELECT 解答
FROM すべてのあり得る盤面
WHERE 今回の条件
だから
まず盤面を1行にして
2523625752622334
と表す
すべてのあり得る盤面は
2523625752622334
2523625752622331
2523625752622314
2523625752622311
～
1111111111111111
だけどこれをどうSQL文の中で
表現すればいいのかわからん
492:デフォルトの名無しさん
22/03/11 12:30:05.01 +z9vFN5I.net
>>491
>>486の記事を１から読んでこい
493:デフォルトの名無しさん
22/05/01 00:28:53.70 uZ+uV6s8.net
VBAのコード内の文字を置換するプログラムをVBAで行うことはできるでしょうか？
置換の組合せが複数あるので一つずつCtrl+Hで操作すると間違いそうなので，
置換前文字列と置換後文字列の配列を書いて，それを順に実行するようにしたいのです．
自分のコード内に当該置換文字列をがでてくるので，その回避も考えないといけないですが
よろしくお願いします
494:デフォルトの名無しさん
22/05/01 07:29:11 1HGTgNe1.net
>>493
できるよ
495:デフォルトの名無しさん
22/05/01 07:36:23 1HGTgNe1.net
ごめん、AccessVBAスレだった
知らん
496:デフォルトの名無しさん
22/05/01 16:14:10 4P2yloMu.net
ACCESSにもApplication.VBEがあるっぽいから、エクセルとかと同じようにできるんじゃね
そもそもコード内をそうそう置換するって状況がよくわからんがな
497:デフォルトの名無しさん
22/05/01 20:13:11.92 uZ+uV6s8.net
>>496
オブジェクト名を修正すると，名前の自動修正機能で，オブジェクト間の整合性は保たれます．
例えば，Aクエリー内でBテーブルを使用していて，Bの名前をCに変更するとA内のBテーブル名もCに自動的に修正されます．
ところが，コード内でオブジェクト名を引数に使用している場合（DoCmd.OpenQuery()やQeryDef()など）は，自動的に修正されないので
コード内の文字置換で修正するしかありません．
オブジェクト名をより統一的にしたいとか，あるルールで短くしたいなどの事情です．
でも本当にコードを使ってコード内の文字置換できますか？
「エクセルとかと同じようにできる」とのことですが，エクセルのVBAでできる方法を知りません．
498:デフォルトの名無しさん
22/05/01 20:33:27.28 XyObubkl.net
>>496がApplication.VBEってヒント出してくれてるのに自分で調べる気は無いの？
499:デフォルトの名無しさん
22/05/01 20:51:07.35 uZ+uV6s8.net
>>498
いままでApplication.VBEとVBAの違いをしりませんでした．
Application.VBEで検索して，オブジェクトであることをしりました．
できそうな気がしてきました．
調べます
500:デフォルトの名無しさん
22/05/01 21:27:48.04 q0kLnjNb.net
>>499
お前みたいな馬鹿は、方法自体間違えていると思うよ
501:デフォルトの名無しさん
22/05/01 22:36:20.05 uZ+uV6s8.net
>>500
正しい方法言ってみな。
言えなきゃ超バカ決定。
502:デフォルトの名無しさん
22/05/01 23:10:31.48 q0kLnjNb.net
やっぱり馬鹿だったか
馬鹿に馬鹿と指摘すると怒りだす
503:デフォルトの名無しさん
22/05/03 18:13:45.75 hABwtxOZ.net
>>496，>>498
497ですが、
Application.VBE.ActiveVBProject.VBComponents(i).codemodule.ReplaceLine(j,"修正後コード文字列")
を使ってできました。
504:デフォルトの名無しさん
22/05/03 21:57:49.43 uVFGqhpy.net
>>503
ありがとう。勉強になります。
505:デフォルトの名無しさん
22/05/03 23:56:04.39 9Zz7qGMa.net
コードとデータは分離しなさーい！
506:デフォルトの名無しさん
22/05/04 01:12:27 L2QcoKdh.net
>>505
オブジェクト名はデータにできない
507:デフォルトの名無しさん
22/05/04 01:29:47 T57Ht3+D.net
名前は文字列だろ！
VBAの提供するオブジェクトは大抵コレクションで管理されているだろ！
お前の作ったオブジェクトも管理できるようにしろ！
初歩だぞ初歩！
508:デフォルトの名無しさん
22/05/04 01:39:45.29 L2QcoKdh.net
つまらん
もういいよ
509:デフォルトの名無しさん
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はクリエイトオブジェクトで作ったエクセルオブジェクトね
あと変数は適当に定義しておいてね。