Access VBA 質問スレ Part2 (788レス)
Access VBA 質問スレ Part2 http://mevius.5ch.net/test/read.cgi/tech/1544620479/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
116: デフォルトの名無しさん [] 2019/09/30(月) 00:02:54.58 ID:ELYMfL9+ 質問者が一番馬鹿だが答える方も馬鹿ばっか http://mevius.5ch.net/test/read.cgi/tech/1544620479/116
117: デフォルトの名無しさん [sage] 2019/09/30(月) 00:24:58.55 ID:K8zar7Eh なのでこのカウントの質問、ここで終了! http://mevius.5ch.net/test/read.cgi/tech/1544620479/117
118: デフォルトの名無しさん [sage] 2019/09/30(月) 10:47:04.29 ID:6yDcPDBq どうしてもsql文でやりたいなら 他のsql系統のスレで聞いたほうが良いと思う accessはsqlとvbaを組み合わせて使えるので 込み入り難いからやり易い面が有る 自分は割りとそういうやり方をしてしまう けど他のリレーショナルデータベースはsqlを駆使しないといけない場面が多いだろうから その手の方面の人の方がsql文に詳しい人が多いと思う sql文の質問をしても構わないと自分は思うけど一応vbaスレなんで http://mevius.5ch.net/test/read.cgi/tech/1544620479/118
119: デフォルトの名無しさん [sage] 2019/09/30(月) 23:29:21.37 ID:GbU6Rrgw 他のリレーショナルデータベースはもっとましな言語で使うんだよ http://mevius.5ch.net/test/read.cgi/tech/1544620479/119
120: デフォルトの名無しさん [sage] 2019/10/05(土) 14:25:32.14 ID:pEFp3YWl ""とclearcontentsの違いが明らかになったな http://mevius.5ch.net/test/read.cgi/tech/1544620479/120
121: デフォルトの名無しさん [sage] 2019/10/05(土) 14:25:47.70 ID:pEFp3YWl 誤爆です http://mevius.5ch.net/test/read.cgi/tech/1544620479/121
122: デフォルトの名無しさん [sage] 2019/10/22(火) 14:54:31.07 ID:Si05vw2X 俺なら SELECT [部門] & [果実] AS 式1, Count("HOGE") AS DUMMY FROM テーブル1 GROUP BY [部門] & [果実]; http://mevius.5ch.net/test/read.cgi/tech/1544620479/122
123: デフォルトの名無しさん [] 2019/10/30(水) 06:50:33.11 ID:q0119UkA 普通の関数を使ったSQLがコンパイルエラーで通らなくなるのは、ずっとあるバグなの? 文字列中に含まれるスペースをなくした列同士を比較したいだけなのに http://mevius.5ch.net/test/read.cgi/tech/1544620479/123
124: デフォルトの名無しさん [sage] 2019/10/30(水) 08:05:14.44 ID:QrHO4Al6 DBに上げる前のデータ加工はExcelとPowerBIについてくるPowerQueryで完結させる DB自体は何でも良い Accessはフロントエンド こういう感じの運用が一番融通が利いて楽 http://mevius.5ch.net/test/read.cgi/tech/1544620479/124
125: デフォルトの名無しさん [sage] 2019/10/31(木) 14:53:16.10 ID:3aW6/Vt0 >>123 通ってたのが通らなくなったなら参照設定確認が最初の一歩 http://mevius.5ch.net/test/read.cgi/tech/1544620479/125
126: デフォルトの名無しさん [sage] 2019/10/31(木) 16:05:52.19 ID:IlVblaPX optionala argumentについて教えてください。 https://tsware.jp/tips/tips_119.htm では 引数を Optional かつ バリアント型で宣言する と書いてありますが、 総本山の https://docs.microsoft.com/ja-jp/office/vba/language/concepts/getting-started/understanding-named-arguments-and-optional-arguments では あっさりと string型 で宣言しています。どっちが正しいのでしょうか? それと、プロパティーシートから 関数を呼び出すときに引数を省略できますか?エラーばっかり出てしまうので,不可能という気がしてきますが、実際はどうでしょうか? http://mevius.5ch.net/test/read.cgi/tech/1544620479/126
127: デフォルトの名無しさん [sage] 2019/10/31(木) 16:14:24.18 ID:IlVblaPX ひとつ解決しました。 ここ https://bettersolutions.com/vba/macros/optional-arguments.htm に Remember that IsMissing will only work with the Variant datatype. と書いてあるので、 IsMissingを使いたい場合にvariant型である必要があるだと思います。 プロパティーシートからcallするときに省略可能かどうかはまだわかりませんね。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/127
128: デフォルトの名無しさん [sage] 2019/10/31(木) 23:30:26.82 ID:IK0T1jez >>127 プロパティシートからでも省略できると思うよ 標準で使える関数でも省略できるから http://mevius.5ch.net/test/read.cgi/tech/1544620479/128
129: デフォルトの名無しさん [] 2019/11/06(水) 06:37:50.98 ID:jiZZUv+M IsNumeric 関数 VBA http://vba-auto.com/isnumeric_function_vba/ 9CF http://mevius.5ch.net/test/read.cgi/tech/1544620479/129
130: デフォルトの名無しさん [] 2019/11/06(水) 06:37:51.02 ID:jiZZUv+M IsNumeric 関数 VBA http://vba-auto.com/isnumeric_function_vba/ 9CF http://mevius.5ch.net/test/read.cgi/tech/1544620479/130
131: デフォルトの名無しさん [sage] 2019/11/12(火) 08:08:27.20 ID:n8VUgOjj スレチですまん。 俺はVBAをやってるが上司から言われました。(うちの部署、10名のうち、VBAを作れる人は二人だけ、、、) AIが集計をしてくれるからEXCELは必要ない時代が来るねと言ってた。 反論出来る? http://mevius.5ch.net/test/read.cgi/tech/1544620479/131
132: デフォルトの名無しさん [sage] 2019/11/12(火) 09:07:34.81 ID:umlGYBnb 高度なAIにVBAとか集計なんかやらせちゃ駄目だ。他に何もできない俺たちがやらなきゃな http://mevius.5ch.net/test/read.cgi/tech/1544620479/132
133: デフォルトの名無しさん [sage] 2019/11/12(火) 10:13:03.38 ID:n8VUgOjj >>131の者です。 EXCELとACCESSを間違えた、、、。 すみません。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/133
134: デフォルトの名無しさん [sage] 2019/11/12(火) 18:47:25.82 ID:ZiPBwNA/ ここって禿げのおっさん来てるの? http://mevius.5ch.net/test/read.cgi/tech/1544620479/134
135: デフォルトの名無しさん [sage] 2019/11/12(火) 21:13:04.29 ID:hnHZ9bm+ >>131 〉AIが集計をしてくれるからACCESSは必要ない時代が来るねと言ってた。 来ませんけど、未来のことなので証明はできません なので、その理由を何かをしないことに最大限反論に活用するのが最も有効です 私がプログラムを始めた数十年前から、「コンピュータが発達したらプログラマーはいらなくなる」と言われていましたが、今でも慢性的に不足してますし、更には小学校(?)からプログラムを教えると ちなみに自社でai使うことになっても、おそらく数百万円かかって、大して使い物にならないでしょう ITに詳しくない人は、知識もないのに夢見過ぎです 複数データを組み合わせてサクッと結果求めたり、そこそこのアプリ(特にレポート活用)作るなら、今でもACCESSは最良の選択の一つだと思ってます。2.0くらいから今までそこかしこで使いまくってます http://mevius.5ch.net/test/read.cgi/tech/1544620479/135
136: デフォルトの名無しさん [sage] 2019/11/17(日) 21:57:31.66 ID:qBLyum9y エクセルに比べて、アクセスは過疎ってるなあ http://mevius.5ch.net/test/read.cgi/tech/1544620479/136
137: デフォルトの名無しさん [sage] 2019/11/18(月) 09:09:41.09 ID:8BxAA3e8 あなたの禿にacc(ry http://mevius.5ch.net/test/read.cgi/tech/1544620479/137
138: デフォルトの名無しさん [] 2019/12/19(木) 22:11:03.53 ID:lRu+t2VS Access2010 印刷プレビューのリボンで「PDFまたはXPS」を押した際に出てくる 「PDFまたはXPS形式で発行」のダイアログを出すVBAコード教えてください。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/138
139: デフォルトの名無しさん [sage] 2019/12/20(金) 21:12:19.28 ID:NX/gzbot とりあえず自分でマクロの記録でそれらの操作をなぞって それでできたブツを思う存分手直しして そこで発生した問題を質問した方がいいかもな Access遣いはおばーちゃんやおじーちゃん多いから 「イチからかよ」って思われると、誰も面倒がって答えたがらない http://mevius.5ch.net/test/read.cgi/tech/1544620479/139
140: デフォルトの名無しさん [sage] 2020/01/25(土) 09:08:10.81 ID:Ib3xGLkp Windows10、Office365のAccess16なんだけど、レポートプレビュー画面にボタンでもおいて、そこにイベントプロシジャーを設定したいんだけど、どうするのかな? Access2003では簡単にできたんだけど、リボンがでてきたAccess2007以降出来なくなった気がするんだけど、どうなんだろう? http://mevius.5ch.net/test/read.cgi/tech/1544620479/140
141: デフォルトの名無しさん [sage] 2020/01/25(土) 10:20:39.11 ID:lx4KYteI あなたのハゲにサクセスしたい http://mevius.5ch.net/test/read.cgi/tech/1544620479/141
142: デフォルトの名無しさん [sage] 2020/01/25(土) 23:41:49.05 ID:Tl89GTzc >>140 ちょっと2003でそれをやるコード上げてみ http://mevius.5ch.net/test/read.cgi/tech/1544620479/142
143: デフォルトの名無しさん [sage] 2020/01/26(日) 13:49:02.85 ID:63OckB6o >>142 確か、カスタムメニューだったか、カスタムボタンを設定して、それにイベントプロシジャーを設定していた気がする。 アクセスキーを設定してプレビューを印刷して、プレビュー画面を閉じて、特定のフォームを起動して、特定のボタンやらテキストボックスにフォーカスを与えるとかやっていた気がする。 あれは実に便利だった。 Windows7が動いているPCが物置にあった気がするから確かめてみる。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/143
144: デフォルトの名無しさん [sage] 2020/02/06(木) 19:57:45.45 ID:djhx8w46 会社で役割柄ツールを作ることになりまして、アクセスに入門しました xlsxをインポート、それと同時にテーブルを作成するVBAは組めたのですが、同時にレコードが勝手にソートされてしまい、元データとレコードの順番が異なってしまうという問題に直面しています。 この場合、テーブル作成と同時にオートナンバーを設定するようにしたいのですが、docmd〜acimportdelimでは定義付けができません。 何か方法はありますでしょうか インポートするxlsxは毎回ファイル名が異なる想定なので、保存したインポートを使うのは極力避けたいです http://mevius.5ch.net/test/read.cgi/tech/1544620479/144
145: デフォルトの名無しさん [] 2020/02/06(木) 22:52:24.69 ID:BV2yIT+0 >>144 元データに順序列付けとき http://mevius.5ch.net/test/read.cgi/tech/1544620479/145
146: 144 [sage] 2020/02/07(金) 06:55:52.14 ID:uUICGF6D >>145 そうですよね… 最終手段としてはそれを考えています http://mevius.5ch.net/test/read.cgi/tech/1544620479/146
147: 144 [sage] 2020/02/07(金) 06:56:12.50 ID:uUICGF6D ありがとうございます! http://mevius.5ch.net/test/read.cgi/tech/1544620479/147
148: デフォルトの名無しさん [] 2020/02/07(金) 12:31:07.76 ID:etaMDs5Y >>146 最終手段というか、RDBの行の順序に意味を持たしちゃ行けないと言う基本理念 http://mevius.5ch.net/test/read.cgi/tech/1544620479/148
149: デフォルトの名無しさん [sage] 2020/02/09(日) 18:52:02.04 ID:ISiAk6Az あなたのハゲにサクセスしたい http://mevius.5ch.net/test/read.cgi/tech/1544620479/149
150: デフォルトの名無しさん [sage] 2020/05/03(日) 05:34:51.92 ID:oxUHZhz1 おはようございました 新型コロナでACCESSどころでは無いですね http://mevius.5ch.net/test/read.cgi/tech/1544620479/150
151: デフォルトの名無しさん [sage] 2020/05/23(土) 05:21:27.38 ID:GBVQ4WJe jetbeensのDataGripってアクセスでも使えるの? http://mevius.5ch.net/test/read.cgi/tech/1544620479/151
152: デフォルトの名無しさん [sage] 2020/05/24(日) 14:56:41.74 ID:nvA4FLS/ >>151 jetbrainsでしょ http://mevius.5ch.net/test/read.cgi/tech/1544620479/152
153: デフォルトの名無しさん [sage] 2020/05/24(日) 14:58:32.86 ID:nvA4FLS/ >>151 https://stackoverflow.com/questions/36820072/how-do-i-connect-a-ms-access-database-to-jetbrains-datagrip http://mevius.5ch.net/test/read.cgi/tech/1544620479/153
154: デフォルトの名無しさん [sage] 2020/06/12(金) 10:16:26.06 ID:wVr6YfiN 全然ネットにもあがっていないけれど、Access2019の最新版で、DAOでレコードセットを作成して操作しようとすると Accesが落ちるっていう現象を経験している人っていませんか? 32ビット版も64ビット版も同じ。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/154
155: デフォルトの名無しさん [sage] 2020/06/13(土) 00:26:56.61 ID:0QXppYe5 Excelが2013というオチではなくて? http://mevius.5ch.net/test/read.cgi/tech/1544620479/155
156: デフォルトの名無しさん [sage] 2020/06/13(土) 23:26:59.26 ID:qOp00dJL そうでなくて、今まで動いていたのに最新のビルドになったら突然落ちるようになった。 前のビルと番号に戻したら動くのよ。 ADOでレコードセットを作成したときはどのビルド番号でも問題なし。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/156
157: デフォルトの名無しさん [sage] 2020/06/19(金) 09:37:07.67 ID:N2hJl/gn Application.SetOptionの引数一覧が知りたいのですが、誰か知りませんか http://mevius.5ch.net/test/read.cgi/tech/1544620479/157
158: デフォルトの名無しさん [sage] 2020/07/31(金) 18:27:45.20 ID:2hxJK6g2 ヘルプデスクがスキルアップするため、プログラミング経験積むのにAccessVBAって合ってますか? http://mevius.5ch.net/test/read.cgi/tech/1544620479/158
159: デフォルトの名無しさん [sage] 2020/07/31(金) 18:46:19.97 ID:z2KmuaKZ まずヘルプデスクという職場でプログラミング経験積めるの? http://mevius.5ch.net/test/read.cgi/tech/1544620479/159
160: デフォルトの名無しさん [sage] 2020/08/01(土) 22:26:21.99 ID:kuObS2ra 合ってるかどうかはわからんけど、それはありだな。 DBとPG、両方の知識が増える。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/160
161: デフォルトの名無しさん [sage] 2020/08/02(日) 01:27:11.88 ID:S6RTQlHT お前らどうやって勉強したの? おいらADO勉強したいけどどの本読んでいいかわからないから勉強できてない。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/161
162: デフォルトの名無しさん [sage] 2020/08/02(日) 04:08:31.99 ID:dor5CoCv 覚えるなら実務が一番早いと思いますが 独学なら簡単なものを作ってみると良いですよ 持ち物リストとか http://mevius.5ch.net/test/read.cgi/tech/1544620479/162
163: デフォルトの名無しさん [sage] 2020/08/04(火) 22:22:12.96 ID:j2qbL1qD 持ち物リストですか、わかりました http://mevius.5ch.net/test/read.cgi/tech/1544620479/163
164: デフォルトの名無しさん [sage] 2020/08/07(金) 09:09:10.88 ID:QUQQ3BC/ >>161 Google。 本で勉強したのは20年前かな。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/164
165: デフォルトの名無しさん [sage] 2020/10/10(土) 13:55:25.74 ID:aicjgH/E 最近のAccessは条件付き書式の条件数が3つまでという制限がなくなったと聞いて、vbaで4つ条件を書いたら、怒られた。 条件数の上限の件はどうなっているの? http://mevius.5ch.net/test/read.cgi/tech/1544620479/165
166: デフォルトの名無しさん [sage] 2020/10/12(月) 19:42:49.57 ID:SLKy4GhN https://hamachan.info/win8/access/and.html#st-toc-h-3 なんだろ?もっかい見直してみ http://mevius.5ch.net/test/read.cgi/tech/1544620479/166
167: デフォルトの名無しさん [sage] 2020/10/12(月) 20:44:51.07 ID:XW9upEZ9 >>166 こんなことがかいてありましたね。 >>参考Access2010以降は、条件付き書式を3つ以上追加することができます。Access2007では、3つまでです。 もしかしたら、メニューからなら可能でVBAでは不可能なのかもしれませんね。そうだとしたら変な仕様ですね。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/167
168: デフォルトの名無しさん [sage] 2020/10/12(月) 22:03:49.00 ID:SLKy4GhN 不可能とみるか、未対応と思うか 人それぞれ クレバーなら文句を付けてるヒマ有ったら今できるベストな対応をして次に進んでる http://mevius.5ch.net/test/read.cgi/tech/1544620479/168
169: デフォルトの名無しさん [sage] 2020/10/12(月) 22:18:07.44 ID:XW9upEZ9 おお、AccessとかVBAを勉強し始めた頃を思い出しますね。 ネットで誰かが質問すると必ず上から目線で罵詈雑言だったなあ。 知恵袋とかも酷かったなあ。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/169
170: デフォルトの名無しさん [sage] 2020/10/13(火) 20:22:52.03 ID:Jo0My/9g >そうだとしたら変な仕様ですね。 これが無かったら小言書かなかったけどな MS相手にどっちが上から目線なんだか かてて加えて減らず口叩かれるとは いやはや チラとWeb巡ったら難問袋小路問題で以前からあった疑問なのは判った 条件付き書式をVBAで制御するときに注意すること でググれば一番上に出てくるであろうサイトでは 2013をベースに「・・・すること」とか断言してるが、どうなんだ? hatena さんのサイトでは別問題として画面がチラつくと仰ってる そのサイトの途中にあるリンク先 ↓ (アドレス貼ると書き込みできないから省略 YU-TANG さんは既にアーカイブでしか見られないしVerも古いが 3つしかできないのを工夫で5つまで可能にしてる(らしい 詳細は未チェック) そのサイトの最下段にあるリンク先 ↓ (ry で、そこから誘導されたこちらもアーカイブなLebans 氏のサンプル(らしい 詳細は未チェック) 帳票フォームをサブクラス化して 云々 悪魔の技とYU-TANGさんは大絶賛してる 驚くことにアーカイブだがファイル落とせる 自分では必要に迫られたこと無かったから無頓着だったが、なるほどね みなさん悪戦苦闘してるんですね http://mevius.5ch.net/test/read.cgi/tech/1544620479/170
171: デフォルトの名無しさん [sage] 2020/10/14(水) 02:48:02.48 ID:zZVeC8zp accessは質問者に小言を言う人が多い印象。 いわゆるIT土方が多いからかねえ。 余談だけど世間に流通している商品のVBAを覗くとひどいコードの多さに驚く。そういうコードを書く人が質問者相手にがストレス発散してる気がするなあ。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/171
172: デフォルトの名無しさん [sage] 2020/10/20(火) 06:46:57.60 ID:RpHsdUuc ACCESSは後継者が少ないから先輩面したくても出来ないって人が多いのでは。 私も後輩が欲しい。育成では無く先輩面目的で(だからダメなんだろうね)。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/172
173: デフォルトの名無しさん [sage] 2020/10/23(金) 06:48:31.50 ID:LIFEWQB+ Access2016を使っています VBAを使いcsvファイルを取り込もうとしているのですが取り込み先のファイルの名前全てにピリオドが入っており、例1333.T.csv ピリオドが邪魔でファイル名を指定してもうまく取り込めません 何か良いアイデアはないでしょうか? http://mevius.5ch.net/test/read.cgi/tech/1544620479/173
174: デフォルトの名無しさん [sage] 2020/10/23(金) 17:06:19.46 ID:jTOWYlOX csvファイルに名前付けのルールとかがあって、規則性があるなら Left Mid Right 辺りを交えて工夫 全く一貫性が無いとかなら . を ppp とかにリネームする工夫 https://soudan1.biglobe.ne.jp/qa2877385.html ←これってこと? http://tsware.seesaa.net/article/214574472.html ←ここにもヒントが http://mevius.5ch.net/test/read.cgi/tech/1544620479/174
175: デフォルトの名無しさん [sage] 2020/10/24(土) 06:13:20.49 ID:3Br09s+m >>173 私はファイル選択、コピー、インポート、コピーしたファイルの削除、と言う手順でデータを取り込んでます。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/175
176: 173 [sage] 2020/10/24(土) 23:19:53.94 ID:s9oXa8gi >>174 ありがとうございます ファイル名は規則性があるのでLeft Mid Rightを使ってドットをスルーして取り込みをするやり方を探してみます >>175 こちらはファイルコピーをしてドットのない名前に変換してからインポートといった感じでしょうか初心者すぎてまだ色々理解できていないですが道筋がみえましたありがとうございます http://mevius.5ch.net/test/read.cgi/tech/1544620479/176
177: デフォルトの名無しさん [sage] 2020/11/21(土) 02:09:02.77 ID:OkL4O3GG ACCESS365?でadoの話。 昨日、テーブルメンテナンス用にプログラム書いて、テストでupdateメソッド行をコメントアウトして実行したのにレコードが更新されて焦った。幸い意図した通りの更新が出来たので問題は無かったのだが、こんな事有る? http://mevius.5ch.net/test/read.cgi/tech/1544620479/177
178: デフォルトの名無しさん [sage] 2020/11/21(土) 19:58:38.03 ID:4nufVV0K 通常ではあり得ない動作ですから accdbが破損しているか 思い違いしているか じゃないですかねぇ http://mevius.5ch.net/test/read.cgi/tech/1544620479/178
179: デフォルトの名無しさん [sage] 2020/11/22(日) 23:10:13.61 ID:DuDUZZqW だよね、自分の事じゃなければ私もそう思う。明後日に追試してみます。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/179
180: デフォルトの名無しさん [sage] 2020/11/25(水) 18:43:23.08 ID:q3XRT9ff >177 ADOだと、Updateメソッド実行しなくてもレコードが保存される条件があったはず https://docs.microsoft.com/ja-jp/office/client-developer/access/desktop-database-reference/update-method-ado >Update メソッドを呼び出すより前に追加中または編集中のレコードから移動すると、ADO によって自動的に Update が呼び出されて変更内容が保存されます。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/180
181: デフォルトの名無しさん [sage] 2020/11/26(木) 22:16:38.24 ID:jD11+CM5 >>180 これか、ありがとう。 だとしたらupdateメソッド要らなくね?よく分からんが。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/181
182: デフォルトの名無しさん [sage] 2020/11/27(金) 16:20:14.12 ID:j3fR6c+j レコード移動しないけど変更を保存したいときに必要だろう http://mevius.5ch.net/test/read.cgi/tech/1544620479/182
183: デフォルトの名無しさん [sage] 2020/11/29(日) 20:06:15.16 ID:k+jvWZ30 >>182 それはそうね http://mevius.5ch.net/test/read.cgi/tech/1544620479/183
184: デフォルトの名無しさん [sage] 2021/01/11(月) 16:27:04.20 ID:HFGgd7VU ACCESSのSQLでビット比較ってどうすればいいですか (value & 0x10) == 0x10 みたいに特定のビットが立ってるか比較したいのですが http://mevius.5ch.net/test/read.cgi/tech/1544620479/184
185: デフォルトの名無しさん [sage] 2021/01/11(月) 17:56:37.60 ID:qzYYjSUA できるかわかりませんが、 (value and &H10) = &H10 だとダメですか? http://mevius.5ch.net/test/read.cgi/tech/1544620479/185
186: デフォルトの名無しさん [sage] 2021/01/12(火) 19:10:42.78 ID:f1Ulh51r >>185 試してみます、ありがとうございます http://mevius.5ch.net/test/read.cgi/tech/1544620479/186
187: デフォルトの名無しさん [sage] 2021/01/12(火) 19:16:56.91 ID:f1Ulh51r ダメでした andを&に変えてもダメでした http://mevius.5ch.net/test/read.cgi/tech/1544620479/187
188: 185 [sage] 2021/01/12(火) 19:30:22.83 ID:sGnBc5NV そっか、SQLのAND演算子になっちゃうのか… &も文字列の結合演算子とみなされちゃうのかな? &H10のビット限定なら、 (value \ 16) MOD 2 でいけそうですが、他にもパターンがあるでしょうから… http://mevius.5ch.net/test/read.cgi/tech/1544620479/188
189: 185 [sage] 2021/01/12(火) 19:34:25.38 ID:sGnBc5NV 何より分かりにくいですねw 整数除算(\)で該当のビット位置を一番右にずらして、MODでそのビットを取り出します http://mevius.5ch.net/test/read.cgi/tech/1544620479/189
190: 185 [sage] 2021/01/12(火) 19:49:06.45 ID:sGnBc5NV 16 じゃなくて &H10 と書く方が取り出すビットと一緒で分かりやすいですね(うまくゆくかはわかりませんが) (value \ &H10) MOD 2 http://mevius.5ch.net/test/read.cgi/tech/1544620479/190
191: 185 [sage] 2021/01/13(水) 02:15:13.93 ID:+GyFVgd4 連投すみません 188案は value が long型だとして、値が負数のとき正しい結果にならないことがあります ごめんなさい http://mevius.5ch.net/test/read.cgi/tech/1544620479/191
192: デフォルトの名無しさん [sage] 2021/01/13(水) 17:32:20.96 ID:Mb95xbD5 >>188-191 親切にありがとうございます。 \とか使えるのは知りませんでした。 試してみます http://mevius.5ch.net/test/read.cgi/tech/1544620479/192
193: デフォルトの名無しさん [sage] 2021/01/13(水) 17:50:48.61 ID:+yZZ5ziS Windows10、Access365です。 Excelファイル上のデータに対して、ADOでアクセスして、データを取り込んでいるのですが、時間がかかります。 時間を短縮する方法はないでしょうか。 データは1ヶ月分9万件程度ですが、Accessのテーブルに取り込むのに、7分程度かかります。 テーブルのレコードの追加は、データ1件1件に対して、ADOのAddNewメソッド、Updateメソッドで追加しています。 試しに手動でAccessのインポート機能を使用して1ヶ月分のデータを取り込んでみたのですが、時間はかからなかったのですが、F20、F21など、空白の列まで要求されました。 そのためこの手段はあまり良くないと思っています。 レコードセットを一気にInsertする方法とかないでしょうか。 よろしくお願いします。 http://mevius.5ch.net/test/read.cgi/tech/1544620479/193
194: デフォルトの名無しさん [sage] 2021/01/14(木) 01:33:57.64 ID:yNTWs1ET 一件一件Updateするんじゃなくて、UpdateBatchでバッチ更新してみるとか http://mevius.5ch.net/test/read.cgi/tech/1544620479/194
195: デフォルトの名無しさん [sage] 2021/01/14(木) 01:41:15.38 ID:yNTWs1ET >>187 ふつうに>>185でできるはずだけど valueの型が数値じゃないんじゃ? http://mevius.5ch.net/test/read.cgi/tech/1544620479/195
196: デフォルトの名無しさん [sage] 2021/01/14(木) 03:34:32.57 ID:eeXKDacn >>193 レコードセットで要求の動作はできないと思われます 以下はレコードセットを使わない方法になります 前提として ・現在取込時にレコードセットを編集していない ・SQL が書ける INSERT 文で ・「IN 句」に Excel ファイルを指定 ・追加先テーブルに Access テーブルを指定 これでインポートと同等のパフォーマンスになると思います 詳細は MS のリファレンスを参照 https://docs.microsoft.com/ja-jp/office/vba/access/concepts/miscellaneous/in-clause-microsoft-access-sql 今(.xlsx)だと EXCEL 12.0 になります http://mevius.5ch.net/test/read.cgi/tech/1544620479/196
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 592 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.016s