
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
返答が遅くなりましてすいません。
>連結<->非連結はプロパティでマニュアル変更が出来そうな気がするのですが、>その方法が見つかりません。
マニュアルでプロパティを操作する場合、
「プロパティ」ウィンドウの「データ」タグの「コントロールソース」を設定します。
連結コントロールの場合、ここに連結されている項目名が表示されています。
非連結にするには、ここを消してください。
(普通にBackSpaceとかで消えます。)
これでOKです。
>今度はクエリーで2つのファイルをマッチングして作成したのですが・・・・
これは、別の問題になると思いますので、これでもう一つ質問を投げてはいかがでしょうか?
そうすればこの質問を見た方以外の方の目にも触れますから、それだけ回答が来る可能性が高くなりますよ。
また、記入していただいた内容だけでは原因を特定するのは厳しいと思いますので、今回で補足していただいたようにサンプルソースや、テーブルの関係、どのタイミングでどのように操作したか、エラーNoはこれ・・・
といったようにできるだけ細かく書いたほうが回答される可能性が高いと思いますよ。(めんどくさいんですけどね。)
では、がんばってください。
No.3
- 回答日時:
これが原因かわかりませんが、
こちらで試して同じようなエラーが出るものをお知らせします。
1・連結テキストボックスの連結項目が、
現在のフォームにリンクしているテーブルの項目にない。
2・連結テキストボックスの連結項目が、
オートナンバー型などの入力を許さないデータ型になっている。
別のフォームからコピーされたものということなので、
そのテキストに設定されている項目が違う可能性はあります。また、内部的にそのリンクの設定がコピーによって変になっている
可能性もありますので、一度そのテキストのデータ項目を再設定して
みてはいかがでしょうか?
コントロール自体をコピーして使うということは通常やってます。
そのほうが効率いいですからね。
ですから、やり方自体は問題はないはずです。
駄目なようでしたら補足してください。
早速回答いただきましてありがとうございます。
ウィザードで作成するということは、フォームに貼り付ける項目は非連結以外はすべてテーブルにリンクしていなければなら無いということですね。
連結<->非連結はプロパティでマニュアル変更が出来そうな気がするのですが、その方法が見つかりません。
今度はクエリーで2つのファイルをマッチングして作成したのですが、マッチングキーに新しい値をセットしようとすると、エラーになります。
テーブル”xxx”のレコードに、'一'側と対応するレコードがなくなります。
と、いうエラーが出て、またヘルプを参照できません。
結合プロパティで、両方一致するものだけという条件をはずしてあるので構わないと思ったのですが、うまくいきません。
それに、こういう処理をすると、ACCESSが正常に終了しません。
どういうことなのでしょうか。
No.2
- 回答日時:
テキストボックスに値を入れるタイミングは?
ユーザが入れるの?
→ 例えば、キーボード等から値を入力するのですか? これでエラーになる様なら、その時のコードと作成手順を書いて下さい。また、再現方法等が解りましたら、教えて下さい。
コード(VBA)から入れるの?
この場合が多いと思いますが、どのタイミングでいれるかでエラーになります。フォームのロード時では、またテキストボックスのオブジェクトができていないので、上記の様なエラーになります。その場合には、フォームのアクティブ時等にコードを移して実行してみて下さい。
この回答への補足
回答ありがとうございます。
説明が不足していました。 コードは No.1 の補足に記述しました。
フォームをウィザードで作成したのですが、うまくいかない部分は、別のフォームからコピーして張り付けたテキストボックスです。 こんなやり方は出来ないのでしょうか。
よろしくお願いいたします。
No.1
- 回答日時:
エラーの状況をもう少し詳しくうかがってよろしいですか?
>フォームを作り、画面のテキストボックスに値を入れると、エラーになります。
テキストボックスに値を入れるとは?
テキストボックスにキーボードから入れている。
VBAで、テキストコントロールに値を代入している。
などなど
また、VBAでやられているのでしたら、エラーの出るコードも教えていただけると助かります。
この回答への補足
回答ありがとうございます。
説明が不足しておりました。
コードを記述します。
Private Sub Furigana_Change()
'==============================================
Set SB = DBEngine.Workspaces(0).OpenDatabase("\acs\skw.mdb")
Set CUrc = SB.OpenRecordset("custom")
Set CTrc = SB.OpenRecordset("karte")
CUrc.Index = "cualtkey"
CTrc.Index = "ctaltymd"
CUrc.Seek "=", Me!furigana
Me!shimei = CUrc!shimei ' (1) ok
CTrc.Seek "=", CUrc!cuscd
Me!raitendate = CTrc!raikyakudate ’(2) ok
Me!PermaKusuri = CTrc!PermaKusuri ' (3) err
End Sub
(1)はウィザードでフォームを作成しました。
(2)は非連結です。
(3)は 元は別のフォームで作成し、コピーして、該当フォームに貼り付けたのです。 どうもこのやり方がうまくいかないのか指定の仕方が違うのかと思います。(2)も最初は(3)と同様でしたが、うまくいかないので非連結にしました。
(2)と(3)のフォームレイアウトは帳票形式です。
(1)は単票形式です。
このぐらいでお分かりでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
電子書籍プレゼントキャンペーン!
最大2万円超分当たる!マンガや小説が読める電子書籍サービス『Renta!』で利用できるギフトコードプレゼント実施中!
-
このオブジェクトに値を代入することはできません
その他(データベース)
-
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
Access VBA エラー2448について
Visual Basic(VBA)
-
4
Access サブフォームでの選択行の取得
その他(データベース)
-
5
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
6
アクセスVBAのMe!と[ ]
Access(アクセス)
-
7
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
8
Accessで、フォームからフォームへ値を引き継ぐやり方
Access(アクセス)
-
9
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
10
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
11
Accessでテーブルの値をテキストボックスに代入するには?
Access(アクセス)
-
12
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
13
ACCESSでコントロールソースの変更
Access(アクセス)
-
14
新規レコード行を非表示にしたい
Access(アクセス)
-
15
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
16
親フォームからサブフォームのレコードソースを設定
Access(アクセス)
-
17
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
18
フォームウィンドウを最前面に表示したい(ACCESS)
Microsoft ASP
-
19
ACCESS 「パラメータの入力」を消したい!!
Access(アクセス)
-
20
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
インポート時のエラー「データ...
-
5
pythonのopenpyxlについて
-
6
On ErrorでエラーNoが0
-
7
VBA データ(特定値)のある最...
-
8
実行時エラー'-2147467259(8000...
-
9
ACCESSで値を代入できないとは?
-
10
VB.net 重複チェックがしたいです
-
11
String""から型'Double'への変...
-
12
【VBA】ワークブックを開く時に...
-
13
worksheetFunctionクラスのVloo...
-
14
ApplicationとWorksheetFunctio...
-
15
文字列内で括弧を使うには
-
16
VBS Script のエラーについてお...
-
17
エクセル 足し算引き算で 空...
-
18
VBA auto_openでApplication.on...
-
19
変数にするとエラーになる理由は?
-
20
ACCESS97 実行時エラー '2455'...
おすすめ情報
公式facebook
公式twitter