ACCESS総合相談所その１８【桐にしとけ】

ACCESS総合相談所その１８【桐にしとけ】 at BSOFT

1:名無しさん＠そうだ選挙にいこう
07/12/29 08:52:35
ACCESSに関する質問はこちらへ！

▼━ 質問のしかた ━━━━━━━━━━
★ OS、ACCESSのバージョンを明記してください。
★ 質問内容は具体的に書いてください。
　　・何がしたいのか
　　・どんな処理を試したか
　　・動作状況など駄目な理由
　　テーブル/フォームの構成、クエリ、VBAの内容など差し支えない
　範囲で詳しく書くと、早く回答が得られるかもしれません。
　　図解があれば尚良し。
　　聞き返さなくても詳細が把握できる質問が望ましいです。
★ 事前にヘルプ・Google等で調べられる範囲は調べてください。
　　大概の疑問は検索することで解決します。
★ アドバイスを貰ったら、必ず経過・結果の報告をして下さい。
　　ギブアンドテイクで情報を共有しましょう。

▼━質問テンプレ (出来れば使ってね) ━━━━━━
【システム環境　 . 】 Windows**, Access**
【 VBAが使えるか .】はい･いいえ
【 VBAでの回答　　】可･否
【検索キーワード　】 Googleやヘルプでの検索キーワード

前スレ
ACCESS総合相談所その１７【桐にしとけ】
ｽﾚﾘﾝｸ(bsoft板)

2:名無しさん＠そうだ選挙にいこう
07/12/29 08:54:08
ACCESS2000総合相談所
URLﾘﾝｸ(pc.2ch.net)
ACCESS総合相談所その２
URLﾘﾝｸ(pc.2ch.net)
ACCESS総合相談所その３
URLﾘﾝｸ(pc.2ch.net)
ACCESS総合相談所その４
URLﾘﾝｸ(pc.2ch.net)
ACCESS総合相談所その５
URLﾘﾝｸ(pc.2ch.net)
ACCESS総合相談所その６
URLﾘﾝｸ(pc2.2ch.net)
ACCESS総合相談所その７
URLﾘﾝｸ(pc2.2ch.net)
ACCESS総合相談所その８(消息不明です)
URLﾘﾝｸ(pc2.2ch.net)
ACCESS総合相談所その９(消息不明です)
ｽﾚﾘﾝｸ(bsoft板)
ACCESS総合相談所その１０
ｽﾚﾘﾝｸ(bsoft板)
ACCESS総合相談所その１１
ｽﾚﾘﾝｸ(bsoft板)
ACCESS総合相談所その１２
ｽﾚﾘﾝｸ(bsoft板)
ACCESS総合相談所　その１３　【桐にしとけ】
ｽﾚﾘﾝｸ(bsoft板)
ACCESS総合相談所　その１４　【桐にしとけ】
ｽﾚﾘﾝｸ(bsoft板)
ACCESS総合相談所　その１５
ｽﾚﾘﾝｸ(bsoft板)
ACCESS総合相談所その１６【桐にしとけ】
ｽﾚﾘﾝｸ(bsoft板)

3:名無しさん＠そうだ選挙にいこう
07/12/29 08:55:57
･関連スレ
データベース板
【Access】アクセスは最強のデータベース！
ｽﾚﾘﾝｸ(db板)
プログラム板
VBプログラマ質問スレ（6.0以前） Part51 ※Office, Access 固有の質問はスレ違いにつき注意！
ｽﾚﾘﾝｸ(tech板)

4:名無しさん＠そうだ選挙にいこう
07/12/29 13:06:55
>>1
乙カレー

5:名無しさん＠そうだ選挙にいこう
07/12/29 14:11:45
すみませんが教えてください。
複数のフィールドの値を条件にテーブル結合は出来ますか？
テーブル１
フィールド１　フィールド２　
１１１１１　　あああああ　　
３３３３３　　いいいいい　　
１１１１１　　いいいいい　　　
３３３３３　　あああああ　　　
１１１１１　　あああああ
１１１１１　　いいいいい

テーブル２
フィールド１　フィールド２　フィールド３
２２２２２　　あああああ　　１２７８８
３３３３３　　いいいいい　　　７８７８
１１１１１　　あああああ　　　８８８８
３３３３３　　あああああ　　　８８８０
１１１１１　　いいいいい　　　７８８８

テーブル１が１１１１１とあああああならテーブル２のフィールド３を持ってくるのです。
テーブル１テーブル２ともに主キーは別のフィールドです。
フィールド１とフィールド２が合わさって一つしかない
名前になるのです。
フィールド１とフィールド２を結合するのかな？と思うのですが・・・。　

6:名無しさん＠そうだ選挙にいこう
07/12/29 14:17:13
まあ、これも桐を使えば一撃で出来るんだが、
Accessの回答をどうぞ
↓

7:名無しさん＠そうだ選挙にいこう
07/12/29 14:21:33
>>5
一度自分で試してから出直せ。

8:名無しさん＠そうだ選挙にいこう
07/12/29 15:16:02
まあ、ここでの質問の大部分は桐でスパット解決できる訳で、、アプリ開発時間も1/5くらいな訳で、、

エクゼプティブは桐でさっさと仕事済ませて、空いた時間はホテルのプールでリフレッシュ
貧乏人はAccessで必死に頑張ると

9:名無しさん＠そうだ選挙にいこう
07/12/29 15:21:18
もしかして: エグゼクティブ

10:名無しさん＠そうだ選挙にいこう
07/12/29 15:50:13
>> 前スレ963

'インポート先のテーブルT1は作成済みの前提
'アーリーバインディングにしたい場合は好きに修正汁
'Scripting.Runtime の定数を使用したい場合も好きに修正汁
Sub ImportShit()

Dim rs As Object 'DAO.Recordset
Dim reader As Object 'Scripting.TextStream
Dim tmp As Variant

　　' レコードセットをオープン
　　Set rs = CurrentDb.OpenRecordset("T1")
　　' テキストストリームをオープン
　　Set reader = CreateObject("Scripting.FileSystemObject"). _
　　　　　　　　　OpenTextFile("C:\theShit.txt", 1, 0, -1)

　　' ファイルの終端までループしてレコード追加
　　Do Until reader.AtEndOfLine
　　　　tmp = Split(reader.ReadLine, vbTab)
　　　　If tmp(0) = "フィールドA" Then
　　　　　　If rs.EditMode = 2 Then rs.Update ' レコードバッファを保存(dbEditAdd=2)
　　　　　　rs.AddNew
　　　　End If
　　　　rs.Collect(tmp(0)) = tmp(1)
　　Loop
　　If rs.EditMode = 2 Then rs.Update ' レコードバッファを保存(dbEditAdd=2)

End Sub

11:名無しさん＠そうだ選挙にいこう
07/12/29 16:24:53
パチパチ

　おまいらも拍手してやれ

12:10
07/12/29 16:53:37
>10 のコメントだけ間違った。
本文に書いてあるとおり、FileSystemObjectだす。

誤：Dim reader As Object 'Scripting.TextStream
正：Dim reader As Object 'Scripting.FileSystemObject

13:10
07/12/29 16:56:46
…と思ったら、間違ってなかったわ。

こんな短いコードでも、後で見ると自分でも読み違う。orz
精進精進。

14:名無しさん＠そうだ選挙にいこう
07/12/29 21:42:55
>>13
桐にしとけ

15:名無しさん＠そうだ選挙にいこう
07/12/30 01:34:45
フィールドも自動で作ってくれよ

16:10
07/12/30 03:42:25
>>15
もう飽きたから任せた。よろ。

17:名無しさん＠そうだ選挙にいこう
07/12/30 11:02:17
Tab形式のCSVへの展開くらい、WSHで作れよ
そして、ここに書き込め

18:名無しさん＠そうだ選挙にいこう
07/12/30 12:37:07
>17 にムリなのは、よくわかった。

19:名無しさん＠そうだ選挙にいこう
07/12/30 12:42:04
>>16
精進精進。

20:名無しさん＠そうだ選挙にいこう
07/12/30 13:15:26
ﾜﾛｽﾜﾛｽ

21:名無しさん＠そうだ選挙にいこう
07/12/30 14:41:27
オレオレ

22:名無しさん＠そうだ選挙にいこう
08/01/02 11:56:49
ACCESS2007のVBAなんですが
フォーム上で右クリックで、テキストフィルタ＞
指定の値に等しい　と同じことをする
VBAを教えて下さい

23:名無しさん＠そうだ選挙にいこう
08/01/04 15:05:37
質問なんですが、レポートで精算書を作りたいんですが、
手数料が件数１００件未満の場合は１８０円で、それ以上の場合は１７０円になるんです。
そういう場合、レポートのコントロールソースはどう書けばいいんでしょうか。

24:名無しさん＠そうだ選挙にいこう
08/01/04 17:34:57
=IIf(Count(*)<100,180,170)

グループ化してグループヘッダかグループフッタにこう書いとけ

25:名無しさん＠そうだ選挙にいこう
08/01/04 22:23:35
DoCmd.ApplyFilter "", "[コントロール1] like '" & "*" & Format$(コントロール2) & "*'"
というコードがあります。教科書には
コントロール1 Like *コントロール2*
で検索可能と書いてあるのに、なんで&や"がこんなにたくさん必要なんですか？

26:名無しさん＠そうだ選挙にいこう
08/01/05 00:42:41
無意味な　& もあるな。

27:名無しさん＠そうだ選挙にいこう
08/01/05 01:47:48
keydownイベントでshift+Spaceだけが機能しないんですけど、既出？
それともおいらの書き方がわるいのかな？
If KeyCode = vbKeySpace And Shift = 0 Then DoCmd.GoToRecord , , acNext 'spaceで次レコードへ
If KeyCode = vbKeySpace And Shift = 1 Then DoCmd.GoToRecord , , acPrevious 'shift+spaceで前レコードへ

shift=2(Ctrl+Space)、shift=4(Alt+Space)はちゃんと機能しました。Spaceで進んで、shift+Spaceで戻りたいのに出来ません。
どうか、ヒントを下さい。

28:名無しさん＠そうだ選挙にいこう
08/01/05 02:07:47
>>27
自己レスします。
フォームのプロパティーで当該コントロールのIMEの設定をオフにしたら動きました。
お騒がせしました。
IMEがオンになっていると、なぜかshift+Spaceが使えないんですね。
そのほかにも、アルファベットでの移動(viのようなやつ)が効きませんでした。
でも、IMEをオフに設定したら動きました。

29:名無しさん＠そうだ選挙にいこう
08/01/06 20:24:06
すいません、Accessのテーブルリンクの切り替えについて質問させてください。

テストA環境とテストB環境など、環境ごとに同じテーブル名があるため、
Accessのマクロにて以下のテーブルリンクを切り替えるものを作りました。
①DeleteObjectでリンクテーブルを削除
②TransferDatabaseでリンクを再度作成

その結果、マクロを実行すると②の段階でテーブルによっては
「3146：ODBC--呼び出しが失敗しました。
　[Oracle][SQL]SQLデータ型が許容範囲外です」
となります。

手動でリンク付けをやってみたのですが、同じエラーとなりました。

なにが原因と考えられるでしょうか。
またテーブルはそのままにして、接続先だけを書き換える方法はありますでしょうか。

いろいろすいませんがよろしくお願いします。

30:名無しさん＠そうだ選挙にいこう
08/01/07 02:07:29
WinXP、Access2000です。アクセスを勉強しはじめて１週間で右も左もわかりません。
ＶＢＡもわからないし、何をキーワードに検索したらいいかも正直わかりません。
超基本なうえに質問もおぼつかなくお叱りを受けそうですが、
大変困っているため背に腹はかえられず、失礼ながら質問させていただきます。

＊＊＊

テーブル１
顧客ＩＤ（主キー、オートナンバー）、氏名、電話番号

テーブル２
問い合わせＩＤ（主キー、オートナンバー）、顧客ＩＤ（テーブル１とリレーション）、日時、問い合わせ内容

フォーム１（レコードソース：テーブル１）
顧客ＩＤ、氏名、電話番号

フォーム２
問い合わせＩＤ、顧客ＩＤ、日時、問い合わせ内容

フォーム１の中に「入力」ボタンを設置し、それをを押すとテーブル１の顧客ＩＤを持って
フォーム２が入力モードで開く（問い合わせＩＤのみオートナンバーで採番される）
ようにするにはどうしたらよいのでしょうか。
「入力」クリック時にフォーム２を追加モードで開くようにマクロで設定したのですが、顧客ＩＤが空白です。

31:名無しさん＠そうだ選挙にいこう
08/01/08 10:56:56
>>29
ADOXとVBAで処理した方が良いんでない？
リンク先書き換えだけなら、削除しなくて良いから。

で、エラーだけれども、多分、
Oracle - MDBのリンクを行う際に、
MDB側にマッピングされるデータ型に
収まりきらない値がテーブルに設定されているとかじゃないか？

32:名無しさん＠そうだ選挙にいこう
08/01/08 21:36:43
【システム環境　 . 】 WindowsXP, Access2007
【 VBAが使えるか .】いいえ
【 VBAでの回答　　】否
【検索キーワード　】 ACCESS フォームフィルタ

誕生日のフィールドを用いてフォームフィルタの練習をしています。
ちなみに、『30時間でマスターAccess2007』という本をさっき買ってきて、
それで勉強しています。

練習問題の中で、『1975年生まれの選手のレコードを連続して検索しなさい』というのがあります。それをやってみたのですが、うまくいきません。（データは付録のCDromに入ってます）

「詳細設定」→「フォームフィルター」とクリックし、
「生年月日フィールド」で#1975/01/01#-#1975/12/31#としました。
しかしうまくいきませんでした。
他にも、#1975/*/*#とか、#1975/##/###とかやってみましたがダメでした。

どうすれば、1975年生まれの選手を連続検索することができるでしょうか？
ご指導のほど、よろしくお願い申し上げます。

33:名無しさん＠そうだ選挙にいこう
08/01/09 00:40:21
>>32

日付ってLike使えなかったっけか。

Like "1975*"

あたりでいけるんじゃね?

34:名無しさん＠そうだ選挙にいこう
08/01/09 01:10:33
手元にAccessないから確かめられないけど仮にできたとしても
ロケール依存になりそうな気が・・・。

生年月日フィールドが日付時刻型で時刻が全部00:00:00って前提なら
Between #1975/01/01# And #1975/12/31#

たまに時刻00:00:00以外のゴミデータが紛れ込む可能性まで考慮すると
>=#1975/01/01# And <#1976/01/01#

35:>>32
08/01/09 01:35:47
>>33-34

お二人ともどうもありがとうございました。
明日、会社に行って試してみます。
本当にありがとうございました。

36:名無しさん＠そうだ選挙にいこう
08/01/09 16:33:35
質問です。
月別の帳票を作成したんですけれど、祝日の色を変更することはできるのでしょうか。(土日はできました。)

37:名無しさん＠そうだ選挙にいこう
08/01/09 19:40:13
ACCESS2007のプリンタのレポートのページ設定で
その他のプリンタに変更した設定が保存されない
URLﾘﾝｸ(support.microsoft.com)

のバグは対応策はありませんか？
買う前から判っていたら、ACCESS2007で開発しなかったのになあ（汗

38:名無しさん＠そうだ選挙にいこう
08/01/10 02:33:25
抽象的な質問ですみません。
あるファンクションプロシジャーを呼ぶのに、
keydownイベントで呼び出すのと、マクロのautokeyのプロシジャーの実行で呼び出すのとで、動作後のカレントレコードが異なります。
keydownイベントだと一番前のレコードがカレントレコードになり、マクロだと当初のレコードがそのままカレントレコードのままです。
なんで、全く同じプロシジャーを呼び出しているのに、VBAで呼び出したときと、マクロで呼び出したときで変るのでしょうか？
抽象的ですみません。

39:名無しさん＠そうだ選挙にいこう
08/01/10 15:25:50
当り前だ。
そういうの理解が面倒なら桐にしとけば楽。

40:>>32
08/01/10 19:29:54
>>32です。
>>33様、>>34様、ご指導いただいたとおりやったら見事できました。
本当にありがとうございました。
おかげでとても助かりました。

41:38
08/01/11 03:28:45
>>39
当たり前なんですか?
ヒントでもいただけたら。。。
キーワードがあれば検索しますので。。。

42:名無しさん＠そうだ選挙にいこう
08/01/11 08:26:06
【システム環境　 . 】 WindowsXP SP2, Access2000
【 VBAが使えるか .】いいえ
【 VBAでの回答　　】否
【検索キーワード　】インポートされない

Access2000で、あるCSVをインポートしたところ、数字の項目正しく入らない
事象が起きました。
（CSVでは"665554368"という数字が、Accessでは"665554340"になってしまいます。）
金額に該当する項目なので、正しく入らないと困るのですが、原因は何が
考えられ、どうすれば解決するでしょうか？

以下の方法を試しましたが、いずれもダメでした。
・該当の値が入るフィールドのデータ型を以下のものにする。
　→通貨型、単精度浮動小数点型、倍精度浮動小数点型
　（いずれもダメです）

・CSVの区切り文字を別の文字に置換する。
　→"｜"だったものを、","区切りにしましたがだめでした。

・CSVをExcel2003形式で保存し、Excelをインポートする。
　→直接CSVをインポートしたときと同じ数字になりました。

43:名無しさん＠そうだ選挙にいこう
08/01/11 16:32:23
これ飲んで男になれよ
URLﾘﾝｸ(www.urllite.com)

44:名無しさん＠そうだ選挙にいこう
08/01/11 16:39:13
フィールドのデータ型を文字型にしたらどうだろう？

45:名無しさん＠そうだ選挙にいこう
08/01/11 18:46:15
>>42

マルチかよ。

46:名無しさん＠そうだ選挙にいこう
08/01/12 13:00:01
質問させて下さい

【システム環境　 . 】 Windowsxp, Access2003
【質問内容】メニューバー（ファイル,編集,・・・）が表示されない。何か操作を間違えて消えてしまったのでしょうか？
　　　　　　　　修復setupをやってみましたが変化ありません。
　　　　　　　　officeのアンインストール、再インストールは影響が大きすぎるのでまだやっていません。
　　　　　　　　よきお知恵を下されば幸いです。

47:名無しさん＠そうだ選挙にいこう
08/01/12 13:25:26
>>46
[Shift] を押しながら起動してみて

48:名無しさん＠そうだ選挙にいこう
08/01/14 12:44:35
windowsXP access2002
顧客名簿を作って、他のPCにmdbファイルを移したところ、
住所の県以下を取得する「市区町村番地:Mid([住所],InStr([住所],"県")+1)

49:48
08/01/14 12:53:23
途中で、書き込んでしまった･･･。
つづき

というのをクエリに書いているのですが、
作ったPCでは、正常に新しいフィールドができるのですが、
移したPCでは、「式に未定義関数'MID'があります。」と出てエラーになります。
見直しても、なんら変わらないのにエラーがでます。
移したPCもwindowsXP access2002です。
何が原因かわかりません。どなたか、アドバイスをよろしくお願いします。

50:名無しさん＠そうだ選挙にいこう
08/01/14 12:56:39
>>48
参照設定をチェックしてみて

51:名無しさん＠そうだ選挙にいこう
08/01/14 13:06:36
>>50
できました。
ありがとうございました。

52:名無しさん＠そうだ選挙にいこう
08/01/14 14:33:52
いま、巨大なフォームAの上にフォームB～Eが乗っているフォームを使っています。コマンドボタンでフォームF～が呼び出せますが、これはフロート状態になります。
フォームA～Eつまりフロートではないフォームにフォーカスがあるときはアクセスキーがいつでも使えます。
つまり、フォームBにフォーカスがあっても、フォームC用のアクセスキーが反応します。フロートのにフォーカスがあるときは反応しません。
このアクセスキーと同じ事をkeydownでやろうとすると、keydownをフォームA～Eに記述しないといけなくなります。
アクセスキーの内容を一発で書けるコードはありますでしょうか？

53:46
08/01/15 07:50:21
>>47
遅くなりましたがありがとうございました。
メニューバーを消すモジュール組み込んであるmdbを走らせてしまったようです。
そのときは右クリックも効きませんでした。なんとか解決できました。

54:名無しさん＠そうだ選挙にいこう
08/01/16 18:46:09
今作ってるんですけど、
キーをオートナンバーにすると１から始まります。

取引先に請求書出すのに１とか２とか使うと
小さい会社だと思われるので、せめて１０００００からと６桁の番号からにしたいんです。

なんかいい方法ないでしょうか？

55:名無しさん＠そうだ選挙にいこう
08/01/16 18:53:16
Windows PowerShell を使用して Microsoft Access データベースからレコードを取得する方法はありますか。

56:名無しさん＠そうだ選挙にいこう
08/01/16 21:59:02
>>55
URLﾘﾝｸ(www.microsoft.com)

どうやら最終回みたいだなｗ

57:名無しさん＠そうだ選挙にいこう
08/01/16 23:39:06
>>54
+10万でも+20万でも好きなだけ水増しした数字をレポートに印字しとけ

58:名無しさん＠そうだ選挙にいこう
08/01/18 17:42:07
本当に初心者の質問です。

excelの表が、Accessにインポートできません。
ファイル→外部のデータの取り込み→インポートで
ファイルを指定してインポートしても無反応。

ちなみに、
①フィールド名、データ型、フィールドサイズは両方一致してます
②他の点でも問題なさそうです。

これは何でなんでしょうか？
ちなみに、エクセルの表は、参考書が指定するHPからダウンロードしました。
誰か助けて・・・・

59:名無しさん＠そうだ選挙にいこう
08/01/18 17:47:54
>>58です。
ちなみにOSはwindows XP
ソフトはaccess2003

自分で作成したテーブルに、HPでダウンロードしたexcelのデータを
インポートしたいのです。
インポートすると、ワークシートインポートウィザードが
出てくるそうなのですが、
無反応なのです。　上にも書いたとおり、フィールド名他の要素は
確認したら一致していました。

どうぞよろしくお願いします。

60:名無しさん＠そうだ選挙にいこう
08/01/18 20:44:34
ソートしてレポートをつくったとき、
ソートした結果で上から1,2,3,…とナンバーを振るにはどうし
たらいいですか？
ううう
あああ
いいい
というテーブルから
１　あああ
２　いいい
３　ううう
とレポートをつくりたいです。

61:名無しさん＠そうだ選挙にいこう
08/01/18 20:50:19
>>60
そのレポートが使うクエリで並べ替えをすればいいのでは？

ついでに、
「っ」→「つ」のように小さい字を大きい字にする関数ってありますか？replaceが一番早いのでしょうか？

62:名無しさん＠そうだ選挙にいこう
08/01/18 23:16:48
>61
並べ替えた上で、１，２，３…と番号をふりたいのですがどうやったらいいのでしょうか。

63:60
08/01/19 08:55:43
【システム環境　 . 】 WindowsXP, Access2003
【 VBAが使えるか .】いいえ
【 VBAでの回答　　】否
【検索キーワード　】自動順番番号ナンバークエリ、これらを組み合わせて

すみません、以前の書き方があいまいでした。
[名前]というフィールドをもつテーブルがあり、
[名前]でソートしたクエリを作るとき、

[名簿番号][名前]

という２つのフィールドにしたく、
名簿番号は名前のソートした順に１，２，３…と
上のレコードから順番に番号をつけたのです。

どのようにしたらできるでしょうか。

64:名無しさん＠そうだ選挙にいこう
08/01/19 08:56:54
>>63
君には桐が向いてるよ、連番って関数が始めから用意してある

65:60
08/01/19 09:12:03
>64
おぉ！
おぬし、ツンデレですな。このスレの人みんなツンデレか？

accessのヘルプで｢連番｣で検索したらわかりました！
ありがとうございます。

66:前880
08/01/21 01:01:05
前スレで以下の質問をしたものです。
【システム環境　 . 】 WindowsXP, Access2003
【 VBAが使えるか .】いいえ
【 VBAでの回答　　】なるべく否
名前・第一希望・第二希望をフィールドに持つ
このようなテーブルがあり、

名前|第一希望|第二希望
鈴木|モモ　　|リンゴ
佐藤|ブドウ　|リンゴ
福田|リンゴ　|ブドウ
守屋|モモ　　|イチゴ
阿部|ブドウ　|イチゴ

以下のようなレポートを作成するにはどうしたらいいでしょうか。
クラス分けで考えましたが、第一希望と第二希望で２箇所でグループを作りたいのですが、
いい方法はありますか？

-モモ希望
鈴木|モモ　　|リンゴ
守屋|モモ　　|イチゴ
-リンゴ希望
鈴木|モモ　　|リンゴ
佐藤|バナナ　|リンゴ
福田|リンゴ　|ブドウ
-ブドウ希望
佐藤|ブドウ　|リンゴ
福田|リンゴ　|ブドウ
阿部|ブドウ　|イチゴ
-イチゴ希望
守屋|モモ　　|イチゴ
阿部|ブドウ　|イチゴ

67:名無しさん＠そうだ選挙にいこう
08/01/21 01:02:07
前スレで以下の質問をしたものです。
【システム環境　 . 】 WindowsXP, Access2003
【 VBAが使えるか .】いいえ
【 VBAでの回答　　】なるべく否
名前・年齢・第一希望・第二希望をフィールドに持つこのようなテーブルがあり、
以下のようなレポートを作成するにはどうしたらいいでしょうか。

名前|年齢|第一希望|第二希望
鈴木|２０|モモ　　|リンゴ
佐藤|２５|ブドウ　|モモ
福田|５０|リンゴ　|モモ
守屋|３５|モモ　　|イチゴ
阿部|４０|ブドウ　|イチゴ

新たな要望が出てきて、第一希望が(モモ)の人を年齢順に並べ、
その下に第二希望が(モモ)の人を年齢順に並べたレポートを作りたいです。

-モモ希望
守屋|３５|モモ　　|イチゴ
鈴木|２０|モモ　　|リンゴ
福田|５０|リンゴ　|モモ
佐藤|２５|ブドウ　|モモ
-ブドウ希望
(略
-イチゴ希望
(略
-リンゴ希望
(略

いい方法を教えてください。
自分のやってみた方法は以下です。

68:前880
08/01/21 01:06:37
67の１行目は消し忘れです…

前スレでは、
>Unionクエリで擬似的に希望マスタ作れば。
>select 第一希望 as 希望 from T
>union
>select 第二希望 as 希望 from T
>そしたら、こんな風なクエリを作れるべ。
>select Q.希望, T.*
>from Q, T
>where (Q.希望=T.第一希望) or (Q.希望=T.第二希望)
というレスでできました。

今回、自分でやってみたのは、
第一希望で年齢順にしたものと、第二希望で年齢順にしたものを
ユニオンでつなげたクエリを作り、
希望マスタでグループ分けしたレポートを作りました。

しかし、レポートでは年齢順に並びませんでした。

69:名無しさん＠そうだ選挙にいこう
08/01/21 16:01:26
レポート使った事ないんでアレなんだけど、
UNIONクエリで作成されるデータで、レポート表示用にテーブルを作ってみたら？
取り出すSELECT文ごとに、'1'、'2'、'3' ってフィールドを追加しとけば、
いざレポートを作成するときのソートキーに組み合わせることもできるだろうし。

70:名無しさん＠そうだ選挙にいこう
08/01/21 22:21:30
入力と出力の仕様の乖離があまりにも激しすぎる場合は>>69の意見が正解。

ちなみにレポート定義の並び順が設定されてるとレコードソースにどんなorder byが
設定されていようとレポート定義の並び順のほうが優先されるんだけど、それは大丈夫？

71:名無しさん＠そうだ選挙にいこう
08/01/22 08:07:04
Access2003(WindowsXP SP2)をつかっています。

レポート中にpng透過画像を貼り付けたのですが、透過部分が"白"になってしまい、
透明になりません。

社名の上に押印した感じにしたかったのですが、なにかやり方ありますか？

72:名無しさん＠そうだ選挙にいこう
08/01/22 21:45:11
社名の上に押印した感じのpng画像を貼り付けるんだ

73:名無しさん＠そうだ選挙にいこう
08/01/22 23:45:27
重ねる順序を印鑑のpng画像を下にしてその上に
社名のテキストボックスもしくはラベルの背景を透明にする
っていうのじゃダメ？

74:名無しさん＠そうだ選挙にいこう
08/01/23 08:09:35
>73
それだと押印の上に社名が…って、釣りだったのですね、そうなのですね。

75:名無しさん＠そうだ選挙にいこう
08/01/23 08:59:22
レポートの重ね合わせは、桐にしとけ

76:73
08/01/23 10:02:30
>>74

>それだと押印の上に社名が…

そうだけど、印刷したら大して変わらないんじゃない？
別に釣りじゃないよ。

77:71
08/01/23 10:31:31
>>76

試したんですが、雰囲気がいまひとつでした。
やっぱり文字の上に重ねたいですね、、、
って>>73のコロンブスの鶉の卵的な発想にやり方が良さそうです。

これでFAかと。

78:名無しさん＠そうだ選挙にいこう
08/01/23 14:31:24
透過gifにしとけ　　とだけ言っておこう

79:名無しさん＠そうだ選挙にいこう
08/01/23 19:49:42
社名だけの画像を持ったレポートと、社名・押印の画像を持ったレポートを用意しておき、押印フラグでopenreportを振り分けろ。

80:名無しさん＠そうだ選挙にいこう
08/01/23 21:17:43
すみませんが教えてください。
CSVファイルをVBAでInput
を使用して取り込もうとしています。
只ｃｓｖファイルの先頭行に項目名があって
それは取り込む必要がないのですが、どのようにすればいいのでしょうか。

81:名無しさん＠そうだ選挙にいこう
08/01/24 01:14:34
>>80
手作業でインポートしてみて

ファイル→ファイブデータの取り込み→テキスト形式を選択
先頭行をフィール行として使うのチェックを入れ
設定をクリック、定義名をつける。

VBAでインポートする際その定義名を指定してインポートすればよい

Access csv インポート定義
で検索すれば出てくるかな？

82:71
08/01/24 09:37:53
>>78
世論では透過gifも使えないらしいですが、ひょっとしていけるの？

>>79
印影つきがあれば社名のみはいらないかと思ってます。
でも、そういう振り分けも気が利いてていいですな～

83:名無しさん＠そうだ選挙にいこう
08/01/25 17:35:07
select * from t1
left join t2 on t1.key = t2.key

たとえばこんなケースで、各行のデータについて別個に

if (t1.Value > t2.Value) then
　　(t1.Value - t2.Value) * 10
else if (t1.Value > t2.Value * 2)
　　(t1.Value - t2.Value * 2) * 100 + (t1.Value - t2.Value) * 10
else
　　0

としたい場合、どのような手段がよいでしょうか？？
結果をテーブルに挿入したいと思います。

できればSQL文で記述したいですが、VBAを使ったものでもOKです。
よろしくお願いいたします。

84:名無しさん＠そうだ選挙にいこう
08/01/25 17:54:52
iifの入れ子にすればSQLでOK
Nz(t1.Value, 0)は忘れずに

85:名無しさん＠そうだ選挙にいこう
08/01/25 22:08:38
Access2000に関して質問です。

編集中の話なんですが、
ファイル内クエリ・マクロの数が増えすぎて視認性がかなり悪くなってきています。
クエリ・マクロなどをディレクトリ構造ぽく表示させたり、
編集する気のないものを他に移すなどの操作は可能でしょうか？
それともこういうときは.mdbファイルを複数作るしかないでしょうか？

86:名無しさん＠そうだ選挙にいこう
08/01/25 22:21:33
グループってのがあるけど、使い方がよくわからんな。

87:名無しさん＠そうだ選挙にいこう
08/01/26 01:42:56
>>86
ショートカットのグループだから編集中はイマイチ使いにくいね。
ユーザーとして使うときは下手なメニューフォームより使い安い。

88:名無しさん＠そうだ選挙にいこう
08/01/27 14:44:56
Microsoft Office Access 2007 のリリースと共に、Access 2007 Developer Extensions および Access 2007 Runtime の無料ダウンロードが利用できるようになります。
データベース開発者は、これらのユーティリティに用意されているツールを使用することで、データベースをパッケージ化して展開したり、データベーステンプレートを作成したりできるほか、
データベースを Microsoft Visual SourceSafe などのソースコード管理システムに統合することもできます。

Access 2007 Developer Extensions または Access 2007 Runtime のダウンロード方法と使用方法の詳細については、[参照] セクションのリンクを参照してください。

89:名無しさん＠そうだ選挙にいこう
08/01/28 23:26:54
Access2007だと、フォームに作ったコマンドボタンにショートカットキーが登録できないのですか？
&Aとか

90:89
08/01/31 12:00:26
でけた
つーか、MSは、なるべくXMLでリボン記述させようとしてヘルプをワザと手抜きしてる希ガス

91:名無しさん＠そうだ選挙にいこう
08/01/31 21:37:35
Accessバグ多すぎだわ。
桐にしよ。

92:名無しさん＠そうだ選挙にいこう
08/02/03 13:12:19
みなさんにとってはクソ簡単なことでしょうが、初心者の私には頭がパンクしそうなので教えてください。
Ｌｅｆｔ関数の質問です。

Ａという入力欄があり、そこに
111111111122222222　or　1111111111122222222
と入力できます。

2は８桁固定です。
しかし1が１０桁or１１桁なのです。

1だけを抜き出すのはどうしたらよいのでしょうか？

Left(A,A-8) なんてことはできないのでしょうか？？

93:名無しさん＠そうだ選挙にいこう
08/02/03 13:17:37
簡単。でもLEFT関数だけじゃ無理。入力欄をA1として
=LEFT(A1,LEN(A1)-8)

94:名無しさん＠そうだ選挙にいこう
08/02/03 13:19:08
あ、ここACCESSだった。ごめん。でもやり方は同じよ

95:92
08/02/03 13:29:43
>93

ありがとうございます。
できました。
感謝です。

96:名無しさん＠そうだ選挙にいこう
08/02/03 22:20:05
型番　　日付
A　　　 2008/02/03
B　　　 2008/02/04
C　　　 2008/02/05
D　　　 2008/02/06
E　　　 2008/02/07
F　　　 2008/02/08

エクセルで上記のような表があるとします。
クエリに関数を入れて本日～4日後の2008/02/06までを”全て”
抜きとって表示したいのですが関数わかる方おられませんか。

2008/02/07と2008/02/08は不要としたいのです。
自動的に毎日4日間を抜き取ることはできますか？

97:名無しさん＠そうだ選挙にいこう
08/02/03 23:02:03
>96
日付部分の抽出条件に
Between Date() And Date()+4

98:sage
08/02/05 18:02:19
エラーの説明を取得したいのですが、
AccessError(エラー番号）でエラーの内容を取得すると
既定の文書は表示できるのですが、
例えばエラー2473で説明文の|2と|1を取得することは可能でしょうか？

99:名無しさん＠そうだ選挙にいこう
08/02/05 18:23:05
AccessClubで質問してみます。マルチすみませんでした。

100:名無しさん＠そうだ選挙にいこう
08/02/09 14:54:29
【システム環境　 . 】 WindowsXP**, Access2003 SP3**
【 VBAが使えるか .】はい
【 VBAでの回答　　】可
【検索キーワード　】 mdb リンクテーブル　バックアップ

現在システムＭＤＢとデータＭＤＢを作成しリンクテーブルを張って動かしています。
システムＭＤＢ起動中にフォームのコマンドボタンからデータＭＤＢのバックアップをとる方法を教えてください。

101:名無しさん＠そうだ選挙にいこう
08/02/09 17:22:57
バックアップと同時に最適化もできておすすめ

DBEngine.CompactDatabase "C:\××××\Data.MDB", "C:\データバックアップ\Data.MDB"

102:名無しさん＠そうだ選挙にいこう
08/02/09 17:45:06
クロス集計で前年同月との売上比較を行っています。
クエリ実行後の形が

　　　　　　200701 200801
売上先１　50,000　65,000
売上先2　30,000　40,000
…

となっているのですが、この右側に前年同月比の増減を設けるにはどうしたら良いでしょうか。
列名は年+月なので、毎月変わります。
現在増減はエクセルを介して作成しているのですが、
アクセス上で完結させたいのです。宜しくお願いします。

103:名無しさん＠そうだ選挙にいこう
08/02/09 18:58:33
>>102

クロス集計クエリーをべースにクエリーを作れば
いいんじゃないかな

104:名無しさん＠そうだ選挙にいこう
08/02/09 19:02:41
102です。
増減部分が上手く行かないのです。
>103さんならどのように記述しますか？

105:名無しさん＠そうだ選挙にいこう
08/02/10 11:02:36
>>101
回答ありがとうございます。
この式はdata.mdbが閉じていることが条件のようですが、
システムmdbとdata.mdbはリンクテーブルを張っていますのでシステム側から、この式を実行することができません。
何か解決方ありますでしょうか

106:名無しさん＠そうだ選挙にいこう
08/02/10 13:56:27
リンクテーブルが張ってあるだけなら問題なく実行できる、
実行不可なのはリンクテーブルのどれかが使用中だから。

連結フォームや連結レポートはきちんと閉じて、data.ldbの有無を
事前にDir()関数で調べてから実行しる。

107:名無しさん＠そうだ選挙にいこう
08/02/10 14:16:21
>>104
>>104
102の結果になるようなテーブルをつくって
クロス集計をベースにしたクエリーを作ってみたけど
差額は計算されたよ

ＳＱＬで表示させたら以下になった。

SELECT テーブル2のクロス集計.売上先, テーブル2のクロス集計.[200701], テーブル2のクロス集計.[200801], [200701]-[200801] AS A
FROM テーブル2のクロス集計;

列見出しが毎月変わるという問題があるけど
抽出条件の設定をどうやっているかわからないので
とりあえずこれだけで

108:名無しさん＠そうだ選挙にいこう
08/02/10 14:16:27
もうバッチ使ってコピーしちゃえば

hoge.bat
作って
XCOPY C:\×××××　C:\バックアップ/Y
ってコマンド書いて

Call Shell("C:\hoge.bat", 1)
で実行するのはどう？

109:名無しさん＠そうだ選挙にいこう
08/02/10 16:25:47
Access初心者です。申し訳ありませんが知恵をお貸しください。

【システム環境　 . 】 WindowsXP, Access2007
【 VBAが使えるか .】いいえ
【 VBAでの回答　　】否
【質問内容】 AccessをWeb上の画面で使用することは可能でしょうか？
Access2003では作成する機能があったと思うのですが・・・。
　　　　　　　
　　　　　　　インポート（エクスポートかも？）などでテーブルを表示するだけでなく
　　　　　　　web状で実際に「名前」や「年齢」などを設定して「検索ボタン」で該当する
　　　　　　　データが見れるようにしたいです。

　　　　　　　よろしくお願いいたします。

110:名無しさん＠そうだ選挙にいこう
08/02/10 18:12:22
>107　ありがとうございます。
しかし問題は、おっしゃる通り列見出しの処理です。
また、多重クエリではどうしても
列名称が一度フィックスされてしまい、動的に対応できません。
そのため、できれば単一クエリで一石二鳥の解決策を探しています。

とりあえずは
クエリ１で、当月以前の月に"0","1","2"... と列名称を付け、13ヶ月分を集計。
クエリ２で、クエリ１の列"0","12"をそれぞれ"当月","前年同月"として再抽出し、
"[当月]-[前年同月]"を増減として抽出しました。
ご協力ありがとうございました。ですが
もっとエレガントな解決法があればお知恵をよろしくお願いします。

111:名無しさん＠そうだ選挙にいこう
08/02/10 23:47:28
>>109
つ「ASP.NET」

112:名無しさん＠そうだ選挙にいこう
08/02/12 17:27:50
>>101
>>106
>>108
いろいろと回答ありがとうございました。
結局、DBEngine.CompactDatabaseを使ってリンク元バックアップをとりました。
システム.mdbの終了時に確認フォームを設け、data.mdbのバックアップをとるかどうかのチェックボックスを作り便利になりますた。

113:名無しさん＠そうだ選挙にいこう
08/02/14 16:54:09
【システム環境 . 】 Windows2000/XP, Access2000
【 VBAが使えるか .】はい
【 VBAでの回答　　】可

初歩的な質問すません。

＜実現したいこと＞
フォームのサイズが変更されても常にフォームの一番下にボタンを表示したいのだすが
なかなかうまいこといきません。。

＜試してみたこと＞
フォームの最大化ボタンを有効にしてそれが押されたらフォームリサイズイベント（Form_Resize()）で
フォーム上のコントロールのTOPとLEFTを変更して位置を移動したいんだけどエラーが発生します。
フォームが最大化する前のエリア外には移動できないみたいです。。
（エラー番号：2100
　エラー内容：コントロールまたはサブフォームコントロールが大きすぎるため、配置できません。）

解決方法がありましたらぜひ教えてくださいませｍ(_ _)ｍ

114:名無しさん＠そうだ選挙にいこう
08/02/14 19:58:17
>>113
ボタンをフォームフッタに配置する。（のは駄目なのか？）

115:名無しさん＠そうだ選挙にいこう
08/02/14 21:24:21
フォームのサイズ変更不可にしちゃいなYO！

116:113
08/02/15 09:54:40
レスありが㌧

>>114
おっと書き忘れ、単票フォームで表示してるんす。。
帳票フォームだったらその手がありますね(^-^)

>>115
最初はそうしてたんだけどお客さんのディスプレイ解像度がまちちまでさ…
17インチ使ってるのに1024x768にしてる人がいてびっくり。。

常にフォームの一番下じゃなくて、上にボタンを配置するしかないかなぁと考えとります。
（他の画面とはボタン配置が違っちゃうけど泣き入れよかな。）

117:名無しさん＠そうだ選挙にいこう
08/02/15 10:04:51
単票フォームにヘッダやフッタがないのか？

118:113
08/02/15 15:01:16
>117
単票フォームにヘッダやフッタ、ありやした～！（すっかり無いものと勘違いしてたす）
フッタにボタンを置いて問題解決っす！！
どうもありが㌧ッ！！

119:名無しさん＠そうだ選挙にいこう
08/02/15 22:12:34
>>110
自己結合すりゃ良いじゃん

120:名無しさん＠そうだ選挙にいこう
08/02/15 22:28:22
>119
ぐぐって見ましたが良く解りません。
具体的にどうしたら良いでしょうか？

121:名無しさん＠そうだ選挙にいこう
08/02/15 22:34:42
[年月] に1年足した [年月+1年] を作って、[年月] と [年月+1年] をリレーション

122:名無しさん＠そうだ選挙にいこう
08/02/16 00:25:13
まあフィールド名が動的って時点でうんこ設計なんですけどね

123:名無しさん＠そうだ選挙にいこう
08/02/16 12:48:40
フォームテキスト内に既にある内容を、バックスペースやデリートで空にした瞬間、
同フォームのコマンドボタンを使用不可能にする処理を教えて下さい。

因みに自分が書いたコードは次の通りですが上記のように動きません。

Private Sub テキスト_Change()
If IsNull(Me!テキスト) = True Or Me!テキスト = "" Then
Me!コマンドボタン.Enabled = False
Else
Me!コマンドボタン.Enabled = True
End If
End Sub

124:名無しさん＠そうだ選挙にいこう
08/02/16 13:11:45
OnDirty

125:名無しさん＠そうだ選挙にいこう
08/02/16 13:28:06
>>124
回答ありがとうございます。
Dirtyイベントは既に試しましたが、使用フォームが連結フォームでないため機能しないようですね。
私のフォームは非連結フォーム、非連結テキスト。。。
もう少し考えてみます。
また良い案がありましたら教えて下さい。

126:名無しさん＠そうだ選挙にいこう
08/02/16 14:02:00
OnKeyUpでTextプロパティ見りゃいいじゃん。

127:名無しさん＠そうだ選挙にいこう
08/02/16 16:21:32
Private Sub テキスト_AfterUpdate()

ならおＫ

128:名無しさん＠そうだ選挙にいこう
08/02/16 16:36:11
>>123
プロパティを暗黙的に使用するとこういう間違いが起きやすい。
Me!テキスト.Value
Me!テキスト.Text
この２つの違いをきちんと理解しる。

>>126さんも言ってるけど、この場合はTextプロパティを参照すれば
ChangeイベントでもOnKeyUpでも実現可能。

129:126
08/02/16 18:03:23
>>128
>123 の「バックスペースやデリートで空にした瞬間」だけ満たしゃ
いいなら、どっちでもいいね。
後は右クリックから切り取りや貼り付けされたときにどうしたいのか
によってお好きな方でって感じかな。

130:名無しさん＠そうだ選挙にいこう
08/02/16 19:11:34
いろいろと有り難うございます。
勉強になりました。
みなさんの回答を拝見するほど自分の無知を痛感しますorz

131:名無しさん＠そうだ選挙にいこう
08/02/16 20:37:58
お聞きしたいのですが
クエリを削除してもＨＤの容量が減らないのですが
これは永久的に減らせないのでしょうか？
テーブルについてもそうなのでしょうか？

132:名無しさん＠そうだ選挙にいこう
08/02/16 20:45:44
>>131
最適化してみたら？

133:名無しさん＠そうだ選挙にいこう
08/02/17 18:29:47
ｷﾀ━━━━━(ﾟ∀ﾟ)━━━━━ !!!!!

A few readers have recently expressed concern and anxiety about an article published by The Register. Particularly,

“VBA will disappear completely when Office 2007 for Windows is replaced, sometime around 2009.”

134:名無しさん＠そうだ選挙にいこう
08/02/17 20:19:38
これって次のofficeでVBAがなくなるってこと？

機械翻訳

数人の読者が最近、Registerによって発表された記事に関して関心と心配を述べました。特に

「完全にいつか2009年にWindowsのためのオフィス2007を取り替えるとき、VBAは見えなくなるでしょう。」

135:名無しさん＠そうだ選挙にいこう
08/02/17 20:45:39
これは恥ずかしい。
ネタ元が「誤報でしたスンマソン」と言って訂正した記事を今ごろ出されても。ｗ

ちなみに、オリジナルはこの下に「んなこたねーよ」というのが続くんだけど、
そこはわざとカットしてある。
釣られたい人だけ釣られてください。

136:名無しさん＠そうだ選挙にいこう
08/02/17 22:06:36
Access2009ではVBAは付属しない、別途Visual Studioを購入する必要がある。
別にVBAがなくなる訳ではない。

137:名無しさん＠そうだ選挙にいこう
08/02/17 22:51:21
そんなんなったら事実上業務に使えなくなるじゃん
オマケで付いてるからこそ、用途の幅も広かったのに。
MS様も解っててやるんだろうけど。

138:名無しさん＠そうだ選挙にいこう
08/02/17 23:06:19
ソースもないネタ真に受けんなよｗ
必死杉ｗｗ

139:名無しさん＠そうだ選挙にいこう
08/02/17 23:12:40
既にMSDNライブラりからVBAが削除されてるしなぁ
Access2009でVBA動いてもエディタ削除されたら新規作成も編集も出来ないし

140:名無しさん＠そうだ選挙にいこう
08/02/17 23:31:47
2007にさえ上げる予定のない漏れに、2009の話なんてしてもムダ。

141:名無しさん＠そうだ選挙にいこう
08/02/18 09:18:40
KINGSOFT Office にVBAライセンスされたけど、やはりエディタは付属しないな

142:名無しさん＠そうだ選挙にいこう
08/02/18 09:33:31
VB自体が.netに移行するし。

143:名無しさん＠そうだ選挙にいこう
08/02/18 09:40:45
ま、Officeは2007で変なことになってるし桐にしろってこった。

144:名無しさん＠そうだ選挙にいこう
08/02/18 10:11:42
.NET Framework入れてメモ帳で開発するお！

145:名無しさん＠そうだ選挙にいこう
08/02/18 21:59:44
Mac版Office 2008ではVBAがなくなったな。

146:名無しさん＠そうだ選挙にいこう
08/02/18 22:12:27
なくしたというより、間に合わせる時間がなかったらしい。

147:名無しさん＠そうだ選挙にいこう
08/02/19 11:24:42
ねえ、SQLマスターすればVBA使わなくてもアクセス不自由なく使いこなせますか？

148:名無しさん＠そうだ選挙にいこう
08/02/19 15:04:37
単純なSelect文なら選択クエリの方が簡単

149:名無しさん＠そうだ選挙にいこう
08/02/19 21:18:11
VBAマスターすればマクロ使わなくても不自由しない。
VBAとSQLの知識はそれぞれ別モノだから完全に使いこなすには両方とも必要。

150:名無しさん＠そうだ選挙にいこう
08/02/19 22:16:48
VBA使わないと非常に不自由するだろうな

151:名無しさん＠そうだ選挙にいこう
08/02/19 23:41:49
まだVHS使ってるオレは勝ち組。

152:名無しさん＠そうだ選挙にいこう
08/02/20 11:36:22
【システム環境　 . 】 WindowsXP, Access2000 SR-1 professional
【 VBAが使えるか .】いいえ
【 VBAでの回答　　】否
【検索キーワード　】更新できないクエリ　複数のリレーション
テーブル1
取引先ID（主キー、オートナンバー）、会社名、営業担当、営業補佐担当
テーブル2
社員ID（主キー、オートナンバー）、氏名
クエリ1
テーブル1：営業担当、テーブル1：営業補佐担当は、取引先に対する当社の担当者のことで、それぞれテーブル2：社員IDをルックアップさせ、テーブル2：氏名を表示させたい。

…のですが、同じフィールドに2つのリレーションがダメみたいで、うまくいきません。
どうしてたらよいでしょうか。
アクセス初めてまだ数ヶ月の初心者です。
みなさまのお知恵をお貸しください。
よろしくお願いいたします。

153:名無しさん＠そうだ選挙にいこう
08/02/20 12:21:51
クエリデザインのテーブル表示で、同じテーブルでも追加できるはずだが・・・

154:152
08/02/20 13:27:41
>153さん
なるほど…。

と思ってやってみたのですが、うまくいきません。
･リレーションシップを開いて、テーブル2_1を追加。
　テーブル2：社員ID（1）　-　テーブル1：営業担当（多）
　テーブル2_1：社員ID（1）　-　テーブル1：営業補佐担当（多）
　のようにリレーションを設定
･クエリのデザインビューにおいて、すでにあるテーブル1とテーブル2（1-多のリレーションが表示されている）にテーブル2_1追加。
･テーブル2_1：社員ID　-　テーブル1：営業補佐担当　を連結させる。
テーブル2_1：社員ID　-　テーブル1：営業補佐担当　の連結はできたのですが、1-多になりません。
データシートビューにするとレコードがまったく表示されなくなってしまいます。。。

155:名無しさん＠そうだ選挙にいこう
08/02/20 14:04:35
大きな勘違いしてないか？

156:152
08/02/20 15:37:42
>155
そうなんですか?
なにを勘違いしているのかわかりません。
おしえていただけないでしょうか(>_<)

157:名無しさん＠そうだ選挙にいこう
08/02/20 15:45:12
･リレーションシップを開いて、テーブル2_1を追加。
　テーブル2：社員ID（1）　-　テーブル1：営業担当（多）
　テーブル2_1：社員ID（1）　-　テーブル1：営業補佐担当（多）
　のようにリレーションを設定

これがいけない。
とりあえず、リレーションは取り消すべし。

158:152
08/02/20 17:35:48
>157
>とりあえず、リレーションは取り消すべし。
　テーブル2_1：社員ID（1）　-　テーブル1：営業補佐担当（多）
をはずしてみまら、できました。

いまいちよくわかってないんですが、
　テーブル2：社員ID（1）　-　テーブル1：営業担当（多）
もはずしたほうがいいでしょうか?

何度もすみません。

159:名無しさん＠そうだ選挙にいこう
08/02/20 17:39:22
意味もわからずヘタにリレーションを張ると、
障害の元になる。
アクセスに慣れるまでは一切つかうなもし。

次ページ