[過去ﾛｸﾞ] Access VBA 質問スレ Part1 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
100(1): 桃白白 2013/04/13(土)02:40 AAS
>>99
Function marume(ByVal s As Double) As Double
Dim Q As Double
Dim H As Double
Q = TimeValue("0:15")
H = TimeValue("0:30")
省6
101(1): 2013/04/13(土)17:33 AAS
>>100
フォームの[実時間]の時間によって[時間]に結果を出す場合で、
Function 時間(ByVal 実時間 As Double) As Double
Dim Q As Double
Dim H As Double
Q = TimeValue("0:15")
H = TimeValue("0:30")
省8
102(1): 桃白白 2013/04/13(土)20:28 AAS
>>101
あら。結果がずれてた？ それともなんか変な動きした？
引数の形式が違うのかな。どういう入力でどう出力された？
103(1): 2013/04/13(土)21:29 AAS
>>102
[開始時間]に入力、[終了時間]に入力後、
時間の差を[実時間]に表示し、これを基に[時間]に結果を表示したい、という流れですが、
フォームを開くだけで以下の、
「イベント プロパティに指定した式 読み込み時でエラーが発生しました：
このメンバー識別子は既にオブジェクトモジュールの中に存在しています。」
※マクロ名、ユーザー定義関数、[イベント プロシージャ]以外の式が指定されています。
省2
104(1): 桃白白 2013/04/14(日)01:59 AAS
>>103
コントロールの名前と関数の名前が競合してるんでない？
コントロールと関数を別の名前にしてコントロールソースで紐付けて
やっちゃえばいいよ。こんな感じで。
Database1.zip download
外部ﾘﾝｸ:kie.nu
105: 2013/04/14(日)14:28 AAS
>>104
うわー、ファイルのアップまでしていただき本当にありがとうございます。
テーブルに記録しておく必要があったため、
Private Sub 終了時間_AfterUpdate()
時間 = Marume(実サービス時間)
End Sub
ということで全てスッキリしました。
省3
106: 2013/04/19(金)11:54 AAS
フォームのプロパティにある「コード保持」って何でしょうか？
「はい／いいえ」はどのように使い分けるのでしょうか？
107(1): 2013/04/19(金)12:30 AAS
存在しないオブジェクトに関連したコードを不要になったときに自動で削除する機能がある
たとえば"ボタンA"をクリックしたときのコードを書いてある状態で
あとで"ボタンA"を"ボタンB"に名称変更したりしたときに
コード保持が「いいえ」だと"ボタンA"をクリックしたときのコードは捨てられる
108(1): 2013/04/19(金)16:04 AAS
どもです
つまりコード保持は、名称変更をした際に以前のコードが消えても良い
または名称変更は絶対にしないような状況であれば、「いいえ」を選択しておいても良い
と言うことで間違いないですか？
どこかで「いいえ」にした方が速度が速くなる的なことが書いてあった覚えがあるので･･･
109(1): 2013/04/19(金)16:43 AAS
>>107
名前の自動修正オプションとこんがらがってないか？
>>108
コード消えるのはフォームかレポート単位だぞ
名前変更とか関係なくて、そのフォームのコード全部消えるぞ
ヘルプにはコードが無いからいいえの方が処理が早いとは書いてあるな
その分制約もあるが
省1
110: 2013/04/22(月)10:00 AAS
>>109
遅くなりましたが、ありがとです
試しにフォームを作成時に、「いいえ」を選択しておいた状態で
イベントプロシージャを設定してみました。
その時点で自動的に「はい」に切り替わるんですね。
そしてコードを使うフォーム、レポートが１０００個を超えるものは作れないと言う事なんですね。
勉強になりました。
111(1): 2013/04/25(木)11:56 AAS
ﾀﾌﾞｺﾝﾄﾛｰﾙでﾍﾟｰｼﾞ5枚作る。
ﾁｪｯｸﾎﾞｯｸｽによって表示ﾍﾟｰｼﾞ数を切り替えたい。
・ﾁｪｯｸなし ： ﾍﾟｰｼﾞ1〜ﾍﾟｰｼﾞ5
・ﾁｪｯｸあり ： ﾍﾟｰｼﾞ2〜ﾍﾟｰｼﾞ4
そのため、ﾁｭｯｸﾎﾞｯｸｽのｲﾍﾞﾝﾄﾌﾟﾛｼｰｼﾞｬで、一旦全部のﾍﾟｰｼﾞを非表示にして
そのあと、必要なﾍﾟｰｼﾞを表示するようにしてみました。
For i=0 To 5
省9
112: 111 2013/04/25(木)12:00 AAS
忘れてましたがﾀﾌﾞの背景色を変更したいので
ﾀﾌﾞｺﾝﾄﾛｰﾙのﾌﾟﾛﾊﾟﾃｨで「ﾃｰﾏの使用」を「はい」に設定してあります。
113: 2013/04/25(木)14:29 AAS
消す前に違うページを選択すれば良いだけじゃないのか？
114(1): 2013/05/21(火)13:36 AAS
チェックボックスの true が -1 から 1 に変わったようです
2007からでしょうか？
変更がめんどくさい
115: 2013/05/22(水)11:48 AAS
>>114
2003と2007で試したけど非連結で画面でチェックした場合はどちらも-1になる
ただし、コードで1をセットしたら1のままだった
まず1をセットするコード書くのが悪い
そして、1でも-1でもBooleanとして評価したらTrueなんだから
そんな事に影響されるコード書くのが悪い
116: 2013/05/22(水)14:18 AAS
>チェックボックスの true が -1 から 1 に変わったようです
>2007からでしょうか？
キリっ
117: 2013/05/22(水)14:27 AAS
知らんがな
ってレスしようと思ったけど
かわいそうなので放っといた
118(1): 2013/06/04(火)02:35 AAS
月曜会社を休んで家で土曜から月曜までVBAをひたすら書き続けた結果
頭が超重くなって3日目は何やってるかよくわからないまま終わってしまった
VBAのコーディングをぶっ通しでやるのは2日が限界か？
119: 2013/06/05(水)22:11 AAS
>>118
限界は人それぞれだろうが、無理はすんなよ
120(1): 2013/06/21(金)00:57 AAS
access 2003 にて
SendObjectメソッドを利用して、メールを送信したいと思っています。
実際にメールを送れるようにはなっているのですが、
送信メール本文に「mdbファイルと同一ディレクトリにある単体の.msgファイルの本文」（.msgファイルの場所はフルパス指定でも構いません）
を表示させる事は可能でしょうか？
イメージ的には、テーブルから送信先アドレスを収集し、.msgファイルの本文の内容をテンプレートとして一括送信する
と言った感じです。
121: 2013/06/21(金)01:01 AAS
書き忘れました。
メール送信ソフトはoutlookです。
122: 2013/06/21(金)07:11 AAS
.msgファイルの形式ってたぶん公開されてないんだよなぁ
どうやってメールを.msgで保存してるかしらんが、そっちを変更した方が楽な気がする
outlookでもVBAは使えるぞ
123: 2013/06/30(日)18:38 AAS
>>120
OutLookのSession.OpenSharedItemで.msgファイルの読み込みできるが
他のアプリからOutLookいじるのはお勧めしない
OutLook側でmdbに書きだすとか、プレーンテキストで保存するとかした方が良いんじゃね
124(1): 2013/08/31(土) NY:AN:NY.AN AAS
質問です
ODBCの接続する際に
IDとパスワードを入力するボックス(VBAで設定したものではない)がありますが、
初めから半角英数字になるように設定はできますか？
125(1): 2013/08/31(土) NY:AN:NY.AN AAS
VBAで設定したものではないものを、VBAでどうこうするのは無理があります
126(1): 2013/08/31(土) NY:AN:NY.AN AAS
>>125
ですよね。
IDやパスワードを入力するときに各々気を付けてもらうしかないですね。
127: 2013/08/31(土) NY:AN:NY.AN AAS
>>126
プロパティにないの？
128: 2013/08/31(土) NY:AN:NY.AN AAS
ODBCのミドル層で出てるダイアログだから、アクセス側からいじれるプロパティなんてないだろ
自分でIDとパスワード入力してもらうフォーム作ってそこに入力してもらえ
129(1): 2013/08/31(土) NY:AN:NY.AN AAS
DBの持ち物か。すまん。
ダイアログの出る直前にACCESSで入力を固定して終わったら解除ってできないのかね。
（調べてない、ただの理想を述べてみた。）
130: 2013/09/01(日)00:30 AAS
>>129
>>124が言ってるのは多分、ODBCで接続するときにユーザとパスワードを指定しなかったときに出るやつ
自分でちゃんと接続できるユーザとパスワード指定したら出ない
間違ったユーザやパスワード設定したらしらん
131(2): 2013/09/01(日)02:59 AAS
Access初心者です。
VBAでExcelからデータをコマンドボタンで自動インポートさせる物を
作っています。
インポート漏れがないかのチェック処理もさせたいのですが、
どのようにすればいいかわかりません、ご教授お願いします。
132(2): 2013/09/01(日)03:24 AAS
>>131
レコード数で比較すれば？
133(1): 2013/09/01(日)03:48 AAS
>>132
ありがとうございます。
仮に件数が合わなくてインポート漏れしたレコードを
特定するための処理をいれることはできますか？
134: 2013/09/01(日)03:59 AAS
ユニークキーで差分とれよ
少しは考えろよ
135: 2013/09/01(日)04:00 AAS
>>133
ユニークキーで差分とれよ
少しは考えろ
136: 2013/09/01(日)08:49 AAS
インポート漏れなんてあるの？
137: 2013/09/01(日)09:02 AAS
結構ある
あと勝手にデータ変換されてたりもする
138: 2013/09/01(日)09:25 AAS
そうか
ならインポートしてからチェックするより自前のコードでインポートした方がいいんじゃない？
139: 【だん吉】 2013/09/01(日)09:31 AAS
自分はそうしてる
140: 2013/09/01(日)10:05 AAS
ウィザードにまかせてるとひどい目にあう
141: 2013/09/01(日)10:35 AAS
Access初心者なので、そのVBAのコードの書き方がわかりません
教えていただけませんか
142: 2013/09/01(日)10:36 AAS
いいですよ
143: 132 2013/09/01(日)19:42 AAS
>>131
www.nurs.or.jp/~ppoy/access/access/acX014.html
144: 2013/09/01(日)20:23 AAS
インポート漏れするデータ欲しい
試してみたい
145(1): 2013/09/01(日)23:14 AAS
数字型のとこに文字入ってるデータとか用意したらいいんじゃね
146: 2013/09/01(日)23:38 AAS
>>145
うーん、そういうデータをインポートすると普通にエラーとして扱われて
「テーブル名_$インポート エラー」 ってテーブルが生成されるから
インポート漏れのレコードがわからなくて困る、なんて状況にはならないんだよね
147: 2013/09/02(月)10:35 AAS
インポート漏れのレコードがわからなくて困る、なんて状況になると言ってる人はいないが
148: 2013/09/02(月)10:57 AAS
おもろいな
149: 2013/09/05(木)23:50 AAS
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, _
strac, strxls, True, strrange
上記でインポート エラーになるので引数のacImportのところに、
作成したインポート定義にしたいのですができるのでしょうか
150: 2013/09/07(土)03:42 AAS
よし
151: 2013/09/07(土)16:59 AAS
そもそもワークシート変換にインポート定義とかないだろ
152: 2013/09/09(月)01:46 AAS
Accessの初心者です。
レポート印刷でページヘッダーのコードが変わったタイミングで改ページしたい
かつ詳細の明細行は４レコードだけで改ページさせる、両方の条件を満たせるには、
どうやって作成したらよいかご教授お願いします。
153(2): 2013/09/09(月)02:08 AAS
ページヘッダーじゃなくて、その項目でグループ化してヘッダー作る
そのヘッダーかフッターで改ページを設定する
詳細の高さを４行分になるようにヘッダ、フッタや余白を調整する
つか、VBAまったく関係ない話
154(1): 2013/09/09(月)07:18 AAS
>>153
ここはVBAのスレですよね？VBAと関係ある話をしてください。
VBAとまったく関係ない話をしたのはあなたです。VBAでお願いします。
155: 2013/09/09(月)13:03 AAS
VBAを一言で表すと
156(2): 2013/09/09(月)13:20 AAS
>>154
マジレスしといてやるが、VBAでやるよりよっぽど>>153の方法の方が良いぞ
だがあえてVBAでやりたいなら
明細セクションの最初と最後に改ページコントロール(改ページ1,2)を配置して
Dim 行数 As Integer
Dim 前コード
Private Sub レポートヘッダー_Format(Cancel As Integer, FormatCount As Integer)
省21
157: 2013/09/09(月)13:22 AAS
う。 は空白に置換してくれ
つか普通に貼り付けできなくなったのかよ
158(1): 2013/09/10(火)00:16 AAS
>>156
もう少し教えてください。。。
明細が５明細あった場合、
コードA
00001
00002
00003
省13
159: 2013/09/10(火)02:26 AAS
>>158
>>156が理解できないなら、VBAでやるのやめとけ
160(3): sage 2013/09/17(火)19:50 AAS
Accessのクエリで、「クエリの並び替え条件を動的に変更する」方法を
教えて頂けないでしょうか。
現状は、下記のクエリを作成しましたが、並び替え条件として判定されません。
SELECT * FROM テーブル1
ORDER BY FORMS!画面１!テキスト１.Value
よろしくお願いします。
161(1): 2013/09/17(火)20:22 AAS
>>160
SELECT * FROM テーブル1
ORDER BY FORMS!画面１!テキスト１.Value
これってどこに書いてるの？
162(1): 2013/09/17(火)21:44 AAS
>>160
どうしてもやりたいならQueryDefとか使えばできるかもしれんが
動的にSQLつくってDoCmd.RunSqlでやる方がいいんじゃね
163: 160 2013/09/17(火)22:09 AAS
>>161
Accessの「クエリ」で定義していました。
>>162
ご指摘を受けた点を参考にクエリを作成した所、うまく行きました。
ありがとうございます。
164(1): 2013/10/20(日)21:44 AAS
株価のデータベースを作りVBAで銘柄の抽出をしています
VBAを呼ぶ度にSQLで株価データを読み込んでるので日に何度もやると結構無駄です
そこでフォームをロードした時に纏めて銘柄毎のクラスオブジェクトを作り
フォームをアンロードするまで保持したいのですが可能でしょうか？
変数の保持はStaticで良いようですが、配列化してるオブジェクトの保持はどのようにするのでしょうか？
165: 2013/10/20(日)22:06 AAS
view
166: 2013/10/20(日)22:10 AAS
すごいVBA発見ｗ
外部ﾘﾝｸ:esuafai.digi2.jp
167: 164 2013/10/20(日)22:56 AAS
フォームと連動させるのではなく、最初に実行させる時にStaticで保持し
2度目からオブジェクトが空ではないならデータを取りに行かずに
値渡しするようにして解決しました
168: 2013/10/21(月)00:11 AAS
なんか色々つっこみどろこ満載だな
まあ、動いてるならいいか
169: 2013/11/05(火)18:56 AAS
VBAでリモートのデータベースにトランザクション処理を開始して、コミット/ロールバックするのはわかりました。
これをマクロのアクションだけではできないですよね。
Vbaを嫌がる仲間が同一プロジェクト内にいるので。
170(1): 2013/11/16(土)13:17 AAS
初心者ですみません。コンパイルってなんですか？
171: 2013/11/16(土)13:19 AAS
疲労困憊る
172: 2013/11/16(土)13:40 AAS
コンパイルダー・オン
173: 2013/11/16(土)15:59 AAS
昔広島にあったSTGや落ちゲーキャラゲー開発してた会社
174: 2013/11/16(土)17:51 AAS
あったなぁ
175(1): 2013/11/16(土)18:27 AAS
脳みそコネコネの会社？なくなったのか？
176(1): 2013/11/16(土)18:29 AAS
マジレスしとこう
>>170
ソースプログラムを実行可能形式に変換する事
簡単に言えば、お前が書いたプログラムを実行できるように準備する作業
ACCESSなら勝手にやってくれるから、意識する必要はない
177: 2013/11/16(土)19:25 AAS
>>175
1998年に無くなって、落ちゲー関係はセガが買い取った
178: 2013/11/16(土)21:35 AAS
>>176
なるほど。では、あえてコンパイルという作業をしなくてもＯＫ
ってことですね。
あるがとうございます！
179: 2013/11/25(月)21:45 AAS
Accessの場合、ソースを中間コードに変換する作業をコンパイルと呼んでる。
その過程でソースにエラーがあるかどうかをチェックするから
実行時エラーとかの対策にはコンパイル通しておいた方が良いと思う。
180: 2013/11/26(火)02:50 AAS
実行時エラーってのは普通、コンパイルは通った後に発生するエラーの事を言うんだが
まあ、実行時にコンパイルエラー出るのもなんだし、事前にコンパイルしとけってのは同意するが
上下前次1-新書関写板覧索設栞歴
あと 822 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.026s