[過去ﾛｸﾞ] Access VBA 質問スレ Part1 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡
922(1): 2018/07/23(月)10:05 ID:86GO4HnW(1) AAS
連番（数値型）を繰り返し入力させる方法が分かるのなら、
1=Aさん、2=Bさん、…っていうテーブル用意しておいて、
連番振ったあと更新クエリで文字列を更新させるのは駄目ですか？
923: 2018/07/23(月)10:21 ID:eU1p7hr8(1) AAS
autoincrement
924: 2018/07/27(金)08:00 ID:G5saNUly(1) AAS
20人程度が1つのテーブルにそれぞれ10分間隔くらいでUPDATE INSERTをしているんですが、突然テーブルが開けなくなりました
「他者が開いています」というメッセージが出て開くことやコピーすら出来なくなりました
対策やこの症状が出た時の対処方法はないのでしょうか？
フロントエンドとしてユーザーの数だけUI用のAccessファイルを準備して、
バックエンドはテーブル1つだけのAccessファイルを置いています
925(1): 2018/07/27(金)12:49 ID:ASV/JfNN(1) AAS
そうなる前に、誰かがなんかのエラーを発してるはず
或いはエラーを殺しちゃってるかどうか
大概マズイことには口を噤むのが社畜の習い性
エラーにならないよう対策するか、エラー時に対策するか
コピーすらできないなら、サーバー側での対策として
バックアップ時に戻すか
そのファイルさえ救出出来たら修復できるんだろうけど
926(1): 2018/07/27(金)13:38 ID:rdFKIS0q(1) AAS
共有数の制限の気がするけど
そのバックエンドのアクセスファイルはどこでどうやって共有してるんだよ
927: 2018/07/27(金)17:29 ID:hf+c8Fmp(1/2) AAS
919です
返答が遅くなってしまい申し訳ありません
>>921
解決しました
元々テーブルに連番が振ってあったので、それを利用して
sqlのswitch文とmodを使ってます
リストボックスで選択した担当者を配列に格納して
省9
928: 2018/07/27(金)17:35 ID:hf+c8Fmp(2/2) AAS
>>925
先日は事前に取っておいたバックアップまでロールバックして対処しました
未だにエラーの原因が分からないので
不具合が起きた時の対策とバックアップ頻度を上げるような
業務フロー(タイマー関数含む)を追加しようと思います
開けなくなったファイルは日を跨いだら開けるようになりました
恐らく誰かが気づかずにバックグラウンド掴んでる状態だったんだと思います
省8
929(1): 2018/08/11(土)16:51 ID:/3QviRkj(1/2) AAS
質問です。
分割フォームの
分割フォームデータシートプロパティを
VBAから操作できる方法がありますでしょうか？
ご教授お願い致します。
930(1): 2018/08/11(土)18:04 ID:MwiIaP9n(1) AAS
具体的なプロパティもわからんしお休みなのでパソコンも手元にないけど検索したらsplitformsize のvba コードがあるから何らかの操作は出来るんでないの？お盆モードの適当コメントですまぬ。
931: 929 2018/08/11(土)18:45 ID:/3QviRkj(2/2) AAS
>>930さん
ありがとうございます！
splitform vbaで調べていたら見つかりました！！
うれしいです！
Private Sub コマンド11_Click()
If Forms("test").SplitFormDatasheet = acDatasheetReadOnly Then
Forms("test").SplitFormDatasheet = acDatasheetAllowEdits
省7
932: 2018/08/23(木)22:05 ID:VOAIsull(1/2) AAS
サイズの限界まで巨大化しているフォームを改造して､様々なコントロール類をタブコントロール上に配置しようと考えています。
元のフォーム上のコントロール類をコピーしてタブコントロール上にペーストしたまでは良かったのですが､イベントプロシジャーがごっそり抜け落ちています。コマンドボタンを押してもなにも始まらない状態です。
イベントプロシジャーを保持したままコントロールをコピペする方法はありますか？
933(1): 2018/08/23(木)22:21 ID:VOAIsull(2/2) AAS
解決しました。
外部ﾘﾝｸ:bytes.com
934: 2018/08/24(金)06:25 ID:zBeCnEZ1(1) AAS
>>933
良かったね。
俺はVBA コードを頑張ってコピーしてるのでよかったら解説下さい。えーごわからないので。翻訳機能?あの人たちとは話が合わん！
935: 2018/08/24(金)09:58 ID:IIPiSmN7(1) AAS
Accessの本はいろいろ買ったけど､良書だなあと感心したのはほとんどが未翻訳の洋書でした。
谷尻､緒方､葛西も和書としては悪くないのですが､洋書と比較すれば月とスッポンです。
技術書の英語は辞書とgoogle翻訳でだいたいなんとかなりますよ。
たまに文学的表現があってイラッとしますけど､だいたいが簡単明瞭です。
936: 2018/08/24(金)10:46 ID:jVqNqoKW(1) AAS
すいません質問です。オフィス365です。
手動で空のサブレポートをレポートに配置しました。これをVbaコード でコピーする方法を教えてくださいませ。
937(1): 2018/08/30(木)13:16 ID:onaqxfsR(1/2) AAS
すみません、質問させてください。
ExcelからAccessの特定のフォーム
を閉じるとき、
DoCmd.Close acForm, "フォーム名"
で入れると、おそらくacFormがAccessVBAの引数のためか、
エラーが出てしまいます。
何か解決方法があればご教授よろしくお願いします。
938(1): 2018/08/30(木)13:20 ID:S/vwwZyF(1) AAS
アプリが違うからOLEとかActiveXObject使うんでは
939: 2018/08/30(木)14:29 ID:4drhoSMA(1) AAS
>>937
acForm=2なので、acFormじゃなく直接2を指定してみると上手く行くかも
DoCmd.Close 2, "フォーム名"
↑でやってみて
940: 2018/08/30(木)16:02 ID:onaqxfsR(2/2) AAS
>>938さん、939さん
ありがとうございます。
939さんの方法でいけました。
ありがとうございますm(_ _)m
番号で指定する方法があったのですね。
感謝です。
941: 2018/08/30(木)23:00 ID:NGm4WU4A(1) AAS
Access.AcObjectType.acForm が 2
942(4): 2018/09/13(木)01:52 ID:iAlG4Fvk(1) AAS
アホな質問ですまん。
クエリの中でクエリを複数使うクエリを作成したんだけど、これをSQLに書き直すときにエイリアスを使いたいんだけど、クエリに対するエイリアスは使えるのかな？テーブルだけかな？
実験した感じではダメそうなんだけど、どうですか？
943: 2018/09/13(木)03:14 ID:liq2Qruq(1/2) AAS
>>942
普通に使えるはずだが
AS付けてないとか
944: 2018/09/13(木)03:15 ID:liq2Qruq(2/2) AAS
DAO経由じゃないとだめだったかも
945: 2018/09/13(木)12:56 ID:C2gZ+hmS(1/2) AAS
>>942
普通に出来るはずだぞ
どういう状況でダメになってるんだ？
946: 2018/09/13(木)13:07 ID:C2gZ+hmS(2/2) AAS
>>942
サブクエリの話だよな？
自作ツールで確認したがASで普通にできてたぞ
947(1): 2018/09/14(金)08:17 ID:JMy0VfN7(1/2) AAS
たぶん、サブクエリじゃなくて作成済みのクエリをSQL内部のFROM句やJOIN句にテーブルのように使う時にエイリアスを使いたいという話だと思うんだが、それでも普通に使えると思う。
948: 942 2018/09/14(金)11:04 ID:cjIZJ/+q(1/6) AAS
みんな、ごめん。使えました。
おいらがSQLビューで書くときに、どっか間違えたみたい。
クエリのエイリアスも使えるし、サブクエリでネストも出来るし、accessって凄いね。糞長いSQLを書きたくなるね。
問題は余計な括弧がいっぱいくっつくところだよね。
949: 2018/09/14(金)12:54 ID:cjIZJ/+q(2/6) AAS
またまたくだらない質問です．
UPDATEで苦労していますが，外部ﾘﾝｸ:www.ipentec.com に書いてある
update working set value=price from products where working.name = products.name
だとエラーが出ます．試行錯誤して成功したのは
UPDATE working, products SET working.[value] = [products].[price]
WHERE (((working.name)=[products].[name]));
でした．UPDATEの述語に参照するだけのproductテーブルが書いてあるのが不可解ですね．
省1
950(1): 2018/09/14(金)13:41 ID:5xDSXwp0(1) AAS
fromが無いから
951(1): 2018/09/14(金)15:43 ID:cjIZJ/+q(3/6) AAS
>>950
FROMを書きました．下のようにしました．でも，演算子がありませんと怒られます．
UPDATE [working],[products]
SET [working].[value] = [products].[price]
FROM [products]
WHERE ((([working].[name])=[products].[name]));
952: 2018/09/14(金)15:43 ID:cjIZJ/+q(4/6) AAS
これも同じように怒られます．
UPDATE [working]
SET [working].[value] = [products].[price]
FROM [products]
WHERE ((([working].[name])=[products].[name]));
953(1): 2018/09/14(金)18:33 ID:JMy0VfN7(2/2) AAS
それだと[products].[price]の後が何だか分からん。
[products].[price]を求めるSQLをそのまま書くかJOIN使った方が良い。
UPDATE [working]
SET [working].[value] = (SELECT [products].[price]
FROM [products]
WHERE ((([working].[name])=[products].[name])));
UPDATE [working]
省4
954(2): 2018/09/14(金)20:41 ID:cjIZJ/+q(5/6) AAS
>>953
上のは，更新可能なクエリであることが必要です と怒られました．
下のは成功です．ありがとうございます．
FROMを記載したコードでは出来ないというのが興味深いですね．
クエリーと一般のSQLではコードを処理する方法がかが違うんですかね？
聞きかじりですが，オプティマイザとか実行計画とか言う奴ですかね？
次はクエリを参照するUPDATEを書かないといけないのですが，テーブルならOKでクエリでは怒られるんですよね．
省2
955: 2018/09/14(金)21:06 ID:wdFP/Mir(1/2) AAS
>>951
横入だがAccessがUPDATEでのFROMを
サポートしていないという意味での「FROMがないから」
じゃないの？
956(1): 2018/09/14(金)21:11 ID:wdFP/Mir(2/2) AAS
>>954
確かAccessはUPDATEでFROMは使えないぞ
957: 2018/09/14(金)21:32 ID:cjIZJ/+q(6/6) AAS
>>956
マジすか？ありがとうございます．
SQLって方言が多いんですね．
958: 2018/09/15(土)02:34 ID:7Yaecm93(1) AAS
UPDATE文は特に方言が多いんだよ
959: 2018/09/15(土)11:35 ID:AVfR6YnT(1) AAS
>>954
更新クエリに設定しろ
960: 2018/09/16(日)09:41 ID:o5IUt/R9(1) AAS
昔はオラクルとかに直接更新クエリ実行しようとして固まってたなあ、、、
ハード性能上がった今でも固まるのかね?
961: 2018/09/16(日)16:10 ID:qqKBC7cw(1) AAS
リンクテーブルに対して何かするのを「直接」とは言わないからな？
962: 2018/09/16(日)18:15 ID:HF0YmRsW(1) AAS
アスペですね
963(1): 2018/09/16(日)19:05 ID:8jdJAOdP(1/2) AAS
それ以前に、ハード性能で固まったことなんてないんだが
単に遅いだけで固まったって言ってるのかね
964(2): 2018/09/16(日)19:27 ID:yPlmt9/8(1) AAS
>>963
初代ペンティアムマシンでAccess97で動かした事無い人かな
965: 2018/09/16(日)20:39 ID:fj0Djq38(1) AAS
>>964
それは何自慢？俺は20年前からACCESS やってるベテランだぞすごいだろう？
966: 2018/09/16(日)22:05 ID:8jdJAOdP(2/2) AAS
>>964
だからそれは単に遅いだけだろうと言ってるんだが
ついでに言えば、ACCESSで外部DBMS使うときに一番気を付けるべきは回線の速さだがな
その環境でも、100MのLANならそれなりに快適だったわ
967: 2018/09/17(月)18:07 ID:l9KryutO(1) AAS
486DXでAccess95とか動いたっけ
968: 2018/09/17(月)19:52 ID:3YPJfo/c(1) AAS
多分動いたと思う。
ペンティアム90では確実に動いた。
当時486DX100マシンにOffice入れてたと思うんだが、そのマシンでAccess動かしたかどうかで記憶が無い。
969: 2018/09/18(火)01:29 ID:Bq/PEIsn(1) AAS
Windows95が動いてたからOFFICEの95も動いてたと思う
970(1): 2018/09/18(火)19:14 ID:32W6TMTL(1) AAS
マハーポーシャの思い出しかないわ
971: 2018/09/18(火)21:06 ID:Y+CFjjh5(1) AAS
>>970
出張でアキバ行ったらチラシ貰った。あんな事件起こすなんて夢にも思わず、スペックのわりに安いじゃんなんて思ってたわ。
972(1): 2018/10/15(月)12:32 ID:UJZpBNX3(1/2) AAS
DAOでmdbに接続して､フォーム上のコントロールボタンのCaptionを大量に一括変更したいんだけど､できるかな？
データーベースオブジェクトのメンバーのリストを眺めてもフォーム関連がないので､だめなのかな？
973: 2018/10/15(月)13:28 ID:L3fZFxj5(1/2) AAS
>>972
COMオブジェクト生成で
Application→Forms→Form→Controls→Control
ってたどる感じかな
最近どうなってるか知らん
外部ﾘﾝｸ:docs.microsoft.com
974(1): 2018/10/15(月)19:00 ID:UJZpBNX3(2/2) AAS
リンクが死んでいて読めません。
ネット探しても情報が見つかりませんね。
パッチを当てるときに便利な気がするのですが…
私が知ってるパッチはモジュールやフォームを入れ替えるものばかりですが､一部編集みたいなことが出来ると便利な気がしますがどうでしょうか。
コードを1行書き換えとか出来ると便利な気がしますが､リスクもありそうですね。
975: 2018/10/15(月)23:32 ID:L3fZFxj5(2/2) AAS
>>974
MSのURLは2chのリンク表示と相性が悪いからクリック
カッコまで全部コピーしてブラウザに貼りつけないと付けると飛べるぞ
ラベルを外部リソースにしてフォーム側で呼び出すのが正攻法な気がするが
多言語対応とか
976: 2018/10/16(火)07:11 ID:o1jBtF96(1) AAS
DAO で接続じゃなぁ
977: 2018/10/16(火)19:50 ID:nNSV5Ror(1) AAS
接続は別になんでもいいです。
978(1): 2018/10/22(月)12:14 ID:9BvHUkZ3(1) AAS
マクロの編集をVBAで出来ませんかね？バージョンアップの際にカスタマイズ済のAutokesyを再現したいもので。
979(1): 2018/10/23(火)14:44 ID:qJAZHzzr(1) AAS
>>978
出来る、何年か前に前の勤め先でやったわ
あまり覚えてないが、VBEにアクセスする方法があって
それで出来たと思う
ググりながらやった覚えがあるからググれば
何かヒントが出てくると思う
980: 2018/10/23(火)17:12 ID:D922t3yz(1) AAS
>>979
saveastextですね。あれ､最近のoffceだとゴミコードが1行あって､そのままでは読み込めないんですよね。
981: 2018/12/04(火)21:13 ID:TBSeaia1(1) AAS
業務用ソフトでどこからもGOTOされていないラベルがあるんだけど､作った奴は馬鹿なのかな？
982: 2018/12/05(水)13:19 ID:2sSegHBZ(1/2) AAS
いくらでもある
983: 2018/12/05(水)14:21 ID:8B064Egy(1/2) AAS
そうですか…
宣言だけして使わない変数や､空のプロシジャー､その空のプロシジャーを呼び出す無意味なプロシジャー､戻り値を変数に格納だけしてなにも利用しない関数とか意味不明なことが多くてPGの世界ってカオスなんだな。
リーダブルコードとかだと絶対に怒られるようなことが目白押しだわ。
984: 2018/12/05(水)14:51 ID:2sSegHBZ(2/2) AAS
理想と現実は違う
985: 2018/12/05(水)15:58 ID:Tdi7Zg1z(1) AAS
そう、動きゃいいんだから
見た目なんか気にしてたら絶対に間に合わない
986: 2018/12/05(水)17:29 ID:8B064Egy(2/2) AAS
なるほど…
カスタマイズしている方からすると添削をしているよう気分になりますね。
稼働しているコードの何倍もあるコメントアウトされた過去コードとかあって､正にべからず集みたいなもんですね。
987(1): 2018/12/05(水)17:34 ID:kX9gokKe(1) AAS
実際問題
中身はgdgd
外部ﾘﾝｸ[html]:www.filemaker.com
988(1): 2018/12/07(金)12:18 ID:RZ2R69DU(1) AAS
>>987
FileMakerはスクリプト(マクロ)しか無いからな
989: 2018/12/07(金)18:12 ID:Uga2tmpi(1) AAS
>>988
両方そなわってたら、Accessを潰せてたのにね。
990: 2018/12/10(月)21:20 ID:WdAp4299(1) AAS
マクロのAutokeysが急にキーを取りこぼすようになった。F1を押すとプロシジャーの実行をしてくれないでHELPが立ち上がる。
F2等をおしても無反応になってしまった。officeのアップデートが原因かな？WIN7とAccess2016の組み合わせなんだけど分かる人いますか？
991(1): 2018/12/11(火)13:04 ID:eQLW3H68(1) AAS
Access最近アプデしてないな
古いのまだ使ってる
992: 2018/12/11(火)18:13 ID:fkccCnsx(1) AAS
>>991
2013使ってるならアプデする意味がほぼないし
993(2): 2018/12/11(火)19:29 ID:cP19L9C3(1) AAS
２０年くらい前はAccessファイルはいつ壊れるかわからない。
って言われてたけど、いまってどうなの？
994: 2018/12/11(火)21:03 ID:OP7GyNdd(1) AAS
>>993
今は壊れることはなくなったよ。
995: 2018/12/11(火)21:35 ID:kFp89+PJ(1) AAS
いつの間にかデータアクセスページなくなったの？
996(1): 2018/12/11(火)23:24 ID:ADs7qBab(1) AAS
>>993
同じだと思うよ。いつもは動くプロシジャーが変な挙動するようになってそのうち､フォームが全部消えちゃうとか何度もあった。というかこの1週間でもあったよ。本当にポンコツだよ。
とはいえ､ここまでカスタマイズが自由に出来るDBって他に無いような気がするけど､どうなんだろう。
997: 2018/12/12(水)00:19 ID:GF6Qf3Td(1) AAS
WindowsFormの不自由さにはびっくりしたな
998: 2018/12/12(水)10:51 ID:I3Mp/+TW(1/3) AAS
いまはIMEの辞書が良く壊れるイメージ
999: 2018/12/12(水)10:53 ID:I3Mp/+TW(2/3) AAS
>>996
小規模のシステムでも
テーブル用のmdbとフォーム用のmdbを分けて
リンクで管理すると壊れるケースはかなり減った
1000: 2018/12/12(水)10:53 ID:I3Mp/+TW(3/3) AAS
次スレはよ
1001(1): 1001 ID:Thread(1/2) AAS
このスレッドは１０００を超えました。
新しいスレッドを立ててください。
life time: 2500日 11時間 59分 41秒
1002(1): 1002 ID:Thread(2/2) AAS
5ちゃんねるの運営はプレミアム会員の皆さまに支えられています。
運営にご協力お願いいたします。
───────────────────
《プレミアム会員の主な特典》
★ 5ちゃんねる専用ブラウザからの広告除去
★ 5ちゃんねるの過去ログを取得
★ 書き込み規制の緩和
省7
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.026s