Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

484 / 500 ﾍﾟｰｼﾞ

←次へ　｜　前へ→


	【3470】Re:Accessをコマンドプロンプトでコントロ...

安心 - 04/9/9(木) 14:44 -


	引用なし

	パスワード

コマンドで操作できる項目はけっこう少ないようです。

・ツリー全体表示


	【3469】Re:レポートについて

温帯低気圧 - 04/9/9(木) 14:41 -


	引用なし

	パスワード

ありがとうございます。

幸せになりました。
OpenReportのところに書いたらいけました。
ありがとうございました。

・ツリー全体表示


	【3468】Re:ファイル名（.txt）をACCESSから変更し...

クロ - 04/9/9(木) 14:36 -


	引用なし

	パスワード

Dim OldFileN As String, NewFileN As String
Dim OldPath As String, NewPath As String
Dim fso, f
'古いファイル名
OldFileN = "ファイル.txt"
'古いファイルの在処
OldPath = "D:\"
'新しいファイル名旧ファイル名の前に年月を付ける
NewFileN = Year(Date) & Format(Month(Date), "00") & OldFileN
'新しいファイルの置き場
NewPath = "D:\Temp\"

　 Set fso = CreateObject("Scripting.FileSystemObject")
　 Set f = fso.GetFile(OldPath & OldFileN)
　 f.Name = NewFileN
　 fso.MoveFile OldPath & NewFileN, NewPath

こんな感じてどうでしょうか？

・ツリー全体表示


	【3466】CurrentRecordの使い方を教えてほしいので...

なお - 04/9/9(木) 14:08 -


	引用なし

	パスワード

一覧Aフォーム　と　詳細Bフォーム　と言う二つのフォームを作って
一覧Aフォームにコマンドボタンを作ってそれを押すとリスト内の個々レコードNOをかくとくし詳細Bフォーム
を開くようにしたいのですが、

※CurrentRecordの使い方を教えてほしいのですがお願いします。

　　DoCmd.OpenForm "詳細Bフォーム", acNormal
　　Forms!一覧Aフォーム = frm.CurrentRecord

こんな感じで考えたのですがうまくいきません。

すいません

・ツリー全体表示


	【3465】Re:オプションボタン

クロ - 04/9/9(木) 13:59 -


	引用なし

	パスワード

オプショングループということなのでしょうか？
オプショングループに対して行うのであればフレーム内の
オプションボタンの値を
フレーム名=1

単体のオプションボタンなら
オプションボタン名 = True

でよいかと...

・ツリー全体表示


	【3464】オプションボタン

saikoro - 04/9/9(木) 13:39 -


	引用なし

	パスワード

いつもお世話になっております。

今回は、オプションボタンについてなのですが、
Formを起動した時に、オプションボタンにチェックを入れたいのですが、
それの仕方がわかりません。

VBだと、オプションボタンにはすでにチェックが入っていて、
オプションボタンを選択する場合、Form_Loadの所に、
オプションボタン名.Value = True　でチェックが入ると思うのですが、
Access2000のVBAでは、仕方がわかりませんでした。

一通りためしてみたのですが、わからなかったので
知っている方いらしたらお願いいたします。

・ツリー全体表示


	【3463】ファイル名（.txt）をACCESSから変更したい

ocha - 04/9/9(木) 13:14 -


	引用なし

	パスワード

テキストファイルをインポートし後、
元のファイルの名前を変えて、他のフォルダに移そうとしています。
movefileを使えばいいのかな？と思うのですが、
object.movefile 元ファイル,移動先ファイル
のobdectの部分になにをいれたらいいのか分かりません。

どなたか教えてください。

・ツリー全体表示


	【3462】Re:追伸

hatena - 04/9/9(木) 11:18 -


	引用なし

	パスワード

まず部品毎に連番を付けるクエリを作成します。テーブル名は、テーブル1 と仮定してます。 SELECT 部品コード, 装置コード, DCount("*", "テーブル1", "部品コード='" & 部品コード & "' AND ID <=" & ID) AS 使用装置No FROM テーブル1; 出力結果部品コード　　　　装置コード　　　　使用装置No 　００１　　　　Ａ１－００　　　　1 　００２　　　　Ａ１－００　　　　1 　００３　　　　Ａ１－００　　　　1 　００１　　　　Ａ１－０１　　　　2 　００１　　　　Ｂ１－００　　　　3 　００２　　　　Ｂ１－００　　　　2 このクエリの名前を、クエリ1 とします。このクエリを元にクロス集計クエリを作成します。 TRANSFORM First(装置コード) AS 装置コードの先頭 SELECT 部品コード FROM クエリ1 GROUP BY 部品コード PIVOT 使用装置No; 出力結果部品コード　　　　1 　　　　　　　　2 　　　　　　　　3 　００１　　　　Ａ１－００　　　　Ａ１－０１　　　　Ｂ１－００　００２　　　　Ａ１－００　　　　Ｂ１－００　　　　　００３　　　　Ａ１－００

・ツリー全体表示


	【3461】Re:レポートについて

クロ - 04/9/9(木) 10:59 -


	引用なし

	パスワード

>レポートには，ControlSourceが見当たらないので，

試しにレポートのテキストボックスのControlSourceで変更してみては？
幸せになるかも？

・ツリー全体表示


	【3460】レポートについて

温帯低気圧 - 04/9/9(木) 10:49 -


	引用なし

	パスワード

レポートのテキストボックスの関連付けの変更のさせ方を教えてください。

フォームでは，ControlSourceで変更することができましたが，
レポートには，ControlSourceが見当たらないので，
どのようにしてよいかわかりません。
ヘルプも見たのですが，調べ方がわるかったのか・・
よくわかりませんでした。

よろしくお願いします。

・ツリー全体表示


	【3459】Re:追伸

Gin_II - 04/9/9(木) 2:12 -


	引用なし

	パスワード

>　ある部品が使用されている装置をまとめようと思っております。
>1つの部品に対しまして、その部品を使用する装置は複数あります。

フィールド数が、可変になりますよね？
最大いくつぐらいなんでしょうか？？

DJoin 関数 - リスト文字列を取得する方法
http://www.f3.dion.ne.jp/~element/msaccess/AcTipsVbaDJoin.html

ひとつのフィールドに入れてもいいのなら、↑なんてのもありますけど。

・ツリー全体表示


	【3458】Re:追伸

津波警報 - 04/9/9(木) 1:28 -


	引用なし

	パスワード

レス有難うございます。　失礼いたしました。文章が不十分でした。　では改めて　ある部品が使用されている装置をまとめようと思っております。 1つの部品に対しまして、その部品を使用する装置は複数あります。　元になるテーブルは主キーはオートナンバーのID,装置コード、装置に使用される部品コード、使用数等がフィールドとなっております。一つの装置につき使用されている部品の数だけレコードがあり、異なる装置に同じ部品が乗っていることもあります。　 ┌──────┬──────┬──────┬──────┬ │装置コード　│　部品コード│　使用数　　│フィールド３│ ├──────┼──────┼──────┼──────┼ │Ａ１－００　│　　００１　│　　　　　１│　　　　　…│　 ├──────┼──────┼──────┼──────┼ │Ａ１－００　│　　００２　│　　　　　２│　　　　　　│ ├──────┼──────┼──────┼──────┼ │Ａ１－００　│　　００３　│　　　　　１│　　　　　　│ ├──────┼──────┼──────┼──────┼ │Ａ１－０１　│　　００１　│　　　　　６│　　　　　　│ ├──────┼──────┼──────┼──────┼ │Ｂ１－００　│　　００１　│　　　　　３│　　　　　　│ ├──────┼──────┼──────┼──────┼ │Ｂ１－００　│　　００２　│　　　　　４│　　　　　　│ ├──────┼──────┼──────┼──────┼ │　　　　　　│　　　　　　│　　　　　　│　　　　　　│ ├──────┼──────┼──────┼──────┼ 　上記の用になって下りますがこれを ┌──────┬──────┬──────┬──────┬ │対象部品　　│　使用装置１│　使用装置２│　使用装置３│ ├──────┼──────┼──────┼──────┼ │　００１　　│Ａ１－００　│Ａ１－０１　│Ｂ１－００　│　 ├──────┼──────┼──────┼──────┼ │　００２　　│Ａ１－００　│Ｂ１－００　│　　　　　　│ ├──────┼──────┼──────┼──────┼ │　００３　　│Ａ１－００　│　　　　　　│　　　　　　│ ├──────┼──────┼──────┼──────┼ 部品コードを一意として、その部品に対して、使用されている装置をまとめるつもりです。なお使用装置にふられた数字は便宜的なもので意味はありません。　どうかご教授さい。

・ツリー全体表示


	【3457】Re:レポートのラベルの変更について

美茶 - 04/9/8(水) 18:06 -


	引用なし

	パスワード

ありがとうございました。

書く場所が間違っていました。

解決しました。ありがとうございました。

・ツリー全体表示


	【3456】Re:補足

hatena - 04/9/8(水) 18:03 -


	引用なし

	パスワード

>そのラベルを配置したフォーマット時イベントで代入すれば

そのラベルを配置したセクションのフォーマット時イベントで代入すれば

・ツリー全体表示


	【3455】Re:レポートのラベルの変更について

hatena - 04/9/8(水) 18:01 -


	引用なし

	パスワード

>レポートのラベルを可変にしたいのですが，
>ヘルプを見ても，その他のサイトを見ても，
>レポートのラベルのCaptionを変更することができません。

そのラベルを配置したフォーマット時イベントで代入すれば
変更できますよ。

Me.ラベル1.Caption = "AAAA"

・ツリー全体表示


	【3454】レポートのラベルの変更について

美茶 - 04/9/8(水) 17:53 -


	引用なし

	パスワード

初心者なので，お願いします。

レポートのラベルを可変にしたいのですが，
ヘルプを見ても，その他のサイトを見ても，
レポートのラベルのCaptionを変更することができません。

申し訳ありませんが，よろしくお願いします。

・ツリー全体表示


	【3453】Re:テーブルに格納されているファイルの開...

YU-TANG

- 04/9/8(水) 14:48 -


	引用なし

	パスワード

こんにちは、YU-TANG です。

> OLE Object型でテーブルに格納したExcelのファイルを
> VBAで開く方法をどなたかご存知ですか？

関係有るかもしれません。

123859 - ACC: Sample OLE Automation for MS Word and MS Excel
http://support.microsoft.com/default.aspx?scid=kb;en-us;123859
↑の機械翻訳はこちら↓
http://support.microsoft.com/default.aspx?scid=kb;ja;123859

# 関係なかったら悪しからず。

・ツリー全体表示


	【3452】Re:Accessをコマンドプロンプトでコントロ...

シャー - 04/9/8(水) 10:30 -


	引用なし

	パスワード

ありがとうございます。

コマンドプロンプトでどこまで操作可能なのかわからなかったので，
このような質問になってしまいました。

参考にさせていただきます。ありがとうございました。

・ツリー全体表示


	【3451】Re:クエリを開けなくする手段

場秋 - 04/9/8(水) 7:37 -


	引用なし

	パスワード

ＣＤ－ＲＯＭ上で実行させなければならないという状態です。
一応、ランタイムを入れさせて動かすような形とするのですが、
*.mdeを本体で開かれると、クエリーだけが見えてしまう形に
なってしまいましたので・・。

うーむ、クエリーを使うこと自体がだめっぽいですね。

・ツリー全体表示


	【3450】追伸

こもれび - 04/9/8(水) 6:03 -


	引用なし

	パスワード

こもれびです

何のための表だろう…としばらく考え込みました。
ひょっとしてお作りになろうとしているのは「クロス集計クエリー」ですか？
もしそれだとしますと、数字のデータが一切元記事に無いし…
もう少し詳しくおつくりになりたいものを教えてください

・ツリー全体表示


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

484 / 500 ﾍﾟｰｼﾞ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free