[過去ﾛｸﾞ] Access VBA 質問スレ Part1 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
592(1): 2016/02/24(水)23:35 ID:UmTzYcDx(1) AAS
日常的にAccessのピボットテーブルをCtrl+A Ctrl+Cして
Excelに貼り付けてるんですが
これをVBAできませんでしょうか
593(1): 2016/02/25(木)10:52 ID:xnX4JkuY(1) AAS
できますん
594: 2016/02/25(木)13:16 ID:W1s9bb7v(1) AAS
>>592
Googleスプレッドシートは簡単に関数でソレが実現できます。
ちなみに、Accessでは「貼り付ける」行為は出来なくはないです。ただ、オートメーションでやる
ならそういうことになりますが、普通はExcel上でピボットを作成スべきでしょう。
595: 2016/02/25(木)22:25 ID:DG6YFXpT(1) AAS
>>593
もうすこしヒントを
どのオブジェクトプロパティをいじればいいとか
596: 2016/02/26(金)15:13 ID:VQGl6zaq(1) AAS
VBAで
597: 2016/02/26(金)18:31 ID:A3HYqZte(1) AAS
全選択なら単にエクセルにエクスポートすればいいんじゃないの？
598: 2016/03/04(金)22:35 ID:KUnf3VuC(1) AAS
質問 Access2010
突然、フォームのデータシートビューで列を入れ替えてもその状態が保存されないようになってしまいました。
いろいろと原因を調べてみるとOpenやLoadイベントでフィルター設定を行うとそんなトラブルが起こってしまうようなのです。
Private Sub Form_Open(Cancel As Integer)
Me.Filter = "ID>3" '例
Me.FilterOn = True
End Sub
省3
599: 2016/03/24(木)22:15 ID:aSgI1iJJ(1/2) AAS
access 2010
windows7
DoCmd.OutputTo acReport,
600: 2016/03/24(木)22:16 ID:aSgI1iJJ(2/2) AAS
access 2010
windows7
DoCmd.OutputTo acReport, "hoge_table", acFormatXLS, "C:\hoge.xls"
レポートファイルをxlsへ出力するときに
「実行時エラー 2587 出力が完了できません」が
出てきてしまいます。
実行時エラー2587を検索しても情報が出てこない為、
省4
601: 2016/03/25(金)13:31 ID:ctOehyRA(1) AAS
プリンタが変わった レポートの書式が変わった(文字コード系)
再インストールで復帰した というようなresが 英語のフォーラムだけど
手動でエクスポートした場合も同じエラーかどうか
ん？レポートファイルをxlsへ？ "hoge_table" テーブルをxlsへの間違い？
テーブルをｃｓｖ出力してｘｌｓなら？ とかいろいろ
602: 2016/03/25(金)16:30 ID:e4gujGfG(1) AAS
データが増えてリソース不足、ってのが一番考えられる理由だけど
何のリソースかはわからんが
もうちょっと詳細なエラー内容ないのかね
603: 2016/03/25(金)21:03 ID:WqFryHCY(1) AAS
今、先月のhoge_tableをoutoputしたらどうなの
604(1): 2016/04/27(水)21:09 ID:KUAYo6wN(1) AAS
フォーム上でリストボックスを選択すると、その他のテキストボックスに値が入る仕組みってどうやったらできますか？
605(1): 2016/04/27(水)23:03 ID:Sazji9Gw(1) AAS
Me.[その他のテキストボックス] = Me.[リストボックス].Value とか
Me.[その他のテキストボックス] = Me.[リストボックス].Column(n) とかを
リストボックス クリック時イベントに仕込む うろ覚え
606: 2016/04/28(木)01:08 ID:ybePhPhs(1) AAS
>>605
後者の場合で、表示させたデータを別のテーブルに保存させるにはどうすればいいですか？
607: 2016/04/28(木)09:47 ID:wel45o+X(1) AAS
ワークテーブルに入れるなりしてSQLとか追加クエリとか
608: 2016/04/28(木)17:15 ID:iPy/jEF0(1) AAS
>>604
リストボックスのコントロールソースをテキストボックスのコントロールソースにも指定
もしくは
テキストボックスのコントロールソースにリストボックス自身を指定
リストボックスのみ編集可設定
609: 2016/07/12(火)06:40 ID:o2wIdsaQ(1/2) AAS
ExcelのシートからADOでデータ取り込みをやろうとしてます
ルックアップで別のテーブルを参照しているフィールドを持つテーブルにレコードを追加したいのですが
具体的にはExcelシートには都道府県名が文字列で入っていて
Accessのテーブルは都道府県名は別テーブルを参照して数値で持っています
色々試してみたのですが 追加先テーブルの数値型のフィールドには数値しか入力できず
参照している先のテーブルの"東京都"などの文字列データはUpdateでエラーが出ます
（あたりまえでしょうけど）
省1
610(1): 2016/07/12(火)16:15 ID:/KovKhYj(1) AAS
別テーブルを参照して数値を入れる
611: 2016/07/12(火)19:00 ID:o2wIdsaQ(2/2) AAS
>>610
やっぱり それしか無いですかね
何万行もあったから データ入力する度に別テーブルのFindFirstとかやってID見つけるの
コスト凄いかと思ってたんですが
やってみたら それほど時間かからなかったです
612: 2016/07/12(火)21:49 ID:hENPvfBC(1) AAS
都道府県名が入ってるシートって郵便番号のあれですかね
まぁ質問の意味がよくわかんないから無視して結構です
613: 2016/08/24(水)19:34 ID:3q4Jyrt7(1/2) AAS
SQLでテキストデータを取り込む時、ヘッダー行を任意の位置で指定する事は出来ますか？
読み込もうとしているcsvファイルのヘッダー行が3行目なので、この位置から読み込ませたいのです。
色々調べたんですが、外部データベースを取り込む際のキーワードがなかなか出てこず苦戦しています。
614(1): 2016/08/24(水)21:33 ID:XY92uhDq(1) AAS
開始行を含めるか含めないかしかなかった様に思う。
取り込んでしまってからヘッダー行を消すSQL実行したらはやいかも。
615: 2016/08/24(水)22:13 ID:3q4Jyrt7(2/2) AAS
>>614
ありがとうございます。
HDR=Noか、もしくはVBAで処理する様にします。
616: 2016/09/29(木)17:49 ID:Z3hVyFqu(1/3) AAS
SQLで質問ですが、
select * from DATATBL group by NAME
こんな感じで集計させても結果が０になってしまうのですが、書式間違ってますか？
ちなみにC++BuilderからMicrosoft.Jet.OLEDB.4.0でmdbファイル操作してます。
617(2): 2016/09/29(木)18:41 ID:2yQBgN/R(1) AAS
select NAME, COUNT(*) from DATATBL group by NAME
618: 2016/09/29(木)18:55 ID:Z3hVyFqu(2/3) AAS
>>617
返答ありがとうございます。
しかしながら selectでNAMEのみを指定すると項目が足らんみたいなエラーが出てしまいます。
select *, COUNT(*) from DATATBL group by NAME
こうするとエラーは出ませんが、結果はやはり０になってしまいます
619: 2016/09/29(木)19:18 ID:Z3hVyFqu(3/3) AAS
>>617
すみません、他の箇所でエラーが出ていました。
正常にselectする事ができました。ありがとうございました。
620: 2016/09/30(金)11:38 ID:tD6+ktpC(1/2) AAS
またSQLで質問ですが、
DATEでソートしてからNAMEをグループ化したいので
select NAME from (select * from TESTTABLE order by DATE) as group by NAME
上記のようにしたのですが結果が０になってしまいます。
何処が間違ってますか？
621: 2016/09/30(金)11:43 ID:tD6+ktpC(2/2) AAS
あ、as取ったらいけました
622: 2016/09/30(金)13:45 ID:VqVPXDNJ(1) AAS
GROUP BY 後の順序は保証されてなかったと思う
確実にやるならグループ化してからソート
623: 2016/09/30(金)13:59 ID:4mQfWuIk(1) AAS
いいかげんスレチ
624: 2016/10/01(土)18:16 ID:94YBKalt(1/2) AAS
すみませんが教えて下さい。
Access2010でフォームにWebブラウザコントロールを張り、
Me![ScrollInfo].Navigate
625: 2016/10/01(土)18:24 ID:94YBKalt(2/2) AAS
すみませんが教えて下さい。
Access2010でフォームにWebブラウザコントロールを張り、
Me![ScrollInfo].Navigate で正常にページが表示されています。
そのフォームを右クリックでデザインビューに切り替えると以下のエラーが出来ます。
StatusTextChange でエラーが発生しました（以下略）
ちなみに×ボタンで普通に閉じるとこのエラーは発生しません。
Access2016でも同様でした。
省1
626: 2016/11/10(木)12:17 ID:MJMdCBmm(1/2) AAS
sendobjectでレポートをPDFで添付して送ろうとすると
添付されたファイル名が・.pdfになるのは仕様ですかね？
ACCESSとOutlookは2013です
ただAccessのファイルはmdb形式
627: 2016/11/10(木)12:51 ID:dxAJlx69(1/3) AAS
どうしたいの？
628: 2016/11/10(木)13:28 ID:MJMdCBmm(2/2) AAS
添付ファイルが"元となったレポート名".pdfになるのかと思っていたのだけど、違うのかなという疑問
629: 2016/11/10(木)13:29 ID:dxAJlx69(2/3) AAS
それで通じるとかマジで思ってる？
630(1): 2016/11/10(木)14:01 ID:lT3NS9hL(1/2) AAS
通じないか…すまん
Docmd.Sendobjectを使ってレポートをPDFに変換してメール送信したい
実行はできているが、変換されてメールに添付されたファイル名が・.pdfになってしまう。
これがなぜ・になるか知りたい。
レポートのオブジェクト名は・ではない。
日本語名がNGなのか？
631: 2016/11/10(木)14:37 ID:dxAJlx69(3/3) AAS
そう思うなら ASCII のファイル名とか UTF-8 のファイル名試してみれば？
632: 2016/11/10(木)14:38 ID:uCLe8e7d(1) AAS
>>630
MIMEでiso-2022-jpとかにしてみ
633: 2016/11/10(木)20:01 ID:lT3NS9hL(2/2) AAS
レポートの表題がファイル名になることがわかった。
レスくれた方ありがとう。
634(2): 2016/12/28(水)11:38 ID:qa9jiDer(1) AAS
?Eval("'山ー田' Like '*山田*'")
-1
何で？
Win7x64+Acs2010
635: 2016/12/28(水)12:22 ID:JT952dSj(1) AAS
>>634
そりゃ真ん中に入ってるからだと思うが。
636: 2017/01/01(日)18:08 ID:T039qKRQ(1) AAS
-1はTrueだから一致することについて疑問に思ってるのでは
637: 2017/01/01(日)20:32 ID:F1PmU62+(1/2) AAS
>>634
Evalの引数が単なる文字列として認識されてるからかも
?Eval("山ー田" Like "*山田*")
だと期待する結果になる
638: 2017/01/01(日)20:35 ID:F1PmU62+(2/2) AAS
すまん環境書き忘れた
Win10 x64, Access2016 32bit
639: 2017/01/01(日)22:05 ID:5bQycJKK(1) AAS
文字判定だから、アクセント無視で長音記号が無視されてるだけだと思ったけど
?Eval("'山xー田' Like '*山田*'")
も-1だな
?Eval("'山ーx田' Like '*山田*'")
は0だった
長音記号無視するルールになんかあるのかもしれん
640: 2017/01/02(月)21:00 ID:Qo2R7jJK(1) AAS
クエリでもヒットしちゃうな。
641(1): 2017/01/04(水)15:01 ID:rtXdgiQY(1) AAS
利用環境
access2010
Windows7
上記環境で同時接続400人程度のファイルを作成しようとしています
管理者2〜3人が100〜1000件程度のレコードを編集しながら
400人程度が編集したレコードを参照。参照後に自動で既読フラグを
access内のテーブルに入力する仕組みです
省11
642(2): 2017/01/04(水)15:08 ID:XZra0ySO(1) AAS
全員が同じaccess開くならやめとけ
>400人の既読情報を40個のテーブルに分割して
>リンクテーブルで負荷を分散させれば実用範囲になるのでしょうか？
そこまで分けなくても
テーブル専用mdbと参照専用mdbに分けて
参照専用mdbを400人全員ローカルに置く
参照専用mdbからテーブル専用mdbにリンクするだけでいいんじゃね
643(2): 2017/01/04(水)15:25 ID:JR/sdM0U(1/3) AAS
>>641
そこまで社内セキュリティにうるさい会社で勝手にやっていい範囲のシステムだとも思えんけど
>Windows7
この時点で、ライセンス違反の可能性が非常に高い
おそらく同時接続制限もかかる
フロントエンドはアクセスでもいいけど、どう考えてもバックエンドにまともなDB入れるべき
てか利用者４００人のシステムで「同時」書き込み１００とかなかなか行かないけどな
省2
644: 2017/01/04(水)15:58 ID:TNTuXRka(1) AAS
>>642
返信ありがとうございます
「400人全員のローカルに参照専用ファイルを保存する」
ということが社内環境上、難しいです
また、参照専用ファイルを修正して差し替える場合に
大変な労力がかかる可能性があるので、可能であれば
参照専用mdbを、共有サーバに配置して
省16
645(1): 2017/01/04(水)16:06 ID:kAiTvQKX(1) AAS
未読とか既読フラグは400人全員が個別に持つんだろ？
だったら400人分mdb持った方が多い日も安心
646: 2017/01/04(水)16:53 ID:JR/sdM0U(2/3) AAS
>>645
利用者各々が自分の既読が分かれば良いだけならそれで良いけど
管理者が誰が未読か知りたいとか既読者の一覧出せとかいう要件があると
結局既読フラグは集中管理する方が楽
まあどっちにしてもプログラム用のMDBは各ユーザに配るべきだが
647: 2017/01/04(水)16:58 ID:ZppiaYb0(1) AAS
accessでやる案件じゃないな
648(1): 2017/01/04(水)17:01 ID:JR/sdM0U(3/3) AAS
>400人で参照専用mdbを開くということは無謀でしょうか？
アクセスのDBは基本的にはファイル共有で動作してる
共有サーバどうする気か知らんが、その共有サーバで実際に４００人でファイル同時オープンしてみ
それで問題なさそうなら真剣にmdb共有検討してみても良いかもしれん
649(1): 2017/01/04(水)17:29 ID:geFs4Pus(1) AAS
>>648
仰る通り、管理者用に作成しようとしているツールです
ゆくゆくはアンケートを取るようにして、
400人のユーザの傾向分析などに使おうと思っています
> アクセスのDBは基本的にはファイル共有で動作してる
ファイル共有で動作している事で、同時に複数人で
mdbを開くと負荷が大きくなるということでしょうか？
省2
650: 2017/01/04(水)23:07 ID:Hrm6AnDP(1) AAS
社内セキュリティで制約厳しいのに 仕事中に2chで相談 阿呆らし アホじゃ無いよ、阿呆だよ
651: 2017/01/04(水)23:09 ID:J+uePkPh(1) AAS
釣りには反応しないことにしている
652(1): 2017/01/05(木)04:36 ID:n6wSBZKS(1) AAS
>>649
mdbですよね?
データ量にもよりますが同時セッションでせいぜい数人です
同時でないにせよ400人はAccessの要件じゃないです
ほぼ確実にmdb壊れますよ
653(1): 2017/01/05(木)13:00 ID:UOU5yV0Y(1/3) AAS
>>652
ありがとうございます
同時にたくさんのユーザで開くことが現実的でないのであれば
下記方法を検討してみようと思います。
・共有サーバーに起動用mdbを1個。参照用mdbを40個。テーブル専用mdbを7個設置。
・全ユーザーは起動用mdbからIDによって振り分けられた参照用mdbに移動。
(400人に対して参照用mdb40個なので、
省4
654(1): 2017/01/05(木)13:07 ID:2uA+A+xC(1/2) AAS
人の話を聞かないひとだな
655: 2017/01/05(木)13:50 ID:L/jinxrk(1) AAS
ヴァージョン管理は何が良いのかな？
実際に使っている人いますか？
656: 2017/01/05(木)13:58 ID:UOU5yV0Y(2/3) AAS
>>654
人の話を聞いていないように見えたのであれば謝罪します
申し訳ありません
Accessで扱うには難しい案件だという事は分かりました
その難しい環境下で、どうやったら実現出来るかが知りたいです
657(1): 2017/01/05(木)14:34 ID:2uA+A+xC(2/2) AAS
>Accessで扱うには難しい案件だという事は分かりました
論点はそこじゃないよ
658: 2017/01/05(木)14:57 ID:YjTG1plI(1) AAS
しらんがな
659: 2017/01/05(木)15:21 ID:UOU5yV0Y(3/3) AAS
>>657
「人の話を聞かないひとだな」「論点はそこじゃないよ」
論点はどこですか？
660: 2017/01/05(木)16:44 ID:1cxa7M6H(1) AAS
>>653
色々アイデアを出されておりますが400人が接続する先は「テーブル専用mdb」ですから
仮に動作したとしてもクエリ1つ投げて戻ってくるのに数十秒かかる、という事態も想定されますよ
どうしてもAccessで開発するのであれば
バックエンドをSQL Serverなどにして「参照用mdb」を各クライアントに配布する形になります
661: 2017/01/05(木)19:41 ID:V7dbykQV(1) AAS
ファイルベースだとmdb以前に共有サーバの同時接続数も見積もらないといけないのでは
662(1): 2017/01/05(木)23:23 ID:quCbp6zV(1) AAS
阿呆通り越して馬鹿か いかれてる
到底400人を超える社員を擁する企業の案件とも思えず（担当がこのレベルなんだし）
じゃあ何だ？ゲームのなんちゃら？とも思えず、僕ちゃんAccessなら少しはお上手だから
それで400人のお年寄りを騙す仕組みを思い付いたから構成教えて！なのか
なんなんだ？こいつ ひつこいし
663: 2017/01/06(金)08:55 ID:977IrQIJ(1) AAS
>>662
まずは日本語勉強しようね
664(1): 2017/01/08(日)10:59 ID:tUVpbJjX(1/2) AAS
そもそも誰もWin7の同時接続数制限とか突っ込まない件
652除く
665: 2017/01/08(日)12:33 ID:0mVP2hZ6(1) AAS
政治には興味ないですし
666(1): 2017/01/08(日)16:28 ID:7mm8hykc(1) AAS
>>664
>>643で突っ込まれてるけど？
667: 2017/01/08(日)23:15 ID:tUVpbJjX(2/2) AAS
>>666
ライセンス違反じゃなくて、もともとできんのだよ。動的パッチでも当てないと。またレジストリをいじらないと実際にはその前に限界が来る。
わからないくせに出しゃばるなよ。
668: 2017/02/16(木)10:45 ID:aBJd2B4P(1) AAS
Accessから参照設定なしでExcelを起動し、種々作業を行うPGを作ってます。
その際、Excelの自作関数（Function）が使えんのですが、
良い方法がありましたらご教示お願いします。
669: 2017/02/16(木)11:30 ID:KUjZVbQE(1) AAS
追記です。
自作関数（Function）は、=SUMのように
Excelシート上で使う関数です。
670: 2017/02/16(木)12:08 ID:1VBkG9E6(1/2) AAS
参照しろ
671(1): 2017/02/16(木)12:33 ID:l4cugFFN(1) AAS
回答ありがとうございます。
いちおう参照設定してのテストも行ってますが、結果は同じでした。
なので困ってます。(；ω；)
ちなみに参照設定しないのは、AccessでExcelを扱う際にやっかいとなる、
残プロセスを残さないためです。
672: 2017/02/16(木)13:29 ID:1VBkG9E6(2/2) AAS
じゃあ再定義しろ
中身はformulaでとって来れるだろ
上下前次1-新書関写板覧索設栞歴
あと 330 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.025s