[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 2ch.scのread.cgiへ]
Update time : 07/20 17:29 / Filesize : 230 KB / Number-of Response : 792
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

Access VBA 質問スレ Part2



1 名前:デフォルトの名無しさん [2018/12/12(水) 22:14:39.18 ID:GF6Qf3Td.net]
Access の VBA に関する質問スレです

質問テンプレ(雛形)は用意しませんが、OSとAccessのバージョンぐらいは必ず書きましょう


前回のスレッド
Access VBA 質問スレ Part1
https://mevius.5ch.net/test/read.cgi/tech/1328536426/

75 名前:デフォルトの名無しさん mailto:sage [2019/03/19(火) 06:30:11.40 ID:4N2t7FIS.net]
みんなこっちにいるよ
https://mevius.5ch.net/test/read.cgi/tech/1432173164/

76 名前:デフォルトの名無しさん [2019/03/19(火) 23:41:14.03 ID:PLWGdEFL.net]
馬鹿でも仕事をしなきゃならない
そういう人は材料1,材料2,...でやれるなら
それでやってもらうしかない
頭いい奴だけで後は生活保護で構わない
とかで良いなら話は別だけど?
その辺を理解出来ないアホが多くて困る
正規化を理解しないでaccess使っている人間と種類的には同じ
自分がやれる事が一番と思って他を考えていない

77 名前:デフォルトの名無しさん mailto:sage [2019/04/25(木) 10:33:32.47 ID:I6sE8Jku.net]
32bitのAccess2016を使っています。
いままではinteger型で済むものはlong型にしてはいけない。メモリーの無駄遣いと思ってきました。
しかし、ベンチマークをとるとlong型の方が速いという主張を頻繁に見るようになりました。
数字は全部long型にした方がいいのでしょうかね?

78 名前:デフォルトの名無しさん mailto:sage [2019/04/25(木) 11:52:04.10 ID:vKKospK1.net]
>>77
昔々はそうだった
しかし、今はあり余るメモリをたらふく使って、高速にとか、プログラム書きやすくとかになってる。
(もちろん限度ってものはある)

昔は8bitや 16bit CPUだから、長い桁は時間かかった。今は 64bitなので、それ以下に収まれば充分高速。
(数億回ループするのは稀なので、あるなら都度ベンチ取ってロジックなど決めるといい)
SIMDにより多く詰め込めるとかもあるけど、VBAでは多分使われてないから気にしなくていい

わざわざ longに直す必要はない。これからは気にせず long使っていい

79 名前:デフォルトの名無しさん mailto:sage [2019/04/25(木) 15:22:48.68 ID:I6sE8Jku.net]
>>78
でも、longに直したくなりますよねw
標準モジュールは一括置換→保存で問題ありませんでしたが、
フォームでやってみたら、すぐにメモリー不足やら、フォーム破損が生じてしまいましたw

80 名前:デフォルトの名無しさん mailto:sage [2019/04/25(木) 17:43:41.51 ID:ImBWEqP9.net]
馬鹿に教えるとロクなことをしない例

81 名前:デフォルトの名無しさん mailto:sage [2019/04/25(木) 18:18:18.21 ID:I6sE8Jku.net]
実験用のコピーだよ。
楽しく実験するのがプログラミング上達の近道だと思うんだよね。

82 名前:デフォルトの名無しさん mailto:sage [2019/04/25(木) 20:40:48.35 ID:JpEf0ZAX.net]
>>81
実験は大切。失敗もベンチ取るのも身になる。
実験ソースや結果も Accessのテーブルに分類して残しとくんだぞ
(オレは、ソースはモジュールに置いて、コメントに結果を書いてたりもする。もちろん他言語などはテーブルやプロジェクトにしてなど)
カンペ作ったときみたいに忘れないもんだが、将来の追試や数値が役に立つ(まれに)

83 名前:デフォルトの名無しさん mailto:sage [2019/04/25(木) 22:25:13.99 ID:CJM7ooRn.net]
>>81
後付けの言い訳乙
実験するよう連中はこんなところで質問なんかせんわ



84 名前:デフォルトの名無しさん mailto:sage [2019/04/26(金) 05:09:51.54 ID:ebeJOjHo.net]
>>83
Access界隈っこういう人が多い気がするなあ。
実験用コピーじゃなかったら真っ青になってるだろうなw

85 名前:デフォルトの名無しさん mailto:sage [2019/04/26(金) 13:04:47.02 ID:azgsbPV3.net]
新人の頃は良く失敗した
数値フィールドをテキスト型で定義したり
データ、システム分離しなくてmdb破損させたり
手元の最新版壊して顧客PCまで最新版取りに戻ったり


86 名前:デフォルトの名無しさん mailto:sage [2019/04/26(金) 14:38:58.61 ID:xEyS3kHo.net]
>>85
オレも最初の頃壊れ(し)まくって、Accessなんて使いもんにならんやんと思った
dbだから、排他とかできるんだし、別々のフォーム触るなら、皆で開発できるやろと 1つの共有mdbで開発やってたw

規模によるけどシステム分離はわざわざしないな
分離するのは、sqlserverとかにするときだけだ

87 名前:デフォルトの名無しさん mailto:sage [2019/04/28(日) 22:30:01.14 ID:h9q8OTE0.net]
システム分離ってなんですか?
私もファイルが壊れてばかりで困ってます。

88 名前:デフォルトの名無しさん mailto:sage [2019/04/29(月) 11:11:13.24 ID:3KqibFAl.net]
>>87
データベースでデ−タをどうこうする部分と、デ−タそのものを分離するということでしょ。

テーブルとクエリやフォーム、レポートを別ファイルにするという意味だと思う。

89 名前:デフォルトの名無しさん mailto:sage [2019/04/29(月) 11:33:05.46 ID:lr8PSWgy.net]
>>87
>>88
テーブルとそれ以外に分けることです。
それ以外の方にはリンクテーブルを置いておけば、同じように処理できます。
複数人で同時にテーブル読み書きするときは定番のやり方です。
(一人でしか使わないなら、わざわざ分ける必要はありません)
テーブルの方はファイルサーバに、その他は各ローカルに置いて使います。

もう少し細かく言うと、ワークテーブルはそれ以外の方に含みます。

90 名前:デフォルトの名無しさん mailto:sage [2019/04/29(月) 11:38:37.49 ID:d82tlvl6.net]
>>89
横からすんみません。
一人でしか使わない場合もフォームのコントロールを弄くるのが好きな人は分離した方が良いと思います。
コマンドボタンの位置を変更しただけでフォームが消えてしまったことが何度もありますから、
一人で使用する場合もカスタマイズ好きならデーターは分離した方がいいと思います。

91 名前:89 mailto:sage [2019/04/29(月) 11:43:25.91 ID:lr8PSWgy.net]
>>89
ネットワークが遅い場合は、定数テーブルもローカルにとか、その辺は臨機応変に。

92 名前:89 mailto:sage [2019/04/29(月) 12:16:08.84 ID:lr8PSWgy.net]
>>90
最近は個人的な作成しかしなくなったので教えて下さい。
そのファイルはmdb、accdbどちらですか?
(拡張子が変わって壊れにくくなったかとか、何が変わってどう影響するか細かくは調べてないです)
そのdbファイルはローカル/ファイルサーバどちらに置いてましたか?

ここ数年はツール的な小さなものを、accdbをローカルで作成してますが、壊れた経験はないです。
1つのフォーム内で、各処理をフレームで分けてあり、フレーム内にはテキストボックスやボタンなどがあります。
フレーム単位で、あっちやこっちに頻繁に移動はしてます。
(それでも、過去の壊れてた経験から、数日に一回最適化とバックアップはとってます)

93 名前:デフォルトの名無しさん mailto:sage [2019/04/29(月) 12:36:13.73 ID:d82tlvl6.net]
>>92
mdbです。dbファイルもmdbでローカルです。
フロントエンド?(と言っていいのかしら?)が巨大で、100MBくらいあります。
業務用ソフトで中身は使用されていないゴミ変数やゴミプロシジャーが大量にあります。空のプロシジャーもある上に、それをcallしている謎のプロシジャーもあります。
str型の変数なのに、タイプするのが面倒くさかったのか、var型で宣言されている変数がこれまた大量にあります。



94 名前:89 mailto:sage [2019/04/29(月) 13:14:19.98 ID:lr8PSWgy.net]
>>93
ありがとうございます。
今でもmdbで作り込みが大きいのは壊れやすいんですね。
以前は、新mdbに全部インポートして、リフレッシュ(ゴミ除去)とかやってました。
(最適化より小さくなるから、何か効果はあるんじゃないかと思って。)

accdbに全部インポートして、参照設定修正という方法もあるけど、業務用だと完全に同じ動きするかと問われると保証できないので、難しいだろうし。
時間やお金出るなら(これからも使い続けるなら)、機能(部署)ごとに分割とか、accdbに徐々に移行(プロシージャ修正整理)とかやっていきたいところですね。

95 名前:デフォルトの名無しさん mailto:sage [2019/04/29(月) 13:47:50.96 ID:QxflDRVF.net]
SQLserver使おうぜ

96 名前:デフォルトの名無しさん mailto:sage [2019/05/04(土) 18:38:16.45 ID:ZGbBU4Ge.net]
Accessはフロントエンドに使う
DBはMySQLでも良い

97 名前:デフォルトの名無しさん [2019/05/05(日) 01:45:20.23 ID:PgstIp0W.net]
一度に大量で複雑な更新をすると落ちやすかった印象は有るかなぁ

98 名前:デフォルトの名無しさん mailto:sage [2019/05/07(火) 11:01:49.04 ID:S4maxKz5.net]
>>96
帳票とかからむと、手軽だもんな

99 名前:デフォルトの名無しさん mailto:sage [2019/05/08(水) 19:00:39.16 ID:PD4Nn61H.net]
Accessは何たって帳票の作成が超簡単!
これがあるから離れなれない。
LibreOfficeやOpenOfficeにも帳票作成ツールはあるけど、
Accessほど使い易くはないのが、移行できずにいる大きな要因の一つなのは間違いない。

100 名前:デフォルトの名無しさん mailto:sage [2019/05/11(土) 13:23:24.99 ID:J8lUk67b.net]
Office365でアプリアイコンが刷新されたがAccessは変わらない悲しみ

101 名前:デフォルトの名無しさん mailto:sage [2019/06/03(月) 01:57:41.37 ID:vn/O8vit.net]
access2016使ってて2013のランタイム入れたらaccessが使えなくなってびびったわ
あわててシステムの復元して直ったけど

102 名前:デフォルトの名無しさん mailto:sage [2019/07/17(水) 21:40:08.49 ID:/Hg4fKFx.net]
サブフォームのソースオブジェクトに、SQLを直接記入することはできないのでしょうか?
SQL文というものがそもそもオブジェクトでないから記入できないのでしょうか?

103 名前:デフォルトの名無しさん mailto:sage [2019/07/17(水) 22:16:32.17 ID:5Qt+TnNF.net]
Formのオープン時にそのサブフォームのおソースを放り込めばできる
あとはメインフォーム上でサブフォームをいぢるイベント時に書くとか 例えばボタン押した時など
サブフォームはソース無し にしてるけど、自分は  そこへ放り込むやり方だと出来てる



104 名前:デフォルトの名無しさん [2019/07/17(水) 22:25:51.54 ID:eXUk1Aqq.net]
>>102
ビュー定義してソースに設定したら?

105 名前:デフォルトの名無しさん mailto:sage [2019/09/28(土) 01:30:49.78 ID:XSiAgIby.net]
id  部門 販売品目
1  A  りんご
2  A  バナナ
3  A  りんご
4  B  バナナ
5  B  ぶどう
6  B  ぶどう
というテーブルから、
部署と販売品目が同じレコード数
(Aかつりんご、Aかつバナナ、Bかつバナナ、Bかつぶどう の数)をカウントしたいのですがうまくいきません。

販売品目単独では
SELECT 販売品目,Count(id)
FROM テーブル名
GROUP BY 販売品目
のようにすれば思うようにいくのですが、複数条件になると思うようにいきません。
お知恵を貸していただけないでしょうか。

106 名前:デフォルトの名無しさん mailto:sage [2019/09/28(土) 02:03:10.80 ID:hdiBTyMe.net]
SELECT 部門, 販売品目, Count(ID) AS IDカウント
FROM テーブル1
GROUP BY 部門, 販売品目
HAVING (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう")) ;

107 名前:デフォルトの名無しさん mailto:sage [2019/09/28(土) 02:08:15.90 ID:hdiBTyMe.net]
もしくは
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.79 ID:hdiBTyMe.net]
//シンプルにこれでもできたけどwhereの位置とか括弧とか間違えてない?
select 部門, 販売品目, count(ID) as カウント
from テーブル1
where (((部門)="A") AND ((販売品目)="りんご")
OR ((部門)="A") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="バナナ")
OR ((部門)="B") AND ((販売品目)="ぶどう"))
group by 部門, 販売品目

109 名前:デフォルトの名無しさん mailto:sage [2019/09/28(土) 06:33:14.21 ID:XSiAgIby.net]
>>106
ありごとうごぞいます。
説明が不十分でした。
たしかにそのとうり記述すればできるのですが、部門や販売品目が増えていった場合に、全組合せを書き出さないでやる方法はないものかと考えております。

110 名前:デフォルトの名無しさん mailto:sage [2019/09/28(土) 09:36:23.69 ID:hdiBTyMe.net]
まだ説明不足かと
組み合わせを指定しないと絞り込みはできないし
クエリビルダーでちゃちゃっと作った最小形が>>106
絞り込み条件のテーブルを他に作ってリレーションとる方法もあるけど

111 名前:デフォルトの名無しさん [2019/09/28(土) 21:47:53.70 ID:w31BDneZ.net]
>>105
要件定義すらまともに書けない馬鹿だからSQLの基本もわかっていないのかね?
どこにも部署なんてないのだが

112 名前:デフォルトの名無しさん mailto:sage [2019/09/28(土) 23:50:31.47 ID:Bvcc+55+.net]
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}}

113 名前:デフォルトの名無しさん mailto:sage [2019/09/29(日) 07:32:11.18 ID:V4rAOO4u.net]
>>111
いきってないで答えてやれよヴァカw



114 名前:デフォルトの名無しさん mailto:sage [2019/09/29(日) 09:35:48.11 ID:l54OkWQk.net]
AccessならGurupByしたクエリを名前を付けて保存しておくのが正解
サブクエ遅いから

115 名前:デフォルトの名無しさん mailto:sage [2019/09/29(日) 19:47:04.97 ID:mdCYdpYZ.net]
普通に部門販売品目でソートしてから
dynasetからvbaでカウントしたら駄目なの?
sql文を捏ね繰り回すよりその方が簡単な気がするけど?

116 名前:デフォルトの名無しさん [2019/09/30(月) 00:02:54.58 ID:ELYMfL9+.net]
質問者が一番馬鹿だが答える方も馬鹿ばっか

117 名前:デフォルトの名無しさん mailto:sage [2019/09/30(月) 00:24:58.55 ID:K8zar7Eh.net]
なのでこのカウントの質問、ここで終了!

118 名前:デフォルトの名無しさん mailto:sage [2019/09/30(月) 10:47:04.29 ID:6yDcPDBq.net]
どうしてもsql文でやりたいなら
他のsql系統のスレで聞いたほうが良いと思う
accessはsqlとvbaを組み合わせて使えるので
込み入り難いからやり易い面が有る
自分は割りとそういうやり方をしてしまう
けど他のリレーショナルデータベースはsqlを駆使しないといけない場面が多いだろうから
その手の方面の人の方がsql文に詳しい人が多いと思う
sql文の質問をしても構わないと自分は思うけど一応vbaスレなんで

119 名前:デフォルトの名無しさん [2019/09/30(月) 17:44:54.65 ID:3iMPvt2Ii]
難しく考え杉

選択クエリで
[部門]&[販売品目]のフィールド追加して
これをグループ化して集計すれば済むだろ?

120 名前:デフォルトの名無しさん mailto:sage [2019/09/30(月) 23:29:21.37 ID:GbU6Rrgw.net]
他のリレーショナルデータベースはもっとましな言語で使うんだよ

121 名前:デフォルトの名無しさん mailto:sage [2019/10/05(土) 14:25:32.14 ID:pEFp3YWl.net]
""とclearcontentsの違いが明らかになったな

122 名前:デフォルトの名無しさん mailto:sage [2019/10/05(土) 14:25:47.70 ID:pEFp3YWl.net]
誤爆です

123 名前:デフォルトの名無しさん mailto:sage [2019/10/22(火) 14:54:31.07 ID:Si05vw2X.net]
俺なら
SELECT [部門] & [果実] AS 式1, Count("HOGE") AS DUMMY
FROM テーブル1
GROUP BY [部門] & [果実];



124 名前:デフォルトの名無しさん [2019/10/30(水) 06:50:33 ID:q0119UkA.net]
普通の関数を使ったSQLがコンパイルエラーで通らなくなるのは、ずっとあるバグなの?
文字列中に含まれるスペースをなくした列同士を比較したいだけなのに

125 名前:デフォルトの名無しさん mailto:sage [2019/10/30(水) 08:05:14.44 ID:QrHO4Al6.net]
DBに上げる前のデータ加工はExcelとPowerBIについてくるPowerQueryで完結させる
DB自体は何でも良い
Accessはフロントエンド

こういう感じの運用が一番融通が利いて楽

126 名前:デフォルトの名無しさん mailto:sage [2019/10/31(木) 14:53:16.10 ID:3aW6/Vt0.net]
>>124
通ってたのが通らなくなったなら参照設定確認が最初の一歩

127 名前:デフォルトの名無しさん mailto:sage [2019/10/31(木) 16:05:52.19 ID:IlVblaPX.net]
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型 で宣言しています。どっちが正しいのでしょうか?

それと、プロパティーシートから 関数を呼び出すときに引数を省略できますか?エラーばっかり出てしまうので,不可能という気がしてきますが、実際はどうでしょうか?

128 名前:デフォルトの名無しさん mailto:sage [2019/10/31(木) 16:14:24.18 ID:IlVblaPX.net]
ひとつ解決しました。
ここ https://bettersolutions.com/vba/macros/optional-arguments.htm に Remember that IsMissing will only work with the Variant datatype. と書いてあるので、
IsMissingを使いたい場合にvariant型である必要があるだと思います。

プロパティーシートからcallするときに省略可能かどうかはまだわかりませんね。

129 名前:デフォルトの名無しさん mailto:sage [2019/10/31(木) 23:30:26.82 ID:IK0T1jez.net]
>>128
プロパティシートからでも省略できると思うよ
標準で使える関数でも省略できるから

130 名前:デフォルトの名無しさん [2019/11/06(水) 06:37:50 ID:jiZZUv+M.net]
IsNumeric 関数 VBA vba-auto.com/isnumeric_function_vba/

9CF

131 名前:デフォルトの名無しさん [2019/11/06(水) 06:37:51 ID:jiZZUv+M.net]
IsNumeric 関数 VBA vba-auto.com/isnumeric_function_vba/

9CF

132 名前:デフォルトの名無しさん mailto:sage [2019/11/12(火) 08:08:27.20 ID:n8VUgOjj.net]
スレチですまん。
俺はVBAをやってるが上司から言われました。(うちの部署、10名のうち、VBAを作れる人は二人だけ、、、)

AIが集計をしてくれるからEXCELは必要ない時代が来るねと言ってた。

反論出来る?

133 名前:デフォルトの名無しさん mailto:sage [2019/11/12(火) 09:07:34.81 ID:umlGYBnb.net]
高度なAIにVBAとか集計なんかやらせちゃ駄目だ。他に何もできない俺たちがやらなきゃな



134 名前:デフォルトの名無しさん mailto:sage [2019/11/12(火) 10:13:03.38 ID:n8VUgOjj.net]
>>132の者です。
EXCELとACCESSを間違えた、、、。
すみません。

135 名前:デフォルトの名無しさん mailto:sage [2019/11/12(火) 18:47:25.82 ID:ZiPBwNA/.net]
ここって禿げのおっさん来てるの?

136 名前:デフォルトの名無しさん mailto:sage [2019/11/12(火) 21:13:04.29 ID:hnHZ9bm+.net]
>>132
〉AIが集計をしてくれるからACCESSは必要ない時代が来るねと言ってた。

来ませんけど、未来のことなので証明はできません
なので、その理由を何かをしないことに最大限反論に活用するのが最も有効です

私がプログラムを始めた数十年前から、「コンピュータが発達したらプログラマーはいらなくなる」と言われていましたが、今でも慢性的に不足してますし、更には小学校(?)からプログラムを教えると

ちなみに自社でai使うことになっても、おそらく数百万円かかって、大して使い物にならないでしょう
ITに詳しくない人は、知識もないのに夢見過ぎです

複数データを組み合わせてサクッと結果求めたり、そこそこのアプリ(特にレポート活用)作るなら、今でもACCESSは最良の選択の一つだと思ってます。2.0くらいから今までそこかしこで使いまくってます

137 名前:デフォルトの名無しさん mailto:sage [2019/11/17(日) 21:57:31.66 ID:qBLyum9y.net]
エクセルに比べて、アクセスは過疎ってるなあ

138 名前:デフォルトの名無しさん mailto:sage [2019/11/18(月) 09:09:41.09 ID:8BxAA3e8.net]
あなたの禿にacc(ry

139 名前:デフォルトの名無しさん [2019/12/19(木) 22:11:03.53 ID:lRu+t2VS.net]
Access2010
印刷プレビューのリボンで「PDFまたはXPS」を押した際に出てくる
「PDFまたはXPS形式で発行」のダイアログを出すVBAコード教えてください。

140 名前:デフォルトの名無しさん mailto:sage [2019/12/20(金) 21:12:19.28 ID:NX/gzbot.net]
とりあえず自分でマクロの記録でそれらの操作をなぞって
それでできたブツを思う存分手直しして
そこで発生した問題を質問した方がいいかもな

Access遣いはおばーちゃんやおじーちゃん多いから
「イチからかよ」って思われると、誰も面倒がって答えたがらない

141 名前:デフォルトの名無しさん mailto:sage [2020/01/25(土) 09:08:10 ID:Ib3xGLkp.net]
Windows10、Office365のAccess16なんだけど、レポートプレビュー画面にボタンでもおいて、そこにイベントプロシジャーを設定したいんだけど、どうするのかな?
Access2003では簡単にできたんだけど、リボンがでてきたAccess2007以降出来なくなった気がするんだけど、どうなんだろう?

142 名前:デフォルトの名無しさん mailto:sage [2020/01/25(土) 10:20:39 ID:lx4KYteI.net]
あなたのハゲにサクセスしたい

143 名前:デフォルトの名無しさん mailto:sage [2020/01/25(土) 23:41:49 ID:Tl89GTzc.net]
>>141
ちょっと2003でそれをやるコード上げてみ



144 名前:デフォルトの名無しさん mailto:sage [2020/01/26(日) 13:49:02 ID:63OckB6o.net]
>>143
確か、カスタムメニューだったか、カスタムボタンを設定して、それにイベントプロシジャーを設定していた気がする。
アクセスキーを設定してプレビューを印刷して、プレビュー画面を閉じて、特定のフォームを起動して、特定のボタンやらテキストボックスにフォーカスを与えるとかやっていた気がする。
あれは実に便利だった。
Windows7が動いているPCが物置にあった気がするから確かめてみる。

145 名前:デフォルトの名無しさん mailto:sage [2020/02/06(木) 19:57:45 ID:djhx8w46.net]
会社で役割柄ツールを作ることになりまして、アクセスに入門しました
xlsxをインポート、それと同時にテーブルを作成するVBAは組めたのですが、同時にレコードが勝手にソートされてしまい、元データとレコードの順番が異なってしまうという問題に直面しています。
この場合、テーブル作成と同時にオートナンバーを設定するようにしたいのですが、docmd〜acimportdelimでは定義付けができません。
何か方法はありますでしょうか

インポートするxlsxは毎回ファイル名が異なる想定なので、保存したインポートを使うのは極力避けたいです

146 名前:デフォルトの名無しさん [2020/02/06(木) 22:52:24.69 ID:BV2yIT+0.net]
>>145
元データに順序列付けとき

147 名前:144 mailto:sage [2020/02/07(金) 06:55:52 ID:uUICGF6D.net]
>>146
そうですよね…
最終手段としてはそれを考えています

148 名前:144 mailto:sage [2020/02/07(金) 06:56:12 ID:uUICGF6D.net]
ありがとうございます!

149 名前:デフォルトの名無しさん [2020/02/07(金) 12:31:07 ID:etaMDs5Y.net]
>>147
最終手段というか、RDBの行の順序に意味を持たしちゃ行けないと言う基本理念

150 名前:デフォルトの名無しさん mailto:sage [2020/02/09(日) 18:52:02 ID:ISiAk6Az.net]
あなたのハゲにサクセスしたい

151 名前:デフォルトの名無しさん mailto:sage [2020/05/03(日) 05:34:51 ID:oxUHZhz1.net]
おはようございました
新型コロナでACCESSどころでは無いですね

152 名前:デフォルトの名無しさん mailto:sage [2020/05/23(土) 05:21:27.38 ID:GBVQ4WJe.net]
jetbeensのDataGripってアクセスでも使えるの?

153 名前:デフォルトの名無しさん mailto:sage [2020/05/24(日) 14:56:41.74 ID:nvA4FLS/.net]
>>152
jetbrainsでしょ



154 名前:デフォルトの名無しさん mailto:sage [2020/05/24(日) 14:58:32.86 ID:nvA4FLS/.net]
>>152
https://stackoverflow.com/questions/36820072/how-do-i-connect-a-ms-access-database-to-jetbrains-datagrip

155 名前:デフォルトの名無しさん mailto:sage [2020/06/12(金) 10:16:26.06 ID:wVr6YfiN.net]
全然ネットにもあがっていないけれど、Access2019の最新版で、DAOでレコードセットを作成して操作しようとすると
Accesが落ちるっていう現象を経験している人っていませんか?
32ビット版も64ビット版も同じ。

156 名前:デフォルトの名無しさん mailto:sage [2020/06/13(土) 00:26:56.61 ID:0QXppYe5.net]
Excelが2013というオチではなくて?

157 名前:デフォルトの名無しさん mailto:sage [2020/06/13(土) 23:26:59.26 ID:qOp00dJL.net]
そうでなくて、今まで動いていたのに最新のビルドになったら突然落ちるようになった。
前のビルと番号に戻したら動くのよ。
ADOでレコードセットを作成したときはどのビルド番号でも問題なし。

158 名前:デフォルトの名無しさん mailto:sage [2020/06/19(金) 09:37:07.67 ID:N2hJl/gn.net]
Application.SetOptionの引数一覧が知りたいのですが、誰か知りませんか

159 名前:デフォルトの名無しさん mailto:sage [2020/07/31(金) 18:27:45 ID:2hxJK6g2.net]
ヘルプデスクがスキルアップするため、プログラミング経験積むのにAccessVBAって合ってますか?

160 名前:デフォルトの名無しさん mailto:sage [2020/07/31(金) 18:46:19.97 ID:z2KmuaKZ.net]
まずヘルプデスクという職場でプログラミング経験積めるの?

161 名前:デフォルトの名無しさん mailto:sage [2020/08/01(土) 22:26:21.99 ID:kuObS2ra.net]
合ってるかどうかはわからんけど、それはありだな。
DBとPG、両方の知識が増える。

162 名前:デフォルトの名無しさん mailto:sage [2020/08/02(日) 01:27:11.88 ID:S6RTQlHT.net]
お前らどうやって勉強したの?
おいらADO勉強したいけどどの本読んでいいかわからないから勉強できてない。

163 名前:デフォルトの名無しさん mailto:sage [2020/08/02(日) 04:08:31 ID:dor5CoCv.net]
覚えるなら実務が一番早いと思いますが
独学なら簡単なものを作ってみると良いですよ
持ち物リストとか



164 名前:デフォルトの名無しさん mailto:sage [2020/08/04(火) 22:22:12.96 ID:j2qbL1qD.net]
持ち物リストですか、わかりました

165 名前:デフォルトの名無しさん mailto:sage [2020/08/07(金) 09:09:10.88 ID:QUQQ3BC/.net]
>>162
Google。
本で勉強したのは20年前かな。

166 名前:デフォルトの名無しさん mailto:sage [2020/10/10(土) 13:55:25.74 ID:aicjgH/E.net]
最近のAccessは条件付き書式の条件数が3つまでという制限がなくなったと聞いて、vbaで4つ条件を書いたら、怒られた。
条件数の上限の件はどうなっているの?

167 名前:デフォルトの名無しさん mailto:sage [2020/10/12(月) 19:42:49.57 ID:SLKy4GhN.net]
https://hamachan.info/win8/access/and.html#st-toc-h-3
なんだろ?もっかい見直してみ

168 名前:デフォルトの名無しさん mailto:sage [2020/10/12(月) 20:44:51.07 ID:XW9upEZ9.net]
>>167
こんなことがかいてありましたね。
>>参考Access2010以降は、条件付き書式を3つ以上追加することができます。Access2007では、3つまでです。

もしかしたら、メニューからなら可能でVBAでは不可能なのかもしれませんね。そうだとしたら変な仕様ですね。

169 名前:デフォルトの名無しさん mailto:sage [2020/10/12(月) 22:03:49.00 ID:SLKy4GhN.net]
不可能とみるか、未対応と思うか 人それぞれ
クレバーなら文句を付けてるヒマ有ったら今できるベストな対応をして次に進んでる

170 名前:デフォルトの名無しさん mailto:sage [2020/10/12(月) 22:18:07.44 ID:XW9upEZ9.net]
おお、AccessとかVBAを勉強し始めた頃を思い出しますね。
ネットで誰かが質問すると必ず上から目線で罵詈雑言だったなあ。
知恵袋とかも酷かったなあ。

171 名前:デフォルトの名無しさん mailto:sage [2020/10/13(火) 20:22:52.03 ID:Jo0My/9g.net]
>そうだとしたら変な仕様ですね。
これが無かったら小言書かなかったけどな MS相手にどっちが上から目線なんだか
かてて加えて減らず口叩かれるとは いやはや

チラとWeb巡ったら難問袋小路問題で以前からあった疑問なのは判った
条件付き書式をVBAで制御するときに注意すること でググれば一番上に出てくるであろうサイトでは
2013をベースに「・・・すること」とか断言してるが、どうなんだ?
hatena さんのサイトでは別問題として画面がチラつくと仰ってる
そのサイトの途中にあるリンク先 ↓ (アドレス貼ると書き込みできないから省略
YU-TANG さんは既にアーカイブでしか見られないしVerも古いが
3つしかできないのを工夫で5つまで可能にしてる(らしい 詳細は未チェック)
そのサイトの最下段にあるリンク先 ↓ (ry
で、そこから誘導されたこちらもアーカイブなLebans 氏のサンプル(らしい 詳細は未チェック)
帳票フォームをサブクラス化して 云々 悪魔の技とYU-TANGさんは大絶賛してる
驚くことにアーカイブだがファイル落とせる

自分では必要に迫られたこと無かったから無頓着だったが、なるほどね みなさん悪戦苦闘してるんですね

172 名前:デフォルトの名無しさん mailto:sage [2020/10/14(水) 02:48:02.48 ID:zZVeC8zp.net]
accessは質問者に小言を言う人が多い印象。
いわゆるIT土方が多いからかねえ。
余談だけど世間に流通している商品のVBAを覗くとひどいコードの多さに驚く。そういうコードを書く人が質問者相手にがストレス発散してる気がするなあ。

173 名前:デフォルトの名無しさん mailto:sage [2020/10/20(火) 06:46:57.60 ID:RpHsdUuc.net]
ACCESSは後継者が少ないから先輩面したくても出来ないって人が多いのでは。
私も後輩が欲しい。育成では無く先輩面目的で(だからダメなんだろうね)。



174 名前:デフォルトの名無しさん mailto:sage [2020/10/23(金) 06:48:31.50 ID:LIFEWQB+.net]
Access2016を使っています
VBAを使いcsvファイルを取り込もうとしているのですが取り込み先のファイルの名前全てにピリオドが入っており、例1333.T.csv ピリオドが邪魔でファイル名を指定してもうまく取り込めません
何か良いアイデアはないでしょうか?

175 名前:デフォルトの名無しさん mailto:sage [2020/10/23(金) 17:06:19.46 ID:jTOWYlOX.net]
csvファイルに名前付けのルールとかがあって、規則性があるなら Left Mid Right
辺りを交えて工夫  全く一貫性が無いとかなら . を ppp とかにリネームする工夫
https://soudan1.biglobe.ne.jp/qa2877385.html  ←これってこと?
tsware.seesaa.net/article/214574472.html ←ここにもヒントが






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

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<230KB

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