Access の VBA に関する質問スレです
質問テンプレ(雛形)は用意しませんが、OSとAccessのバージョンぐらいは必ず書きましょう
前回のスレッド
Access VBA 質問スレ Part1
https://mevius.5ch.net/test/read.cgi/tech/1328536426/
Access VBA 質問スレ Part2
1デフォルトの名無しさん
2018/12/12(水) 22:14:39.18ID:GF6Qf3Td2019/04/29(月) 11:33:05.46ID:lr8PSWgy
2019/04/29(月) 11:38:37.49ID:d82tlvl6
>>89
横からすんみません。
一人でしか使わない場合もフォームのコントロールを弄くるのが好きな人は分離した方が良いと思います。
コマンドボタンの位置を変更しただけでフォームが消えてしまったことが何度もありますから、
一人で使用する場合もカスタマイズ好きならデーターは分離した方がいいと思います。
横からすんみません。
一人でしか使わない場合もフォームのコントロールを弄くるのが好きな人は分離した方が良いと思います。
コマンドボタンの位置を変更しただけでフォームが消えてしまったことが何度もありますから、
一人で使用する場合もカスタマイズ好きならデーターは分離した方がいいと思います。
9289
2019/04/29(月) 12:16:08.84ID:lr8PSWgy >>90
最近は個人的な作成しかしなくなったので教えて下さい。
そのファイルはmdb、accdbどちらですか?
(拡張子が変わって壊れにくくなったかとか、何が変わってどう影響するか細かくは調べてないです)
そのdbファイルはローカル/ファイルサーバどちらに置いてましたか?
ここ数年はツール的な小さなものを、accdbをローカルで作成してますが、壊れた経験はないです。
1つのフォーム内で、各処理をフレームで分けてあり、フレーム内にはテキストボックスやボタンなどがあります。
フレーム単位で、あっちやこっちに頻繁に移動はしてます。
(それでも、過去の壊れてた経験から、数日に一回最適化とバックアップはとってます)
最近は個人的な作成しかしなくなったので教えて下さい。
そのファイルはmdb、accdbどちらですか?
(拡張子が変わって壊れにくくなったかとか、何が変わってどう影響するか細かくは調べてないです)
そのdbファイルはローカル/ファイルサーバどちらに置いてましたか?
ここ数年はツール的な小さなものを、accdbをローカルで作成してますが、壊れた経験はないです。
1つのフォーム内で、各処理をフレームで分けてあり、フレーム内にはテキストボックスやボタンなどがあります。
フレーム単位で、あっちやこっちに頻繁に移動はしてます。
(それでも、過去の壊れてた経験から、数日に一回最適化とバックアップはとってます)
2019/04/29(月) 12:36:13.73ID:d82tlvl6
>>92
mdbです。dbファイルもmdbでローカルです。
フロントエンド?(と言っていいのかしら?)が巨大で、100MBくらいあります。
業務用ソフトで中身は使用されていないゴミ変数やゴミプロシジャーが大量にあります。空のプロシジャーもある上に、それをcallしている謎のプロシジャーもあります。
str型の変数なのに、タイプするのが面倒くさかったのか、var型で宣言されている変数がこれまた大量にあります。
mdbです。dbファイルもmdbでローカルです。
フロントエンド?(と言っていいのかしら?)が巨大で、100MBくらいあります。
業務用ソフトで中身は使用されていないゴミ変数やゴミプロシジャーが大量にあります。空のプロシジャーもある上に、それをcallしている謎のプロシジャーもあります。
str型の変数なのに、タイプするのが面倒くさかったのか、var型で宣言されている変数がこれまた大量にあります。
9489
2019/04/29(月) 13:14:19.98ID:lr8PSWgy >>93
ありがとうございます。
今でもmdbで作り込みが大きいのは壊れやすいんですね。
以前は、新mdbに全部インポートして、リフレッシュ(ゴミ除去)とかやってました。
(最適化より小さくなるから、何か効果はあるんじゃないかと思って。)
accdbに全部インポートして、参照設定修正という方法もあるけど、業務用だと完全に同じ動きするかと問われると保証できないので、難しいだろうし。
時間やお金出るなら(これからも使い続けるなら)、機能(部署)ごとに分割とか、accdbに徐々に移行(プロシージャ修正整理)とかやっていきたいところですね。
ありがとうございます。
今でもmdbで作り込みが大きいのは壊れやすいんですね。
以前は、新mdbに全部インポートして、リフレッシュ(ゴミ除去)とかやってました。
(最適化より小さくなるから、何か効果はあるんじゃないかと思って。)
accdbに全部インポートして、参照設定修正という方法もあるけど、業務用だと完全に同じ動きするかと問われると保証できないので、難しいだろうし。
時間やお金出るなら(これからも使い続けるなら)、機能(部署)ごとに分割とか、accdbに徐々に移行(プロシージャ修正整理)とかやっていきたいところですね。
2019/04/29(月) 13:47:50.96ID:QxflDRVF
SQLserver使おうぜ
2019/05/04(土) 18:38:16.45ID:ZGbBU4Ge
Accessはフロントエンドに使う
DBはMySQLでも良い
DBはMySQLでも良い
97デフォルトの名無しさん
2019/05/05(日) 01:45:20.23ID:PgstIp0W 一度に大量で複雑な更新をすると落ちやすかった印象は有るかなぁ
2019/05/07(火) 11:01:49.04ID:S4maxKz5
>>96
帳票とかからむと、手軽だもんな
帳票とかからむと、手軽だもんな
2019/05/08(水) 19:00:39.16ID:PD4Nn61H
Accessは何たって帳票の作成が超簡単!
これがあるから離れなれない。
LibreOfficeやOpenOfficeにも帳票作成ツールはあるけど、
Accessほど使い易くはないのが、移行できずにいる大きな要因の一つなのは間違いない。
これがあるから離れなれない。
LibreOfficeやOpenOfficeにも帳票作成ツールはあるけど、
Accessほど使い易くはないのが、移行できずにいる大きな要因の一つなのは間違いない。
100デフォルトの名無しさん
2019/05/11(土) 13:23:24.99ID:J8lUk67b Office365でアプリアイコンが刷新されたがAccessは変わらない悲しみ
101デフォルトの名無しさん
2019/06/03(月) 01:57:41.37ID:vn/O8vit access2016使ってて2013のランタイム入れたらaccessが使えなくなってびびったわ
あわててシステムの復元して直ったけど
あわててシステムの復元して直ったけど
102デフォルトの名無しさん
2019/07/17(水) 21:40:08.49ID:/Hg4fKFx サブフォームのソースオブジェクトに、SQLを直接記入することはできないのでしょうか?
SQL文というものがそもそもオブジェクトでないから記入できないのでしょうか?
SQL文というものがそもそもオブジェクトでないから記入できないのでしょうか?
103デフォルトの名無しさん
2019/07/17(水) 22:16:32.17ID:5Qt+TnNF Formのオープン時にそのサブフォームのおソースを放り込めばできる
あとはメインフォーム上でサブフォームをいぢるイベント時に書くとか 例えばボタン押した時など
サブフォームはソース無し にしてるけど、自分は そこへ放り込むやり方だと出来てる
あとはメインフォーム上でサブフォームをいぢるイベント時に書くとか 例えばボタン押した時など
サブフォームはソース無し にしてるけど、自分は そこへ放り込むやり方だと出来てる
104デフォルトの名無しさん
2019/07/17(水) 22:25:51.54ID:eXUk1Aqq >>102
ビュー定義してソースに設定したら?
ビュー定義してソースに設定したら?
105デフォルトの名無しさん
2019/09/28(土) 01:30:49.78ID:XSiAgIby id 部門 販売品目
1 A りんご
2 A バナナ
3 A りんご
4 B バナナ
5 B ぶどう
6 B ぶどう
というテーブルから、
部署と販売品目が同じレコード数
(Aかつりんご、Aかつバナナ、Bかつバナナ、Bかつぶどう の数)をカウントしたいのですがうまくいきません。
販売品目単独では
SELECT 販売品目,Count(id)
FROM テーブル名
GROUP BY 販売品目
のようにすれば思うようにいくのですが、複数条件になると思うようにいきません。
お知恵を貸していただけないでしょうか。
1 A りんご
2 A バナナ
3 A りんご
4 B バナナ
5 B ぶどう
6 B ぶどう
というテーブルから、
部署と販売品目が同じレコード数
(Aかつりんご、Aかつバナナ、Bかつバナナ、Bかつぶどう の数)をカウントしたいのですがうまくいきません。
販売品目単独では
SELECT 販売品目,Count(id)
FROM テーブル名
GROUP BY 販売品目
のようにすれば思うようにいくのですが、複数条件になると思うようにいきません。
お知恵を貸していただけないでしょうか。
106デフォルトの名無しさん
2019/09/28(土) 02:03:10.80ID:hdiBTyMe SELECT 部門, 販売品目, Count(ID) AS IDカウント
FROM テーブル1
GROUP BY 部門, 販売品目
HAVING (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう")) ;
FROM テーブル1
GROUP BY 部門, 販売品目
HAVING (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう")) ;
107デフォルトの名無しさん
2019/09/28(土) 02:08:15.90ID:hdiBTyMe もしくは
SELECT 部門, 販売品目, Count(ID) AS IDのカウント
FROM (
SELECT * FROM テーブル1 WHERE (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう"))
) GROUP BY 部門, 販売品目
SELECT 部門, 販売品目, Count(ID) AS IDのカウント
FROM (
SELECT * FROM テーブル1 WHERE (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう"))
) GROUP BY 部門, 販売品目
108デフォルトの名無しさん
2019/09/28(土) 02:22:14.79ID:hdiBTyMe //シンプルにこれでもできたけどwhereの位置とか括弧とか間違えてない?
select 部門, 販売品目, count(ID) as カウント
from テーブル1
where (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう"))
group by 部門, 販売品目
select 部門, 販売品目, count(ID) as カウント
from テーブル1
where (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう"))
group by 部門, 販売品目
109デフォルトの名無しさん
2019/09/28(土) 06:33:14.21ID:XSiAgIby >>106
ありごとうごぞいます。
説明が不十分でした。
たしかにそのとうり記述すればできるのですが、部門や販売品目が増えていった場合に、全組合せを書き出さないでやる方法はないものかと考えております。
ありごとうごぞいます。
説明が不十分でした。
たしかにそのとうり記述すればできるのですが、部門や販売品目が増えていった場合に、全組合せを書き出さないでやる方法はないものかと考えております。
110デフォルトの名無しさん
2019/09/28(土) 09:36:23.69ID:hdiBTyMe111デフォルトの名無しさん
2019/09/28(土) 21:47:53.70ID:w31BDneZ112デフォルトの名無しさん
2019/09/28(土) 23:50:31.47ID:Bvcc+55+ Ruby なら、
require 'csv'
str = <<"EOT"
id 部門 販売品目
1 A りんご
2 A バナナ
3 A りんご
4 B バナナ
5 B ぶどう
6 B ぶどう
EOT
# 空白区切りで、ヘッダー有り
options = { :headers => true, :col_sep => " " }
# Hash.new で、初期値は、{ }
hash = CSV.parse( str, options ).each_with_object( Hash.new { |h,k| h[ k ] = { } } ) do | row, hash |
dep = row[ '部門' ] # department
item = row[ '販売品目' ]
if hash.dig( dep, item ) # Ruby 2.3 から
hash[ dep ][ item ] += 1
else
hash[ dep ][ item ] = 1
end
end
p hash
#=> {"A"=>{"りんご"=>2, "バナナ"=>1}, "B"=>{"バナナ"=>1, "ぶどう"=>2}}
require 'csv'
str = <<"EOT"
id 部門 販売品目
1 A りんご
2 A バナナ
3 A りんご
4 B バナナ
5 B ぶどう
6 B ぶどう
EOT
# 空白区切りで、ヘッダー有り
options = { :headers => true, :col_sep => " " }
# Hash.new で、初期値は、{ }
hash = CSV.parse( str, options ).each_with_object( Hash.new { |h,k| h[ k ] = { } } ) do | row, hash |
dep = row[ '部門' ] # department
item = row[ '販売品目' ]
if hash.dig( dep, item ) # Ruby 2.3 から
hash[ dep ][ item ] += 1
else
hash[ dep ][ item ] = 1
end
end
p hash
#=> {"A"=>{"りんご"=>2, "バナナ"=>1}, "B"=>{"バナナ"=>1, "ぶどう"=>2}}
113デフォルトの名無しさん
2019/09/29(日) 07:32:11.18ID:V4rAOO4u >>111
いきってないで答えてやれよヴァカw
いきってないで答えてやれよヴァカw
114デフォルトの名無しさん
2019/09/29(日) 09:35:48.11ID:l54OkWQk AccessならGurupByしたクエリを名前を付けて保存しておくのが正解
サブクエ遅いから
サブクエ遅いから
115デフォルトの名無しさん
2019/09/29(日) 19:47:04.97ID:mdCYdpYZ 普通に部門販売品目でソートしてから
dynasetからvbaでカウントしたら駄目なの?
sql文を捏ね繰り回すよりその方が簡単な気がするけど?
dynasetからvbaでカウントしたら駄目なの?
sql文を捏ね繰り回すよりその方が簡単な気がするけど?
116デフォルトの名無しさん
2019/09/30(月) 00:02:54.58ID:ELYMfL9+ 質問者が一番馬鹿だが答える方も馬鹿ばっか
117デフォルトの名無しさん
2019/09/30(月) 00:24:58.55ID:K8zar7Eh なのでこのカウントの質問、ここで終了!
118デフォルトの名無しさん
2019/09/30(月) 10:47:04.29ID:6yDcPDBq どうしてもsql文でやりたいなら
他のsql系統のスレで聞いたほうが良いと思う
accessはsqlとvbaを組み合わせて使えるので
込み入り難いからやり易い面が有る
自分は割りとそういうやり方をしてしまう
けど他のリレーショナルデータベースはsqlを駆使しないといけない場面が多いだろうから
その手の方面の人の方がsql文に詳しい人が多いと思う
sql文の質問をしても構わないと自分は思うけど一応vbaスレなんで
他のsql系統のスレで聞いたほうが良いと思う
accessはsqlとvbaを組み合わせて使えるので
込み入り難いからやり易い面が有る
自分は割りとそういうやり方をしてしまう
けど他のリレーショナルデータベースはsqlを駆使しないといけない場面が多いだろうから
その手の方面の人の方がsql文に詳しい人が多いと思う
sql文の質問をしても構わないと自分は思うけど一応vbaスレなんで
119デフォルトの名無しさん
2019/09/30(月) 23:29:21.37ID:GbU6Rrgw 他のリレーショナルデータベースはもっとましな言語で使うんだよ
120デフォルトの名無しさん
2019/10/05(土) 14:25:32.14ID:pEFp3YWl ""とclearcontentsの違いが明らかになったな
121デフォルトの名無しさん
2019/10/05(土) 14:25:47.70ID:pEFp3YWl 誤爆です
122デフォルトの名無しさん
2019/10/22(火) 14:54:31.07ID:Si05vw2X 俺なら
SELECT [部門] & [果実] AS 式1, Count("HOGE") AS DUMMY
FROM テーブル1
GROUP BY [部門] & [果実];
SELECT [部門] & [果実] AS 式1, Count("HOGE") AS DUMMY
FROM テーブル1
GROUP BY [部門] & [果実];
123デフォルトの名無しさん
2019/10/30(水) 06:50:33.11ID:q0119UkA 普通の関数を使ったSQLがコンパイルエラーで通らなくなるのは、ずっとあるバグなの?
文字列中に含まれるスペースをなくした列同士を比較したいだけなのに
文字列中に含まれるスペースをなくした列同士を比較したいだけなのに
124デフォルトの名無しさん
2019/10/30(水) 08:05:14.44ID:QrHO4Al6 DBに上げる前のデータ加工はExcelとPowerBIについてくるPowerQueryで完結させる
DB自体は何でも良い
Accessはフロントエンド
こういう感じの運用が一番融通が利いて楽
DB自体は何でも良い
Accessはフロントエンド
こういう感じの運用が一番融通が利いて楽
125デフォルトの名無しさん
2019/10/31(木) 14:53:16.10ID:3aW6/Vt0 >>123
通ってたのが通らなくなったなら参照設定確認が最初の一歩
通ってたのが通らなくなったなら参照設定確認が最初の一歩
126デフォルトの名無しさん
2019/10/31(木) 16:05:52.19ID: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型 で宣言しています。どっちが正しいのでしょうか?
それと、プロパティーシートから 関数を呼び出すときに引数を省略できますか?エラーばっかり出てしまうので,不可能という気がしてきますが、実際はどうでしょうか?
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型 で宣言しています。どっちが正しいのでしょうか?
それと、プロパティーシートから 関数を呼び出すときに引数を省略できますか?エラーばっかり出てしまうので,不可能という気がしてきますが、実際はどうでしょうか?
127デフォルトの名無しさん
2019/10/31(木) 16:14:24.18ID:IlVblaPX ひとつ解決しました。
ここ https://bettersolutions.com/vba/macros/optional-arguments.htm に Remember that IsMissing will only work with the Variant datatype. と書いてあるので、
IsMissingを使いたい場合にvariant型である必要があるだと思います。
プロパティーシートからcallするときに省略可能かどうかはまだわかりませんね。
ここ https://bettersolutions.com/vba/macros/optional-arguments.htm に Remember that IsMissing will only work with the Variant datatype. と書いてあるので、
IsMissingを使いたい場合にvariant型である必要があるだと思います。
プロパティーシートからcallするときに省略可能かどうかはまだわかりませんね。
128デフォルトの名無しさん
2019/10/31(木) 23:30:26.82ID:IK0T1jez129デフォルトの名無しさん
2019/11/06(水) 06:37:50.98ID:jiZZUv+M130デフォルトの名無しさん
2019/11/06(水) 06:37:51.02ID:jiZZUv+M131デフォルトの名無しさん
2019/11/12(火) 08:08:27.20ID:n8VUgOjj スレチですまん。
俺はVBAをやってるが上司から言われました。(うちの部署、10名のうち、VBAを作れる人は二人だけ、、、)
AIが集計をしてくれるからEXCELは必要ない時代が来るねと言ってた。
反論出来る?
俺はVBAをやってるが上司から言われました。(うちの部署、10名のうち、VBAを作れる人は二人だけ、、、)
AIが集計をしてくれるからEXCELは必要ない時代が来るねと言ってた。
反論出来る?
132デフォルトの名無しさん
2019/11/12(火) 09:07:34.81ID:umlGYBnb 高度なAIにVBAとか集計なんかやらせちゃ駄目だ。他に何もできない俺たちがやらなきゃな
133デフォルトの名無しさん
2019/11/12(火) 10:13:03.38ID:n8VUgOjj134デフォルトの名無しさん
2019/11/12(火) 18:47:25.82ID:ZiPBwNA/ ここって禿げのおっさん来てるの?
135デフォルトの名無しさん
2019/11/12(火) 21:13:04.29ID:hnHZ9bm+ >>131
〉AIが集計をしてくれるからACCESSは必要ない時代が来るねと言ってた。
来ませんけど、未来のことなので証明はできません
なので、その理由を何かをしないことに最大限反論に活用するのが最も有効です
私がプログラムを始めた数十年前から、「コンピュータが発達したらプログラマーはいらなくなる」と言われていましたが、今でも慢性的に不足してますし、更には小学校(?)からプログラムを教えると
ちなみに自社でai使うことになっても、おそらく数百万円かかって、大して使い物にならないでしょう
ITに詳しくない人は、知識もないのに夢見過ぎです
複数データを組み合わせてサクッと結果求めたり、そこそこのアプリ(特にレポート活用)作るなら、今でもACCESSは最良の選択の一つだと思ってます。2.0くらいから今までそこかしこで使いまくってます
〉AIが集計をしてくれるからACCESSは必要ない時代が来るねと言ってた。
来ませんけど、未来のことなので証明はできません
なので、その理由を何かをしないことに最大限反論に活用するのが最も有効です
私がプログラムを始めた数十年前から、「コンピュータが発達したらプログラマーはいらなくなる」と言われていましたが、今でも慢性的に不足してますし、更には小学校(?)からプログラムを教えると
ちなみに自社でai使うことになっても、おそらく数百万円かかって、大して使い物にならないでしょう
ITに詳しくない人は、知識もないのに夢見過ぎです
複数データを組み合わせてサクッと結果求めたり、そこそこのアプリ(特にレポート活用)作るなら、今でもACCESSは最良の選択の一つだと思ってます。2.0くらいから今までそこかしこで使いまくってます
136デフォルトの名無しさん
2019/11/17(日) 21:57:31.66ID:qBLyum9y エクセルに比べて、アクセスは過疎ってるなあ
137デフォルトの名無しさん
2019/11/18(月) 09:09:41.09ID:8BxAA3e8 あなたの禿にacc(ry
138デフォルトの名無しさん
2019/12/19(木) 22:11:03.53ID:lRu+t2VS Access2010
印刷プレビューのリボンで「PDFまたはXPS」を押した際に出てくる
「PDFまたはXPS形式で発行」のダイアログを出すVBAコード教えてください。
印刷プレビューのリボンで「PDFまたはXPS」を押した際に出てくる
「PDFまたはXPS形式で発行」のダイアログを出すVBAコード教えてください。
139デフォルトの名無しさん
2019/12/20(金) 21:12:19.28ID:NX/gzbot とりあえず自分でマクロの記録でそれらの操作をなぞって
それでできたブツを思う存分手直しして
そこで発生した問題を質問した方がいいかもな
Access遣いはおばーちゃんやおじーちゃん多いから
「イチからかよ」って思われると、誰も面倒がって答えたがらない
それでできたブツを思う存分手直しして
そこで発生した問題を質問した方がいいかもな
Access遣いはおばーちゃんやおじーちゃん多いから
「イチからかよ」って思われると、誰も面倒がって答えたがらない
140デフォルトの名無しさん
2020/01/25(土) 09:08:10.81ID:Ib3xGLkp Windows10、Office365のAccess16なんだけど、レポートプレビュー画面にボタンでもおいて、そこにイベントプロシジャーを設定したいんだけど、どうするのかな?
Access2003では簡単にできたんだけど、リボンがでてきたAccess2007以降出来なくなった気がするんだけど、どうなんだろう?
Access2003では簡単にできたんだけど、リボンがでてきたAccess2007以降出来なくなった気がするんだけど、どうなんだろう?
141デフォルトの名無しさん
2020/01/25(土) 10:20:39.11ID:lx4KYteI あなたのハゲにサクセスしたい
142デフォルトの名無しさん
2020/01/25(土) 23:41:49.05ID:Tl89GTzc >>140
ちょっと2003でそれをやるコード上げてみ
ちょっと2003でそれをやるコード上げてみ
143デフォルトの名無しさん
2020/01/26(日) 13:49:02.85ID:63OckB6o >>142
確か、カスタムメニューだったか、カスタムボタンを設定して、それにイベントプロシジャーを設定していた気がする。
アクセスキーを設定してプレビューを印刷して、プレビュー画面を閉じて、特定のフォームを起動して、特定のボタンやらテキストボックスにフォーカスを与えるとかやっていた気がする。
あれは実に便利だった。
Windows7が動いているPCが物置にあった気がするから確かめてみる。
確か、カスタムメニューだったか、カスタムボタンを設定して、それにイベントプロシジャーを設定していた気がする。
アクセスキーを設定してプレビューを印刷して、プレビュー画面を閉じて、特定のフォームを起動して、特定のボタンやらテキストボックスにフォーカスを与えるとかやっていた気がする。
あれは実に便利だった。
Windows7が動いているPCが物置にあった気がするから確かめてみる。
144デフォルトの名無しさん
2020/02/06(木) 19:57:45.45ID:djhx8w46 会社で役割柄ツールを作ることになりまして、アクセスに入門しました
xlsxをインポート、それと同時にテーブルを作成するVBAは組めたのですが、同時にレコードが勝手にソートされてしまい、元データとレコードの順番が異なってしまうという問題に直面しています。
この場合、テーブル作成と同時にオートナンバーを設定するようにしたいのですが、docmd〜acimportdelimでは定義付けができません。
何か方法はありますでしょうか
インポートするxlsxは毎回ファイル名が異なる想定なので、保存したインポートを使うのは極力避けたいです
xlsxをインポート、それと同時にテーブルを作成するVBAは組めたのですが、同時にレコードが勝手にソートされてしまい、元データとレコードの順番が異なってしまうという問題に直面しています。
この場合、テーブル作成と同時にオートナンバーを設定するようにしたいのですが、docmd〜acimportdelimでは定義付けができません。
何か方法はありますでしょうか
インポートするxlsxは毎回ファイル名が異なる想定なので、保存したインポートを使うのは極力避けたいです
145デフォルトの名無しさん
2020/02/06(木) 22:52:24.69ID:BV2yIT+0 >>144
元データに順序列付けとき
元データに順序列付けとき
147144
2020/02/07(金) 06:56:12.50ID:uUICGF6D ありがとうございます!
148デフォルトの名無しさん
2020/02/07(金) 12:31:07.76ID:etaMDs5Y >>146
最終手段というか、RDBの行の順序に意味を持たしちゃ行けないと言う基本理念
最終手段というか、RDBの行の順序に意味を持たしちゃ行けないと言う基本理念
149デフォルトの名無しさん
2020/02/09(日) 18:52:02.04ID:ISiAk6Az あなたのハゲにサクセスしたい
150デフォルトの名無しさん
2020/05/03(日) 05:34:51.92ID:oxUHZhz1 おはようございました
新型コロナでACCESSどころでは無いですね
新型コロナでACCESSどころでは無いですね
151デフォルトの名無しさん
2020/05/23(土) 05:21:27.38ID:GBVQ4WJe jetbeensのDataGripってアクセスでも使えるの?
152デフォルトの名無しさん
2020/05/24(日) 14:56:41.74ID:nvA4FLS/ >>151
jetbrainsでしょ
jetbrainsでしょ
153デフォルトの名無しさん
2020/05/24(日) 14:58:32.86ID:nvA4FLS/154デフォルトの名無しさん
2020/06/12(金) 10:16:26.06ID:wVr6YfiN 全然ネットにもあがっていないけれど、Access2019の最新版で、DAOでレコードセットを作成して操作しようとすると
Accesが落ちるっていう現象を経験している人っていませんか?
32ビット版も64ビット版も同じ。
Accesが落ちるっていう現象を経験している人っていませんか?
32ビット版も64ビット版も同じ。
155デフォルトの名無しさん
2020/06/13(土) 00:26:56.61ID:0QXppYe5 Excelが2013というオチではなくて?
156デフォルトの名無しさん
2020/06/13(土) 23:26:59.26ID:qOp00dJL そうでなくて、今まで動いていたのに最新のビルドになったら突然落ちるようになった。
前のビルと番号に戻したら動くのよ。
ADOでレコードセットを作成したときはどのビルド番号でも問題なし。
前のビルと番号に戻したら動くのよ。
ADOでレコードセットを作成したときはどのビルド番号でも問題なし。
157デフォルトの名無しさん
2020/06/19(金) 09:37:07.67ID:N2hJl/gn Application.SetOptionの引数一覧が知りたいのですが、誰か知りませんか
158デフォルトの名無しさん
2020/07/31(金) 18:27:45.20ID:2hxJK6g2 ヘルプデスクがスキルアップするため、プログラミング経験積むのにAccessVBAって合ってますか?
159デフォルトの名無しさん
2020/07/31(金) 18:46:19.97ID:z2KmuaKZ まずヘルプデスクという職場でプログラミング経験積めるの?
160デフォルトの名無しさん
2020/08/01(土) 22:26:21.99ID:kuObS2ra 合ってるかどうかはわからんけど、それはありだな。
DBとPG、両方の知識が増える。
DBとPG、両方の知識が増える。
161デフォルトの名無しさん
2020/08/02(日) 01:27:11.88ID:S6RTQlHT お前らどうやって勉強したの?
おいらADO勉強したいけどどの本読んでいいかわからないから勉強できてない。
おいらADO勉強したいけどどの本読んでいいかわからないから勉強できてない。
162デフォルトの名無しさん
2020/08/02(日) 04:08:31.99ID:dor5CoCv 覚えるなら実務が一番早いと思いますが
独学なら簡単なものを作ってみると良いですよ
持ち物リストとか
独学なら簡単なものを作ってみると良いですよ
持ち物リストとか
163デフォルトの名無しさん
2020/08/04(火) 22:22:12.96ID:j2qbL1qD 持ち物リストですか、わかりました
164デフォルトの名無しさん
2020/08/07(金) 09:09:10.88ID:QUQQ3BC/165デフォルトの名無しさん
2020/10/10(土) 13:55:25.74ID:aicjgH/E 最近のAccessは条件付き書式の条件数が3つまでという制限がなくなったと聞いて、vbaで4つ条件を書いたら、怒られた。
条件数の上限の件はどうなっているの?
条件数の上限の件はどうなっているの?
166デフォルトの名無しさん
2020/10/12(月) 19:42:49.57ID:SLKy4GhN https://hamachan.info/win8/access/and.html#st-toc-h-3
なんだろ?もっかい見直してみ
なんだろ?もっかい見直してみ
167デフォルトの名無しさん
2020/10/12(月) 20:44:51.07ID:XW9upEZ9 >>166
こんなことがかいてありましたね。
>>参考Access2010以降は、条件付き書式を3つ以上追加することができます。Access2007では、3つまでです。
もしかしたら、メニューからなら可能でVBAでは不可能なのかもしれませんね。そうだとしたら変な仕様ですね。
こんなことがかいてありましたね。
>>参考Access2010以降は、条件付き書式を3つ以上追加することができます。Access2007では、3つまでです。
もしかしたら、メニューからなら可能でVBAでは不可能なのかもしれませんね。そうだとしたら変な仕様ですね。
168デフォルトの名無しさん
2020/10/12(月) 22:03:49.00ID:SLKy4GhN 不可能とみるか、未対応と思うか 人それぞれ
クレバーなら文句を付けてるヒマ有ったら今できるベストな対応をして次に進んでる
クレバーなら文句を付けてるヒマ有ったら今できるベストな対応をして次に進んでる
169デフォルトの名無しさん
2020/10/12(月) 22:18:07.44ID:XW9upEZ9 おお、AccessとかVBAを勉強し始めた頃を思い出しますね。
ネットで誰かが質問すると必ず上から目線で罵詈雑言だったなあ。
知恵袋とかも酷かったなあ。
ネットで誰かが質問すると必ず上から目線で罵詈雑言だったなあ。
知恵袋とかも酷かったなあ。
170デフォルトの名無しさん
2020/10/13(火) 20:22:52.03ID:Jo0My/9g >そうだとしたら変な仕様ですね。
これが無かったら小言書かなかったけどな MS相手にどっちが上から目線なんだか
かてて加えて減らず口叩かれるとは いやはや
チラとWeb巡ったら難問袋小路問題で以前からあった疑問なのは判った
条件付き書式をVBAで制御するときに注意すること でググれば一番上に出てくるであろうサイトでは
2013をベースに「・・・すること」とか断言してるが、どうなんだ?
hatena さんのサイトでは別問題として画面がチラつくと仰ってる
そのサイトの途中にあるリンク先 ↓ (アドレス貼ると書き込みできないから省略
YU-TANG さんは既にアーカイブでしか見られないしVerも古いが
3つしかできないのを工夫で5つまで可能にしてる(らしい 詳細は未チェック)
そのサイトの最下段にあるリンク先 ↓ (ry
で、そこから誘導されたこちらもアーカイブなLebans 氏のサンプル(らしい 詳細は未チェック)
帳票フォームをサブクラス化して 云々 悪魔の技とYU-TANGさんは大絶賛してる
驚くことにアーカイブだがファイル落とせる
自分では必要に迫られたこと無かったから無頓着だったが、なるほどね みなさん悪戦苦闘してるんですね
これが無かったら小言書かなかったけどな MS相手にどっちが上から目線なんだか
かてて加えて減らず口叩かれるとは いやはや
チラとWeb巡ったら難問袋小路問題で以前からあった疑問なのは判った
条件付き書式をVBAで制御するときに注意すること でググれば一番上に出てくるであろうサイトでは
2013をベースに「・・・すること」とか断言してるが、どうなんだ?
hatena さんのサイトでは別問題として画面がチラつくと仰ってる
そのサイトの途中にあるリンク先 ↓ (アドレス貼ると書き込みできないから省略
YU-TANG さんは既にアーカイブでしか見られないしVerも古いが
3つしかできないのを工夫で5つまで可能にしてる(らしい 詳細は未チェック)
そのサイトの最下段にあるリンク先 ↓ (ry
で、そこから誘導されたこちらもアーカイブなLebans 氏のサンプル(らしい 詳細は未チェック)
帳票フォームをサブクラス化して 云々 悪魔の技とYU-TANGさんは大絶賛してる
驚くことにアーカイブだがファイル落とせる
自分では必要に迫られたこと無かったから無頓着だったが、なるほどね みなさん悪戦苦闘してるんですね
171デフォルトの名無しさん
2020/10/14(水) 02:48:02.48ID:zZVeC8zp accessは質問者に小言を言う人が多い印象。
いわゆるIT土方が多いからかねえ。
余談だけど世間に流通している商品のVBAを覗くとひどいコードの多さに驚く。そういうコードを書く人が質問者相手にがストレス発散してる気がするなあ。
いわゆるIT土方が多いからかねえ。
余談だけど世間に流通している商品のVBAを覗くとひどいコードの多さに驚く。そういうコードを書く人が質問者相手にがストレス発散してる気がするなあ。
172デフォルトの名無しさん
2020/10/20(火) 06:46:57.60ID:RpHsdUuc ACCESSは後継者が少ないから先輩面したくても出来ないって人が多いのでは。
私も後輩が欲しい。育成では無く先輩面目的で(だからダメなんだろうね)。
私も後輩が欲しい。育成では無く先輩面目的で(だからダメなんだろうね)。
173デフォルトの名無しさん
2020/10/23(金) 06:48:31.50ID:LIFEWQB+ Access2016を使っています
VBAを使いcsvファイルを取り込もうとしているのですが取り込み先のファイルの名前全てにピリオドが入っており、例1333.T.csv ピリオドが邪魔でファイル名を指定してもうまく取り込めません
何か良いアイデアはないでしょうか?
VBAを使いcsvファイルを取り込もうとしているのですが取り込み先のファイルの名前全てにピリオドが入っており、例1333.T.csv ピリオドが邪魔でファイル名を指定してもうまく取り込めません
何か良いアイデアはないでしょうか?
174デフォルトの名無しさん
2020/10/23(金) 17:06:19.46ID:jTOWYlOX csvファイルに名前付けのルールとかがあって、規則性があるなら Left Mid Right
辺りを交えて工夫 全く一貫性が無いとかなら . を ppp とかにリネームする工夫
https://soudan1.biglobe.ne.jp/qa2877385.html ←これってこと?
http://tsware.seesaa.net/article/214574472.html ←ここにもヒントが
辺りを交えて工夫 全く一貫性が無いとかなら . を ppp とかにリネームする工夫
https://soudan1.biglobe.ne.jp/qa2877385.html ←これってこと?
http://tsware.seesaa.net/article/214574472.html ←ここにもヒントが
175デフォルトの名無しさん
2020/10/24(土) 06:13:20.49ID:3Br09s+m >>173
私はファイル選択、コピー、インポート、コピーしたファイルの削除、と言う手順でデータを取り込んでます。
私はファイル選択、コピー、インポート、コピーしたファイルの削除、と言う手順でデータを取り込んでます。
176173
2020/10/24(土) 23:19:53.94ID:s9oXa8gi177デフォルトの名無しさん
2020/11/21(土) 02:09:02.77ID:OkL4O3GG ACCESS365?でadoの話。
昨日、テーブルメンテナンス用にプログラム書いて、テストでupdateメソッド行をコメントアウトして実行したのにレコードが更新されて焦った。幸い意図した通りの更新が出来たので問題は無かったのだが、こんな事有る?
昨日、テーブルメンテナンス用にプログラム書いて、テストでupdateメソッド行をコメントアウトして実行したのにレコードが更新されて焦った。幸い意図した通りの更新が出来たので問題は無かったのだが、こんな事有る?
178デフォルトの名無しさん
2020/11/21(土) 19:58:38.03ID:4nufVV0K 通常ではあり得ない動作ですから
accdbが破損しているか
思い違いしているか
じゃないですかねぇ
accdbが破損しているか
思い違いしているか
じゃないですかねぇ
179デフォルトの名無しさん
2020/11/22(日) 23:10:13.61ID:DuDUZZqW だよね、自分の事じゃなければ私もそう思う。明後日に追試してみます。
180デフォルトの名無しさん
2020/11/25(水) 18:43:23.08ID:q3XRT9ff >177
ADOだと、Updateメソッド実行しなくてもレコードが保存される条件があったはず
https://docs.microsoft.com/ja-jp/office/client-developer/access/desktop-database-reference/update-method-ado
>Update メソッドを呼び出すより前に追加中または編集中のレコードから移動すると、ADO によって自動的に Update が呼び出されて変更内容が保存されます。
ADOだと、Updateメソッド実行しなくてもレコードが保存される条件があったはず
https://docs.microsoft.com/ja-jp/office/client-developer/access/desktop-database-reference/update-method-ado
>Update メソッドを呼び出すより前に追加中または編集中のレコードから移動すると、ADO によって自動的に Update が呼び出されて変更内容が保存されます。
181デフォルトの名無しさん
2020/11/26(木) 22:16:38.24ID:jD11+CM5182デフォルトの名無しさん
2020/11/27(金) 16:20:14.12ID:j3fR6c+j レコード移動しないけど変更を保存したいときに必要だろう
183デフォルトの名無しさん
2020/11/29(日) 20:06:15.16ID:k+jvWZ30 >>182
それはそうね
それはそうね
184デフォルトの名無しさん
2021/01/11(月) 16:27:04.20ID:HFGgd7VU ACCESSのSQLでビット比較ってどうすればいいですか
(value & 0x10) == 0x10 みたいに特定のビットが立ってるか比較したいのですが
(value & 0x10) == 0x10 みたいに特定のビットが立ってるか比較したいのですが
185デフォルトの名無しさん
2021/01/11(月) 17:56:37.60ID:qzYYjSUA できるかわかりませんが、
(value and &H10) = &H10
だとダメですか?
(value and &H10) = &H10
だとダメですか?
186デフォルトの名無しさん
2021/01/12(火) 19:10:42.78ID:f1Ulh51r >>185
試してみます、ありがとうございます
試してみます、ありがとうございます
187デフォルトの名無しさん
2021/01/12(火) 19:16:56.91ID:f1Ulh51r ダメでした
andを&に変えてもダメでした
andを&に変えてもダメでした
188185
2021/01/12(火) 19:30:22.83ID:sGnBc5NV そっか、SQLのAND演算子になっちゃうのか… &も文字列の結合演算子とみなされちゃうのかな?
&H10のビット限定なら、
(value \ 16) MOD 2
でいけそうですが、他にもパターンがあるでしょうから…
&H10のビット限定なら、
(value \ 16) MOD 2
でいけそうですが、他にもパターンがあるでしょうから…
レスを投稿する
ニュース
- 【音楽】Perfume・あ~ちゃんの結婚相手「一般男性」は吉田カバンの社長・吉田幸裕氏(41) 高身長で山本耕史似 [Ailuropoda melanoleuca★]
- 日本行き空路49万件キャンセル 中国自粛呼びかけ 日本行きチケット予約の約32%に相当 ★4 [ぐれ★]
- 【サッカー】U-17日本代表、激闘PK戦制す 北朝鮮撃破で6大会ぶり8強入り U17W杯 [久太郎★]
- 【インバウンド】中国人観光客の日本での消費額は年間約2兆円超…中国政府は公務員の出張取り消し [1ゲットロボ★]
- 【サッカー】日本代表、ボリビアに3発快勝 森保監督通算100試合目を飾る…鎌田、町野、中村がゴール [久太郎★]
- XやChatGPTで広範囲の通信障害 投稿や閲覧できず [蚤の市★]
- 毒親「働かないでいつもゴロゴロして!」俺「…」毒親「あっ近隣に熊が出たって!」俺「ふぅ」毒親「どこ行くんだ」
- アンケート調査で「高市発言は問題なし」 93.5%wwwwwwwwwwwwwwwwwwwwwwwww [279254606]
- 生活保護の受給額ってなんでこんなに安いの?
- お前らは“スカイマイルタワー”建設計画を知っているか?
- これ誰か分かるか?
- 支払い詰まってインターネット止まった
