[過去ﾛｸﾞ] Access VBA 質問スレ Part1 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
260: 2015/01/08(木)11:57 ID:3EyWpOD1(1/2) AAS
１）のデータの県名を元に、２）のように並べたいのですが、アクセスでやる方法はありますか？
１）
千葉 成田 空港
埼玉 秩父 蕎麦
埼玉 川越 イモ
栃木 日光 華厳
千葉 浦安 ネズミ
省9
261: 2015/01/08(木)12:16 ID:qIfkunGX(1/3) AAS
浦安とネズミーランドはどこに入れば良い？
262(1): 2015/01/08(木)13:16 ID:3EyWpOD1(2/2) AAS
すいません。書き直します。
１）のデータの県名を元に、２）のように並べたいのですが、アクセスでやる方法はありますか？
１）
千葉 成田 空港
埼玉 秩父 蕎麦
埼玉 川越 イモ
栃木 日光 華厳
省10
263: 2015/01/08(木)13:22 ID:qIfkunGX(2/3) AAS
浦安とネズミーランドだけ順番入れ替える基準は？
264(1): 2015/01/08(木)16:12 ID:qIfkunGX(3/3) AAS
出来たからおしまい
外部ﾘﾝｸ:paiza.io
265: 2015/01/09(金)08:12 ID:rJhs2R4+(1) AAS
>>264
Runtime Errorがでました
266: 2015/01/09(金)12:46 ID:Azg0g72t(1) AAS
>>262
横展開の数が固定なら
外部ﾘﾝｸ:social.msdn.microsoft.com
増減するならVBAでワークテーブルに入れていくしかないと思う
267(1): 2015/02/19(木)08:17 ID:CSqQB465(1) AAS
質問です。
数万レコード程度のログファイルの集計（抽出）をしたいです。
抽出条件は、レコードに担当者と時刻が入っていて、
その時刻の＋１分以上かつ＋５分以下で、同じ担当者の物です。
最終的には、条件にあてはまるレコードの１つ目と２つ目以降という感じで並べたいです。
今はEXCELのCOUNTIFS関数で半分手作業でやってますが、
かなり手間なのでできればAccessVBAでやりたいです。
省1
268: 2015/02/19(木)10:34 ID:IO29hpKb(1) AAS
したいことは判りました。
次のかたどうぞ。
269: 2015/02/19(木)16:00 ID:1peKWp+p(1) AAS
わからないなら黙ってろよアホか
で、vbaからcountifを呼び出せばいいんじゃねえの？
思いついただけで試してないが
270: 2015/02/19(木)16:34 ID:4dFHTBvU(1) AAS
>>267
VBAは必要ないでしょ。なにかその後バッチ処理をしてるっていう
なら別だが。
普通に該当のテーブルを元にクエリつくって、パラメータクエリを
作る。フォームを用意して、入力させてその値をパラメータとして
クエリの条件式に入れる。
１分以上５分以下という条件をbetween andで書いて２つパラメータ
省2
271(1): 2015/02/25(水)19:46 ID:u8BX93H2(1) AAS
定時で帰ってるのがばれるじゃないか
272: 2015/02/27(金)10:17 ID:ILfHzu6L(1) AAS
>>271
密度が違いますと言い張れば大丈夫。
273(1): 2015/04/11(土)08:59 ID:5EmI+Hzg(1/2) AAS
Excelファイルで(表現上CSVで表現してますが、XLSXファイルの１つのシート上のデータだと思ってください。)
999,999,AAA,999・・・・・・
999,999,BBB,999・・・・・・
999,C ,999,999・・・・・・
999,999,DDD,999・・・・・・
という４件のデータがあるとします。
これを、SELECT * FROM のクエリをDao.Recordsetで読み込みたいのですが、
省3
274: 2015/04/11(土)09:00 ID:5EmI+Hzg(2/2) AAS
RS.Fields(2).Value
を
RS.Fields(1).Value
に訂正。m(_ _)m
275: 2015/04/11(土)18:29 ID:hFjl3X66(1) AAS
>>273
落ちる所のコードが無いから分からないけど
dim aaa as long
aaa=RS.Fields(1).Value
みたいな使い方しているなら
dim aaa as long
dim bbb as string
省3
276(1): 2015/04/13(月)17:40 ID:gbfuHaFd(1/2) AAS
Access2013です。
いろいろと作っているうちに突然コントロールソースに持っているユーザー定義関数が働かなくなり、#NAMEのエラーが出る様になりました。
ファイルが壊れたのでしょうか？
277(1): 2015/04/13(月)18:03 ID:gbfuHaFd(2/2) AAS
>>276
自己解決しました。
関数名を英数字のみにしたら動きました。
ただ、動かなくなったきっかけがわからない。
278: 2015/04/14(火)07:53 ID:0HPBZIqn(1) AAS
>>277
そもそも関数名に日本語使うそのセンスを疑う
279: 2015/04/14(火)15:41 ID:b8Z+Xie9(1) AAS
だってイベントプロシージャは日本語名で動くじゃん
280: 2015/04/14(火)19:08 ID:hqkBvwrA(1) AAS
漢字カタカナを関数名にグイグイ使ってました。まあ今日も明日も使っちゃうんですが。
281(1): 2015/04/15(水)22:25 ID:15xIuB57(1) AAS
IF文についてなのですが、
IIf(A = 0 Or B = 0 Or C = 0 And D = 0 ...
という書き方の場合、「Aが0」もしくは「Bが0」もしくは「Cが0、かつDも0」のいずれかの場合、
という条件判定になるという考え方で良いでしょうか？
282(1): 2015/04/16(木)08:12 ID:gzgbYtwZ(1) AAS
>>281
一緒といえば一緒ですがIF？IIF？どちらでしょう？
> という書き方の場合、「Aが0」もしくは「Bが0」もしくは「Cが0、かつDも0」のいずれかの場合、
> という条件判定になるという考え方で良いでしょうか？
そうですね
ハッキリさせたい時には()でくくると分かり易くなりますよ
こんな風に
省4
283: 2015/04/16(木)13:45 ID:OCYKBdEo(1) AAS
>>282
ありがとうございます、安心しました
284(1): 2015/04/18(土)01:50 ID:pucpWveX(1) AAS
ExcelVBAをほんの少しいじった程度ですが、同じことがAccessVBAでもできますか？
たぶんできたとして、データアクセスが目的ならExcelよりAccessのほうが早いのかな。
285: 2015/04/18(土)03:55 ID:j/wjXDDU(1) AAS
WSH(VBScript, JScript), PowerShell からでも、
呼び出せるよ
Accessはデータベースだから、
Excelよりもデータの整合性は、より安全で、
何々明細とかを扱う、本格的な業務に適している
286: 2015/04/18(土)07:06 ID:elh8iJrV(1) AAS
>>284
Excel にデータエクスポートして開いてピボット集計して保管してzipにしてメール添付して送信、とかExcelの外から出来る。
287(1): 2015/04/18(土)09:55 ID:QuJhi9bL(1) AAS
エクセルの65535行制限って解けたんだっけ？
288: 2015/04/18(土)18:09 ID:05gN+8sT(1/2) AAS
xlsxファイルからDAO.RecordSetでデータを取り込んでいます
dim A
Do Until Rs.EOF=True
For i=1 to 10
A=Rs.Fields(i).Value
InsertRS.Addnew
InsertRS.Fields(i).Value=Rs.Filds(i).Value
省10
289: 2015/04/18(土)19:59 ID:C1NhVGiv(1) AAS
それ以前にAddnewしてる位置がおかしい気がするんだが
290: 2015/04/18(土)21:20 ID:05gN+8sT(2/2) AAS
書き間違えました。
実際は、Forのまえにaddnewしてnextのあとにupdateしてます。
291: 2015/04/19(日)02:01 ID:WMQbPkw9(1) AAS
書き間違いとか実際のコードじゃないもの出されてもなぁ
お前の勘違いの可能性が圧倒的に高いと思うぞ
292: 2015/04/19(日)07:19 ID:8d6tresr(1) AAS
事実、
ワンクッションのある無しで発生するんです。
293: 2015/04/19(日)09:54 ID:S72BOy6b(1) AAS
フィールドが100個くらいあるエクセルデータを同じように取り込んだときに経験したことある
ケド、、、、原因調べないでおわっちゃたなｗそーいえばｗｗ
原因を探るためにDebug.Print入れたら登録がされるようになって、原因解明より先に仕事・・・・となって、そーいえばそのままｗｗ
294: 2015/04/20(月)08:09 ID:ZV6mzr+5(1) AAS
>>287
ここ、Accessスレですよ。
それとGoogleで調べれば分かるような内容の質問はどこのスレでも
禁止です。頭に叩き込んでおくといいですよ。
295: 2015/05/02(土)06:47 ID:cQx6YORh(1) AAS
中文(簡体)文字のファイル名をダイアログで取得して、コピーしたり開いたりしたいんですが、"見つかりません"と言うメッセージに。
中文文字の入ったファイル名やフォルダー名を取り扱う方法かヒント頂けないですか。
296: 2015/05/14(木)12:50 ID:No/KpZZc(1) AAS
二つ教えてください。
1コンボボックスコントロールの▼が反応しない時がある
2リストボックスコントロールAからデータを取得するとき
A.BoundColumn=1
変数=A.ItemData(A.ListIndex)
A.BoundColumn=2
変数=A.ItemData(A.ListIndex)
省4
297(3): 2015/05/16(土)10:31 ID:s10/F9Sk(1/2) AAS
Accessって新しくなればなるほど、不安定化してない？
なんとなくだけど
298: 2015/05/16(土)12:20 ID:mEQOWf9/(1) AAS
>>297
激しく同意
Accessも立ち位置が怪しくなりつつあるのかなって。。。。
今の時代ならForguncyみたいなのがオフィスファミリーのラインナップに
ほしいとこだね。
299: 2015/05/16(土)14:09 ID:/YqkcKmb(1) AAS
>>297
ど安定だと思ってた。難しい事しないからかもだけど。
300(1): 2015/05/16(土)17:59 ID:s10/F9Sk(2/2) AAS
/decompileオプションをつけてファイルを開くなんて、昔はなかったのになぁ・・・。
301(1): 2015/05/16(土)22:55 ID:xhmYU3Qu(1) AAS
>>297
俺の体感ではすくなくとも2007までは順調に安定化してるけど
それ以降は使ってないから知らん
>>300
/decompileっていつからあるんだろうな
昔は全オブジェクトを別mdbにエクスポートとか結構頻繁にやってた記憶が
302: 2015/05/17(日)10:45 ID:vGSHuJcU(1) AAS
>>301
97くらいからはあったはず。
でも/decompileを使うようになったのは2003以降かなぁ？
むかしはmdbファイル丸ごと見事に壊れたから/decompileすら登場の出番が無く
今はVBAを入れるとスグ壊れるから/decompileが効力を発する機会が増えた
うーん・・・改善してるのかもなｗ
ただ開発をやっている人から見るとVBAをいじってる最中の異常終了が増えた
省1
303(1): 2015/05/22(金)21:24 ID:zmoBF1Q0(1) AAS
[Forms]![コントロール名]......
のように使う
!
と
フォーム．プロパティ
の
「！」と「．」
省1
304: 2015/05/22(金)21:51 ID:yor6OqJo(1) AAS
/decompile 知らなかった。
305: 2015/05/23(土)12:42 ID:J5W2ethN(1/2) AAS
俺もだよ
>>303
それも知らないねぇ。
ただ、外部モジュールから参照するときは ! でないとダメなんじゃなかったかな。違ったかもしれん。
306: 2015/05/23(土)12:45 ID:J5W2ethN(2/2) AAS
モジュールって何やねん
オブジェクトやオブジェクト
307: 2015/05/23(土)12:50 ID:VCG+Khsg(1) AAS
外部オブジェクト用なんだ、、、
知らなんだ
308(1): 2015/05/23(土)13:54 ID:8oQ8jNeY(1) AAS
!はコレクションの要素を指定するときに使う
.はオブジェクトのプロパティ(メンバ)を指定するときに使う
309(1): 2015/05/27(水)08:05 ID:lvaBWQ33(1) AAS
>>308
コレクションの要素の意味が分からん。
310: 2015/05/27(水)14:12 ID:5bPXfDHX(1) AAS
>>309
コレクションの意味がわからんのか？
要素の意味がわからんのか？
簡単に言えば、複数のうちのどれか ってことだが
何が複数なのかは!の前のやつによって違う
Formsはまさにフォームのコレクション
個別のフォームならControlsが既定コレクション
省1
311: 2015/05/27(水)21:13 ID:GAmiGWam(1) AAS
これっくしょんのっ♪ おべんっとばっこにっ♪
312: 2015/05/27(水)22:22 ID:ZDZjEVN6(1/2) AAS
書く人の好みもありますかね
私はなるべく「!」ではなく「.」を使ってます
313: 2015/05/27(水)22:54 ID:XhKCRfpS(1/2) AAS
「!」を「.」では動かないでしょ？
314: 2015/05/27(水)22:59 ID:ZDZjEVN6(2/2) AAS
対応したプロパティに書き換えて使ってます
315(1): 2015/05/27(水)23:07 ID:XhKCRfpS(2/2) AAS
ふ〜ん、そうなの
(どゆことかわかってないが)
316(1): 2015/05/28(木)10:07 ID:/8nOg4qQ(1/2) AAS
クラスのメソッドと
オブジェクトのメンバの違いっしょ
317: 2015/05/28(木)11:27 ID:fu7GUEC6(1) AAS
>>316
同じ事を言ってるようにしか見えんが
クラスとオブジェクトはどういう意味で使い分けてるんだ？
メソッドとメンバはどういう意味で使い分けてるんだ？
318: 2015/05/28(木)13:25 ID:/8nOg4qQ(2/2) AAS
馬鹿には無理
319(3): 2015/05/28(木)18:22 ID:C/2xaBAg(1) AAS
>>315
a = [Forms]![f2]![combobox1].Value
a = Forms("f2").Controls("combobox1").Value
他フォームの値を利用する場合等は、こんな感じで書いてます
個人的にコレクション名が入った方が分かり易いのでこうしています
どちらの書き方が良いとか悪い、というのは無いので書く人次第ですね
320: 2015/05/28(木)21:06 ID:bDSn3nA4(1) AAS
ほほう、勉強になります。
321: 2015/05/29(金)05:39 ID:QOrEbIFI(1) AAS
後者の方がメタプログラミングへの可能性が感じられて良いね
322: 【豚】 2015/06/01(月)08:08 ID:SmEysG22(1) AAS
びっくりおみくじ
323: 2015/06/08(月)08:55 ID:0Vy1Z1yY(1) AAS
>>319
つまりどちらの書き方でも
同じ値が取得出来る
324(2): 2015/06/11(木)14:05 ID:cKv7S2xh(1/3) AAS
フォーム内のテキストボックスで教えてください。
テキストボックスに値を入れるために選択すると、0が表示されます。
空白の状態から値を入力できるようにするには、どこの設定を変えれば良いのでしょう？
325: 2015/06/11(木)14:06 ID:cKv7S2xh(2/3) AAS
>>324は非連結のテキストボックスの場合です。
326: 2015/06/11(木)14:16 ID:cKv7S2xh(3/3) AAS
>>324は解決しました。
フォームオープン時にVBAで0を設定していました。
他人のソースだったので気がつきませんでした。
スレ汚し失礼いたしました。
327(1): !omikuji 2015/06/24(水)19:15 ID:QTgmX67K(1) AAS
>>319
クエリの抽出条件に書いてみた。
コレクション(index)の書き方ではダメだった。
328(1): 2015/06/25(木)03:15 ID:pZAotZeg(1) AAS
>>327
そりゃVBAの構文をクエリに書いても無理でしょうに
329: 2015/06/25(木)05:46 ID:0DqbKMKe(1) AAS
>>328
そうなのですか、ビルダーで作成される以外の記述を試したかったのです。
330(1): 2015/06/25(木)07:48 ID:tqVIvEYY(1) AAS
お試しで書いたプログラムを納品されたクライアントがかわいそう
331(1): 2015/07/01(水)22:29 ID:r6P8NuLo(1) AAS
>>330←納品だの客だの何言ってんのこのバカ？
332: 2015/07/02(木)09:39 ID:CcSdJJgr(1) AAS
>>331
Accessでしょっぱい商売やってる、自営業のプログラマなんだろｗｗ
ハッキリ言って取るに足らない存在。
333: 2015/07/02(木)15:10 ID:2kk3aD1Z(1) AAS
ツボったω
334: 2015/07/02(木)21:31 ID:UqhUXHzI(1) AAS
俺もしょっぱい2号
335(1): 2015/07/17(金)07:28 ID:6H2NxaAj(1) AAS
プロジェクトのテーブルに
プロジェクト番号、
作業内容Aの担当者、
作業内容Bの担当者、
作業内容Cの担当者と入力するテーブルがあり、
それとは別に工数入力テーブルで、
各担当者毎にプロジェクトに対しての作業工数を付けたいのですが
省1
336: 2015/07/17(金)12:20 ID:7dLfVbOx(1) AAS
>>335
リレーションって、工数入力テーブルのテーブルレイアウト決まってるのか？
まあ、プロジェクト番号と担当者で参照するだけなんだけど
そのプロジェクトのテーブル含めて、ＤＢ設計もうちょっとちゃんと勉強した方が良いんじゃね
337(1): 2015/07/27(月)17:54 ID:cZFieeEU(1) AAS
VBAのソースが開けなくなる現象ってどうしたらいいの？
decompileつけても治らない
新しいファイル作ってインポートもダメ
338: 2015/07/27(月)20:40 ID:n6WPrg6a(1) AAS
押してもダメなら・・・
339: 2015/07/27(月)20:59 ID:LaMoSGUn(1) AAS
>>337
数年に一回、私もそんな目にあいます。
だいたい復旧出来ないので、バックアップ欠かさずとってます。
どうにかなるなら私も知りたいですが。
340: 2015/07/27(月)21:30 ID:FqSPmPlY(1) AAS
やっぱみんな同じ現象に悩まされてるんだね
ネットワーク共有フォルダ上だと起きやすい
ネットワーク共有フォルダ使わなきゃいいんだけど、うちの情シスが変な縛りかけるからコレしか手がないし
上下前次1-新書関写板覧索設栞歴
あと 662 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.033s