Access VBA 質問スレ Part1

1 名前：デフォルトの名無しさん mailto:sage [2012/02/06(月) 22:53:46.88 .net] AccessのVBAに関する質問スレです ★1 質問テンプレ(雛形)は用意しませんが､OSとAccessのバージョンは必ず書きましょう。 ★2 AccessのVBA以外の部分に関する質問はNGです。 　　　但し､VBA無しでも出来ることだが､あえてVBAでやりたいって物に関してはOK。 ★3 AccessのVBE(Visual Basic Editor)を使うとしても､VBAの分野以外に関してはスレ違いです。 　VBAとは､『Visual Basic for Application』の略で 　　Application 　　├Workbooks 　　｜└Workbook 　　｜　 ├Worksheets 　　｜　 ｜└Worksheet 　というApplication以下のオブジェクトを､VB言語で操作するものを指します。 　例えExcel付属のVBE(Visual Basic Editor)を利用しようとも､このApplication以下のブックやシート､ 　セルやオブジェクト等を操作するもの以外はVBA分野の話ではないので､ここでは聞かないでください。 ★4 レベルはどうあれ､ここはプログラマ用の板スレです。プログラマとは､自分でプログラムを組み、 　　　コードを書く人の事なので､自分でやるきは全く無く､丸投げしようって人はお断りです。 　　　ヒントを貰えばあとは自力でなんとかしますって人のみどうぞ。 ★5 わからなければとりあえず「マクロの記録」（Alt, T, M, R） 関連スレ Excel VBA 質問スレ Part23 toro.2ch.net/test/read.cgi/tech/1327763113/l50 548 名前：必ず開放する。VBAユーザはなぜか使いっぱなしが多い。 [] [ここ壊れてます] 549 名前：デフォルトの名無しさん mailto:sage [2015/11/14(土) 08:28:36.61 ID:f21e1kim.net] .NETなんかだとマネージドは書いてもほぼ意味なかったりで使いっ放し推奨 550 名前：524 mailto:sage [2015/11/14(土) 10:27:44.88 ID:c/SicAL6.net] >>525、527 Dim objFileSys As Object Set objFileSys = CreateObject("Scripting.FileSystemObject") objFileSys.CopyFile 元ファイル, コピー先フォルダ & "\" Set objFileSys = Nothing copyfileの部分だけをかいつまんで書くとこんな感じだけど、解放の仕方を教えてくれないか。 リムーバブルディスクにコピーしたファイルは開けるし削除もできるからロックされた感じじゃないんだよね。 安全なハードウェアの取り外しだけがうまくいかないんだよ。 551 名前：デフォルトの名無しさん mailto:sage [2015/11/14(土) 11:01:39.40 ID:ajpWryyv.net] getdriveとか適当なのを実行してみたら？ カレントが移動するかも。 552 名前：524 mailto:sage [2015/11/14(土) 12:52:04.15 ID:c/SicAL6.net] >>526、530 ありがとう。この方法で解決した。 ChDrive "c"　って1行追加しただけでOKでした。言われないと気付かなかったから助かりました。 他のみなさんもありがとう。 553 名前：デフォルトの名無しさん mailto:sage [2015/12/06(日) 22:14:00.95 ID:ZiGqGoDJ.net] 重複した文言の多いcsvファイルの情報を読み込む時に、重複しない文言を蓄えたテーブルと、 文言テーブルのIDだけを入力したテーブルに分けて管理する事で容量を節約しようと思ってるんですが、 人が読める様にIDから元の文言を復元したテーブルを作りたいと思った時、 VBAで文言一つ一つ代入したテーブルを新たに作るしかないですかね？ 554 名前：デフォルトの名無しさん mailto:sage [2015/12/07(月) 01:08:03.51 ID:D3MoacxB.net] IDでテーブル結合したview作るなりクエリにすりゃいいんじゃないの どちらにしろVBAとか関係ないと思う 555 名前：デフォルトの名無しさん mailto:sage [2015/12/10(木) 11:46:09.31 ID:V//Y2NlP.net] 質問です Access2007ファイルのショートカットをデスクトップに作ろうと思って https://www.moug.net/tech/acvba/0020025.html ここを参考にパスとかだけ変えて作ったんだけど、ショートカットが作成されません 解決策教えてください 556 名前：デフォルトの名無しさん mailto:sage [2015/12/10(木) 12:16:08.88 ID:gg94mj0B.net] うちはできたよ 557 名前：534 mailto:sage [2015/12/11(金) 16:06:56.86 ID:UbN3V6OX.net] 出来ました。 558 名前：デフォルトの名無しさん mailto:sage [2016/01/04(月) 04:37:40.84 ID:KKPx2R3A.net] mdbファイルのテーブル構造をADO.NET SqlCommandで取り出す方法を知りたいです。（データ定義言語的な取り出し） DoCmd.TransferDatabase acExportでできるテーブル構造のコピーと同じことを，ADO.NETで，元データなしで実現（テーブル生成）したり プログラム側が想定するテーブル構造と一致するか確認する処理をテーブル生成→比較とすることで一般化したりしたいのですが 559 名前：デフォルトの名無しさん [2016/01/04(月) 18:57:08.11 ID:uh/Y4MEw.net] ADODBEX 560 名前：デフォルトの名無しさん mailto:sage [2016/01/09(土) 22:01:59.03 ID:ytxGXkKI.net] Accessでプロマネの仕事頼まれたけど断ったわ もうVisualStudioが無いと何もできない体になってしまった 561 名前：デフォルトの名無しさん mailto:sage [2016/01/10(日) 01:26:39.26 ID:0BvJ+8Ai.net] プロマネの仕事は開発じゃない、とつっこみ 562 名前：デフォルトの名無しさん mailto:sage [2016/01/11(月) 08:38:46.37 ID:grtS6L7L.net] >>540 そういういかにも日本的で世界で通用しない回答は誰も期待していないし、 君みたいな奴は誰も求めていない。 563 名前：デフォルトの名無しさん mailto:sage [2016/01/11(月) 17:35:29.30 ID:ErJJ4Q3v.net] >>541 君には悲しいかもしれないけど、ここ日本なのよね 564 名前：デフォルトの名無しさん mailto:sage [2016/01/14(木) 21:12:26.51 ID:RI ] [ここ壊れてます] 565 名前：YdCmvc.net mailto: テーブルにインポートするとたまに失敗する変なゴミデータが入ったエクセルファイルをVBAでテーブルに登録しようとしてます。1レコード100フィールドほどあるもので、addnewで登録すると100件で20秒ほど掛かってしまいます。 Insertでも23秒でした。 全部で10万件あるのですが、高速登録する方法ないでしょうか？ [] [ここ壊れてます] 566 名前：デフォルトの名無しさん mailto:sage [2016/01/14(木) 22:01:16.12 ID:fK8eMzuy.net] >>543 配列で受けると速くなるかもしれない dim ary as variant ary = Range("A1").CurrentRegion.value ' 1オリジンの2次元配列 567 名前：デフォルトの名無しさん mailto:sage [2016/01/14(木) 22:04:06.66 ID:fK8eMzuy.net] ゴミは数式やエラー値が混ざってるんだろうから配列にした段階で適当に変換する dim row, col for row = lbound(ary(), 1) to ubound(ary(), 1) for col= lbound(ary(), 2) to ubound(ary(), 2) if ゴミ？(ary(row, col)) then ary(row, col) = ゴミ処理(ary(row, col)) next next この後でテーブル登録する 568 名前：デフォルトの名無しさん mailto:sage [2016/01/14(木) 23:52:25.44 ID:SY7xxp+v.net] >>543 パフォーマンス重視ならレコードセットやExcelオブジェクトは扱わない方が良いですよ 1.インポート定義でインポート 2.リンクテーブルを作って追加クエリ 3.SQL の IN 句使って INSERT 4.OLE DB の Jet か ACE で接続して INSERT などなど... ゴミが混ざるならゴミを許容する作業テーブルにインポートしてから後始末をするとか 処理の仕方も色々あると思います、頑張ってください 569 名前：デフォルトの名無しさん mailto:sage [2016/01/14(木) 23:55:58.95 ID:SY7xxp+v.net] 書き忘れ インポート定義は文字列切り詰めなどが起きるかもしれないので 使うなら想定しておいた方が良いです 570 名前：デフォルトの名無しさん mailto:sage [2016/01/15(金) 00:07:44.49 ID:obwNql4P.net] レコード長とかPCのスペックとかもわからんが コードでもっと早くできる余地がいっぱいある気がするぞ というか、純粋な追加で時間かかってるのか？ エラーチェックに時間かかってるんじゃないのか 571 名前：デフォルトの名無しさん mailto:sage [2016/01/17(日) 14:16:21.53 ID:A2o/pomn.net] access2013の質問がしたいのですがここでは不可でしょうか？探してもスレが見つからなかったので誘導していただけないでしょうか？ 572 名前：デフォルトの名無しさん [2016/01/17(日) 18:47:14.28 ID:wzxdIUIG.net] 聞くがよい 573 名前：デフォルトの名無しさん mailto:sage [2016/01/18(月) 17:00:22.89 ID:cbTDZ81K.net] Access総合相談所 27 peace.2ch.net/test/read.cgi/bsoft/1424828244/ 574 名前：デフォルトの名無しさん mailto:sage [2016/01/20(水) 21:12:14.20 ID:b2HKKJl2.net] access 2013での質問です。 テーブルAの構成要素は【id(オートナンバー）、写真（添付ファイルで複数値を持つフィールド）】となっております。 この状態で、テーブルAの任意のIDに写真が入っているか否かを確認したいと考えております。 今のところ dim RS As DAO.Recordset2 set RS = CurrentDb.OpenRecordset( 575 名前：デフォルトの名無しさん mailto:sage [2016/01/20(水) 21:13:28.67 ID:b2HKKJl2.net] すみません、途切れました set RS = CurrentDb.OpenRecordset("テーブルA") With RS .FindFirst "id = ○" End With で任意のIDに移動できるのですが、そこから写真フィールドにデータが入っているか否かをどのように確認したら良いかが分かりません。 一応複数値を持つフィールドということから Dim RS_写真 As DAO.Recordset2 Set RS_写真 = RS.Fields("写真").Value と代入し、 If RS_写真.Fields("FileName") = "" Then 　MsgBox "hoge" End If というように、if分を使ってみたのですが、上手く行きません。 お忙しいところ恐縮ですが、アドバイスを戴けると幸いです。 576 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 00:33:33.20 ID:eWUPCZWU.net] 添付ファイルで複数値を持つフィールド ってのがよく� 577 名前：�からん そのフィールドのデータ型と 実際に内容をセットしてるコード出してみ [] [ここ壊れてます] 578 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 07:45:42.44 ID:7TL6zMKQ.net] >>554 お返事ありがとうございます。 TABLEAのフィールド"写真"にデータをセットするのはフォーム上で行っております。 MsgBox TypeName(.Fields("写真"))　で確認をしてみたところ、 Field2 オブジェクト (DAO) ttps://msdn.microsoft.com/ja-jp/library/office/ff194326.aspx と返ってきました。 これで伝わりますでしょうか？ 579 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 12:58:17.49 ID:zpe1QHZ3.net] 伝わったが答える気にはならなかった 580 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 13:50:34.34 ID:tpiDrCnM.net] テーブルAのあるレコードでは【写真】に外部からデータが入っていて，違うレコードでは入っていないから，それを確認したいということ？ RS_写真のeofとbofを調べれば良いだけだと思う． ttps://msdn.microsoft.com/ja-jp/library/office/ff194326.aspx ここにサンプルが有るから頑張って 581 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 15:33:43.41 ID:zpe1QHZ3.net] これはひどい 582 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 18:39:11.58 ID:eWUPCZWU.net] >>555 そのテーブルをデザインビューで開いたときに、そのフィールのデータ型は何になってる？ フォームでセットとは具体的にどうやってるんだ？ 583 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 19:53:25.15 ID:dhgW0ru6.net] 添付ファイル型っていうのがあってだな云々・・・ 584 名前：デフォルトの名無しさん [2016/01/21(木) 20:32:40.23 ID:xJzWoKjV.net] > If RS_写真.Fields("FileName") = "" Then FileData? データが入ってたらFileNameとは何を指すのだ 585 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 20:50:12.31 ID:dhgW0ru6.net] フィールドに複数データが入るんだけど、ファイル名とファイル本体がセットになって入るイメージなんじゃないかな。 >>553 は配列のような捉え方で書いてるんだと思う。 フィールドがnullなのかを見ればいいんだろうけど、ファイル名を指定してそのファイル本体の有無を見たいのかな。 でもそれだとファイル名のみがあってファイル本体がないってことがあり得ることが前提になると思うんだけど。 586 名前：デフォルトの名無しさん mailto:sage [2016/01/21(木) 21:21:29.71 ID:eWUPCZWU.net] 添付ファイル型なら RS_写真のEOFと(MoveLastしてから)RecordCountみれば、添付されてるファイルの件数はわかる 587 名前：553 mailto:sage [2016/01/22(金) 16:35:45.14 ID:FxZxO26V.net] 皆様、お返事ありがとうございます。 当該フィールドは「添付ファイル」型です。 「添付ファイル」型の写真フィールドは、下位フィールド？として写真.FileData / 写真.FileName /　写真.FileTypeを持っているため、写真.FileNameの有無でNULLか否かを確認しようとしていました。 >>557 さんと >>563 さんのお陰でNULLか否かはRS_写真のEOFを見れば良いだけと気づき、 何とかやりたい操作ができそうです。 この度はご指摘戴き、誠にありがとうございました。 588 名前：デフォルトの名無しさん mailto:sage [2016/01/27(水) 16:39:25.69 ID:He5RGQG2c] Access2010のVBAの動作にて質問です。 現在クエリのデータをCSV形式にて出力をするために DoCmd.TransferText acExportDelim, ,"クエリ名","出力先\ファイル名.csv" と言う文を使っているのですが、クエリの行が複数の場合は1行ごとに出力をしたいのですがどうすればよろしいのでしょうか。 589 名前：デフォルトの名無しさん mailto:sage [2016/01/28(木) 08:27:25.34 ID:cOsSJrMS.net] Access2010のVBAの動作にて質問です。 現在クエリのデータをCSV形式にて出力をするために DoCmd.TransferText acExportDelim, , 590 名前：デフォルトの名無しさん mailto:sage [2016/01/28(木) 09:02:23.84 ID:cOsSJrMS.net] 途中で切れてしまったので再度質問させていただきます。 Access2010のVBAの動作にて質問です。 現在クエリのデータをCSV形式にて出力をするために DoCmd.TransferText acExportDelim, ,"クエリ名","出力先\ファイル名.csv" と言う文を使っているのですが、クエリの行が複数の場合は1行ごとに出力をしたいのですがどうすればよろしいのでしょうか。 591 名前：デフォルトの名無しさん mailto:sage [2016/01/28(木) 09:25:27.95 ID:xQdz3S4b.net] >>567 連続出力するなら レコードセット開いてレコード毎に書き出しループ 連続出力しないなら フォーム上の値を参照するパラメータクエリ作って DoCmd.TransferTextで書き出し 592 名前：デフォルトの名無しさん [2016/02/01(月) 21:40:46. ] [ここ壊れてます] 593 名前：53 ID:uqBwC27M.net mailto: ACCESS VBAでoracleのデータを読み書きする場合は リンクテーブルを作ってやるのが普通でしょうか? それともリンクせずに直接ORACLEにアクセスするのがよいでしょうか? [] [ここ壊れてます] 594 名前：デフォルトの名無しさん mailto:sage [2016/02/01(月) 22:12:10.32 ID:HIlaIvm8.net] べつにSQL ServerでもORACLEでも同じだとおもうけど ケースバイケースとしか言えん 595 名前：デフォルトの名無しさん mailto:sage [2016/02/02(火) 09:04:52.93 ID:nmsl1byO.net] リンク使わないなら別にAccessじゃなくても良いよね、って回答はダメ？ 596 名前：デフォルトの名無しさん [2016/02/02(火) 10:25:44.88 ID:OPpL3JBW.net] ハマってしまいました、cell とoffsetとloopの関係が解明できません。 エクセルデータから一行ずつhtmlファイルを作成するということをしたいです。 minitemplatorを使っています。 試しに３行でつくってみるとファイル名は変わるのですが、 set変数の箇所が一行目のままかわりません。 ↓こんなVBAにしてあります Private Const START_CELL = 597 名前：デフォルトの名無しさん [2016/02/02(火) 10:28:02.77 ID:OPpL3JBW.net] すみません Private Const START_CELL = "T3" Public Sub PushButton() ' Dim Cell As Range Dim Temp As MiniTemplator Set Temp = New MiniTemplator 'テンプレートファイルを読み込みます。 Temp.ReadTemplateFromFile ThisWorkbook.Path & "\h00_0.html" 'セルのスタート位置を設定します。 Set Cell = Range(START_CELL) '現在アクティブになっているシートの最終行まで以下を繰り返します。 Do While Cell.Row <= ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.Count).Row Temp.SetVariable "TITLE", Cell.Offset(0, 1).Value Temp.SetVariable "CHAPTER", Cell.Offset(0, 2).Value Temp.SetVariable "PREVCHAPTER", Cell.Offset(0, 3).Value Temp.SetVariable "PREVPAGE", Cell.Offset(0, 4).Value Temp.SetVariable "INDEX", Cell.Offset(0, 5).Value Temp.SetVariable "NEXTPAGE", Cell.Offset(0, 6).Value Temp.SetVariable "NEXTCHAPTER", Cell.Offset(0, 7).Value Temp.AddBlock "htmls" Temp.GenerateOutputToFile ThisWorkbook.Path & "\" & Cell & ".html" Set Cell = Cell.Offset(1, 0) Loop End Sub 598 名前：571 mailto:sage [2016/02/02(火) 10:30:04.88 ID:OPpL3JBW.net] 申し訳ない！accessの方に書き込んでしまいました、excelの方へ移動いたしますorz 599 名前：デフォルトの名無しさん mailto:sage [2016/02/02(火) 15:13:01.55 ID:ml14fhOB.net] >>571 メインのDBはSQLServerやACCDBだけど、特定のデータだけ 別DBのORACLEからとって来たいなんて要件だったりしたら ORACLEにリンクテーブル作るほどでは無かったりするかもしれんだろ 600 名前：デフォルトの名無しさん [2016/02/02(火) 15:27:20.80 ID:chGMw9p3.net] これはひどい 601 名前：デフォルトの名無しさん mailto:sage [2016/02/02(火) 17:32:28.26 ID:nmsl1byO.net] >>575 質問者の質問内容は>>569ですよ〜 602 名前：デフォルトの名無しさん mailto:sage [2016/02/02(火) 19:38:08.47 ID:ml14fhOB.net] >>577 何が言いたいのかわからん リンクテーブルかそれ以外でのアクセスかって質問に対して ACCCESSならリンクテーブル一択だろ、見たいな事を言うから そうじゃない状況もあるだろって言ってるんだが 603 名前：デフォルトの名無しさん mailto:sage [2016/02/02(火) 22:01:22.04 ID:nmsl1byO.net] >>578 質問者はOracleをAccessから操作する場合はどちらかを聞いている訳で その状況ならリンクで良いんじゃね、と答えただけ そこにお宅が勘違いして質問にないSQL Server絡めて否定してきたから ちゃんと質問内容見ろよ、と返しただけ 604 名前：デフォルトの名無しさん mailto:sage [2016/02/03(水) 16:11:02.04 ID:/VnwDmrp.net] 両成敗 605 名前：デフォルトの名無しさん mailto:sage [2016/02/04(木) 08:30:21.82 ID:aSn7db66.net] >>580 うるせぇよ、顔面男性器 606 名前：デフォルトの名無しさん mailto:sage [2016/02/04(木) 15:29:20.74 ID:oKzBZVFr.net] >>581 うん 607 名前：デフォルトの名無しさん mailto:sage [2016/02/07(日) 19:26:30.89 ID:PcQYM9su.net] Accessでエクセルファイル読もうと思ってExcelオブジェクトを作成した時、 既にエクセルを� 608 名前：ｧち上げているとマクロの挙動がおかしくなったり、 あるいは後からエクセルを立ち上げようとするとマクロが終了するまで画面が白いままなのですが、 これを避けてAccess側のみで扱えるエクセルオブジェクトを作ったり、あるいはエクセルと併用したりという事は出来ないでしょうか？ スプレッドシートのインポートは暗号化の影響で上手くいかないので、エクセルオブジェクトを通す必要があります。 [] [ここ壊れてます] 609 名前：デフォルトの名無しさん mailto:sage [2016/02/08(月) 15:38:17.85 ID:qbvivMLd.net] >>583 できるよ 610 名前：デフォルトの名無しさん mailto:sage [2016/02/08(月) 18:15:52.92 ID:V9YCd2yR.net] つか普通にやればそうなってたと思ったけど CreateObjectって、インスタンスあったらそれ掴んで返すのか？ 611 名前：デフォルトの名無しさん [2016/02/10(水) 00:18:50.90 ID:SmKUXNow.net] vbaでも知りたいのですが、accessで列見出しを行見出しにするには、どんなコードを書けばいいでしょうか？クロス集計ではできませんでした。 612 名前：デフォルトの名無しさん mailto:sage [2016/02/10(水) 09:07:48.34 ID:FkM1RfeE.net] >>586 行列入替えがしたいっての？それ、データベースのルールに反してる わけだが。 クロス集計クエリの場合にはデータ元がきちんとクロス集計できる形に なっていれば、できないということはない。 613 名前：デフォルトの名無しさん [2016/02/22(月) 10:46:47.09 ID:4/RFA0DI.net] 金はあるけど時間がない 経験値100倍くらいになる課金ないんか 614 名前：デフォルトの名無しさん mailto:sage [2016/02/22(月) 10:47:20.99 ID:4/RFA0DI.net] すまん 誤爆った 615 名前：デフォルトの名無しさん mailto:sage [2016/02/22(月) 12:20:31.39 ID:Y1bHL8fN.net] >>588 それな 616 名前：デフォルトの名無しさん mailto:sage [2016/02/22(月) 12:21:37.50 ID:GAqrdc9h.net] >>588 あえて、経験値にした辺りに謙虚さがあるな 俺だったら、最初からスキルボックス（中身はランダム）みたいな課金する。 617 名前：デフォルトの名無しさん mailto:sage [2016/02/22(月) 18:37:53.19 ID:QLpZ1xcH.net] うざ 618 名前：デフォルトの名無しさん [2016/02/24(水) 23:35:39.37 ID:UmTzYcDx.net] 日常的にAccessのピボットテーブルをCtrl+A　Ctrl+Cして Excelに貼り付けてるんですが これをVBAできませんでしょうか 619 名前：デフォルトの名無しさん mailto:sage [2016/02/25(木) 10:52:35.16 ID:xnX4JkuY.net] できますん 620 名前：デフォルトの名無しさん mailto:sage [2016/02/25(木) 13:16:09.91 ID:W1s9bb7v.net] >>593 Googleスプレッドシートは簡単に関数でソレが実現できます。 ちなみに、Accessでは「貼り付ける」行為は出来なくはないです。ただ、オートメーションでやる ならそういうことになりますが、普通はExcel上でピボットを作成スべきでしょう。 621 名前：デフォルトの名無しさん [2016/02/25(木) 22:25:15.86 ID:DG6YFXpT.net] >>594 もうすこしヒントを どのオブジェクトプロパティをいじればいいとか 622 名前：デフォルトの名無しさん mailto:sage [2016/02/26(金) 15:13:34.90 ID:VQGl6zaq.net] VBAで 623 名前：デフォルトの名無しさん mailto:sage [2016/02/26(金) 18:31:07.27 ID:A3HYqZte.net] 全選択なら単にエクセルにエクスポートすればいいんじゃないの？ 624 名前：デフォルトの名無しさん [2016/03/04(金) 22:35:15.49 ID:KUnf3VuC.net] 質問　Access2010 突然、フォームのデータシートビューで列を入れ替えてもその状態が保存されないようになってしまいました。 いろいろと原因を調べてみるとOpenやLoadイベントでフィルター設定を行うとそんなトラブルが起こってしまうようなのです。 Private Sub Form_Open(Cancel As Integer) 　Me.Filter = "ID>3" '例 　Me.FilterOn = True End Sub 皆さんの所でも再現出来ますでしょうか ちなみに自宅のAccess2002ではこういった異常な動作は起こりませんでした またこれって有名なバグとかなんでしょうか 625 名前：デフォルトの名無しさん mailto:sage [2016/03/24(木) 22:15:00.25 ID:aSgI1iJJ.net] access 2010 windows7 DoCmd.OutputTo acReport, 626 名前：デフォルトの名無しさん mailto:sage [2016/03/24(木) 22:16:25.19 ID:aSgI1iJJ.net] access 2010 windows7 DoCmd.OutputTo acReport, "hoge_table", acFormatXLS, "C:\hoge.xls" レポートファイルをxlsへ出力するときに 「実行� 627 名前：档Gラー 2587 出力が完了できません」が 出てきてしまいます。 実行時エラー2587を検索しても情報が出てこない為、 困っています。 どなたか何が原因かわかりますでしょうか？ 先月までは機能していたんですが、 今月から急に上記エラーが出てくるようになりました。 [] [ここ壊れてます] 628 名前：デフォルトの名無しさん mailto:sage [2016/03/25(金) 13:31:48.84 ID:ctOehyRA.net] プリンタが変わった レポートの書式が変わった(文字コード系) 再インストールで復帰した　　というようなresが　英語のフォーラムだけど 手動でエクスポートした場合も同じエラーかどうか ん？レポートファイルをxlsへ？　"hoge_table" テーブルをxlsへの間違い？ テーブルをｃｓｖ出力してｘｌｓなら？　　　とかいろいろ 629 名前：デフォルトの名無しさん mailto:sage [2016/03/25(金) 16:30:30.08 ID:e4gujGfG.net] データが増えてリソース不足、ってのが一番考えられる理由だけど 何のリソースかはわからんが もうちょっと詳細なエラー内容ないのかね 630 名前：デフォルトの名無しさん [2016/03/25(金) 21:03:03.83 ID:WqFryHCY.net] 今、先月のhoge_tableをoutoputしたらどうなの 631 名前：デフォルトの名無しさん [2016/04/27(水) 21:09:35.11 ID:KUAYo6wN.net] フォーム上でリストボックスを選択すると、その他のテキストボックスに値が入る仕組みってどうやったらできますか？ 632 名前：デフォルトの名無しさん mailto:sage [2016/04/27(水) 23:03:47.34 ID:Sazji9Gw.net] Me.[その他のテキストボックス] = Me.[リストボックス].Value　とか Me.[その他のテキストボックス] = Me.[リストボックス].Column(n)　とかを リストボックス クリック時イベントに仕込む　うろ覚え 633 名前：デフォルトの名無しさん [2016/04/28(木) 01:08:29.45 ID:ybePhPhs.net] >>606 後者の場合で、表示させたデータを別のテーブルに保存させるにはどうすればいいですか？ 634 名前：デフォルトの名無しさん mailto:sage [2016/04/28(木) 09:47:32.29 ID:wel45o+X.net] ワークテーブルに入れるなりしてSQLとか追加クエリとか 635 名前：デフォルトの名無しさん mailto:sage [2016/04/28(木) 17:15:09.15 ID:iPy/jEF0.net] >>605 リストボックスのコントロールソースをテキストボックスのコントロールソースにも指定 もしくは テキストボックスのコントロールソースにリストボックス自身を指定 リストボックスのみ編集可設定 636 名前：デフォルトの名無しさん mailto:sage [2016/07/12(火) 06:40:44.26 ID:o2wIdsaQ.net] ExcelのシートからADOでデータ取り込みをやろうとしてます ルックアップで別のテーブルを参照しているフィールドを持つテーブルにレコードを追加したいのですが 具体的にはExcelシートには都道府県名が文字列で入っていて Accessのテーブルは都道府県名は別テーブルを参照して数値で持っています 色々試してみたのですが　追加先テーブルの数値型のフィールドには数値しか入力できず 参照している先のテーブルの"東京都"などの文字列データはUpdateでエラーが出ます （あたりまえでしょうけど） こういった参照先データで入力したい場合　なにか良い方法があるのでしょうか？ 637 名前：デフォルトの名無しさん mailto:sage [2016/07/12(火) 16:15:23.94 ID:/KovKhYj.net] 別テーブルを参照して数値を入れる 638 名前：デフォルトの名無しさん mailto:sage [2016/07/12(火) 19:00:20.62 ID:o2wIdsaQ.net] >>611 やっぱり　それしか無いですかね 何万行もあったから　データ入力する度に別テーブルのFindFirstとかやってID見つけるの コスト凄いかと思ってたんですが やってみたら　それほど時間かからなかったです 639 名前：デフォルトの名無しさん mailto:sage [2016/07/12(火) 21:49:03.75 ID:hENPvfBC.net] 都道府県名が入ってるシートって郵便番号のあれですかね まぁ質問の意味がよくわかんないから無視して結構です 640 名前：デフォルトの名無しさん mailto:sage [2016/08/24(水) 19:34:34.65 ID:3q4Jyrt7.net] SQLでテキストデータを取り込む時、ヘッダー行を任意の位置で指定する事は出来ますか？ 読み込もうとしているcsvファイルのヘッダー行が3行目なので、この位置から読み込ませたいのです。 色々調べたんですが、外部データベースを取り込む際のキーワードがなかなか出てこず苦戦しています。 641 名前：デフォルトの名無しさん mailto:sage [2016/08/24(水) 21:33:54.83 ID:XY92uhDq.net] 開始行を含 642 名前：めるか含めないかしかなかった様に思う。 取り込んでしまってからヘッダー行を消すSQL実行したらはやいかも。 [] [ここ壊れてます] 643 名前：デフォルトの名無しさん mailto:sage [2016/08/24(水) 22:13:48.17 ID:3q4Jyrt7.net] >>615 ありがとうございます。 HDR=Noか、もしくはVBAで処理する様にします。 644 名前：デフォルトの名無しさん [2016/09/29(木) 17:49:20.39 ID:Z3hVyFqu.net] SQLで質問ですが、 select * from DATATBL group by NAME こんな感じで集計させても結果が０になってしまうのですが、書式間違ってますか？ ちなみにC++BuilderからMicrosoft.Jet.OLEDB.4.0でmdbファイル操作してます。 645 名前：デフォルトの名無しさん mailto:sage [2016/09/29(木) 18:41:58.74 ID:2yQBgN/R.net] select NAME, COUNT(*) from DATATBL group by NAME 646 名前：デフォルトの名無しさん [2016/09/29(木) 18:55:56.52 ID:Z3hVyFqu.net] >>618 返答ありがとうございます。 しかしながら selectでNAMEのみを指定すると項目が足らんみたいなエラーが出てしまいます。 select *, COUNT(*) from DATATBL group by NAME こうするとエラーは出ませんが、結果はやはり０になってしまいます 647 名前：デフォルトの名無しさん mailto:sage [2016/09/29(木) 19:18:38.30 ID:Z3hVyFqu.net] >>618 すみません、他の箇所でエラーが出ていました。 正常にselectする事ができました。ありがとうございました。 648 名前：デフォルトの名無しさん [2016/09/30(金) 11:38:14.95 ID:tD6+ktpC.net] またSQLで質問ですが、 DATEでソートしてからNAMEをグループ化したいので select NAME from (select * from TESTTABLE order by DATE) as group by NAME 上記のようにしたのですが結果が０になってしまいます。 何処が間違ってますか？

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef