• 締切済み

Accessの「式で型が一致しません」とは?

WordやExcelは人並みに使えるつもりですが Accessについては、ど素人です。 急なトラブルが発生したため 詳しいかたに助けていただければ幸いです! Access2000で作ったデータファイルが 今日になって突然開かなくなりました・・・ オブジェクトのフォームに作成し これまで使えていたものが なぜか開こうとすると 「式で型が一致しません」 というメッセージが出るようになったのです。 トラブルの原因として思いつくのは やはり今日なのですが データをソートしようとしたときに それができない旨のメッセージが出たため 理由が分かずそのままにしておいたということがあります。 OKWaveにはこれまでいろいろと助けていただいております。 ご回答をお待ちしています!

みんなの回答

  • ISO96968
  • ベストアンサー率42% (34/80)
回答No.1

数値を入れなくてはならない 処に 文字列が入っている(または逆) 日付け の入力ミス いずれも Form で入力するときに 間違えると 警告は出るか 出すのですが・・・・ テーブルを 開いて 修正した時に 間違ってる事も 有りそうですね。 12345・・・の数字は 見ただけでは 数値か? 単なる文字か? テーブル や コントロール の プロパティーを確認しないと・・・ それに 直前に行った 操作を よく思い出して下さい。 ・・・ 操作ミスを記録するために 開発された 優秀な soft が ”キーロガー ”なんですが、使い方を間違ったので とんでもない事になりましたが 私は今も 会社の Access に 潜らせて 監視してます。 操作ミスを特定するには 一番たよりになるので ・・・

niftynejp
質問者

補足

選択することにより入力するデータが ソートできなかったので あれっ?と思ったことを覚えています。 入力の方法は数字による選択ですが 表示するのは文字です。 どうもすぐには対応できそうにないので 今日、Excelに移しました。 データ自体はこれから追加していっても 千行ちょっとで終わるので 大丈夫だと思います。 マクロなどを組み 自分なりに使いやすくしたつもりです。 こわいので しばらくはAccessに 手を出せないと思います・・・

関連するQ&A

  • access listviewで 型が一致しません

    次のコードをAccess2002とExcel2002のフォームに 貼り付け、実行したところExcelでは問題ありません がAccessでは型が一致しませんといってエラーにな ります。 これは何が悪いのでしょうか? よろしくお願いします。 Dim oLV As New ListView Set oLV = ListView1

  • AccessのWhere条件式について教えて下さい

    Access始めたばかりです。 テーブルのデータを修正するフォームを作る際にWhere条件式に ="消費者コードは?" & [消費者コード] と指定したところ、"このオブジェクトにはオートメーションオブジェクト"消費者コード"は含まれません。”というエラーメッセージが表示されました。 おそらく基本的なところで間違いがあると思うのですが、よくわからないので、 ご面倒だとは思いますがどなたか教えていただけませんでしょうか?

  • ACCESS抽出条件でデータ型が一致しません

    ACCESSのクエリで抽出条件に"20140106"と入力しますと下記のエラーメッセージが出てきます。 教えて頂けないでしょうか? 抽出条件でデータ型が一致しません。(Error 3464) Find 系メソッドの抽出条件式で、比較する値のデータ型がフィールドのデータ型と一致していません。

  • 抽出条件でデータ型が一致しません。のエラーメッセージが出る

    フォームで入力された値を、 次のファイルでクエリを読み込むときに代入するASPを作成しましたが、実行しようとすると、 「データ型が一致しません。」のエラーメッセージが出ます。 DBはACCESSを使用しています。ACCESSの対象テーブルで、 データ型を「テキスト型」にすると問題ないのですが、 「数値型」にすると、「データ型が一致しません」の エラーメッセージになります。 フォームでは、プルダウンで「数値」を選択するようになっています。 宜しくお願いします。

  • ACCESS2000VBAでエラー「型が一致しません」

    ACCESS2000で、フォーム上にボタンを作り、そのボタンをクリック時に 以下のイベント プロシージャを実行させています。 Dim dbs As Database Dim rst As Recordset Set dbs = CurrentDb Set rst = dbs.OpenRecordset("採番_相談者") Dim Number rst.MoveFirst Number = rst!相談者番号 Number = Number + 1 Me.相談者NO = Number '相談者NOはフォーム上のテキストボックスです。 で上記 Set rst = dbs.OpenRecordset("採番_相談者") の所で、「実行時エラー 13 型が一致しません」とエラーになります。 テーブル:採番_相談者は、オートナンバー型のIDフィールドと相談者番号という7桁のテキスト型で ”1000001”が入っています。(ちなみに、数値型に変えても同じエラーでした。) 詳しい方教えてください。お願いします。

  • Accessでクエリを作成したら・・・

    Accessでクエリを作成したら「式で型が一致しません」のエラーが出て、ヘルプには「JOIN式でデータ型の異なるフィールドを使用して2つのテーブルを結合しようとしています。」とありますが、意味がわかりません。自分ではどちらも同じ数字(コード)で結合しているつもりです。宜しくお願いします。

  • Access不一致クエリーの結果把握方法について

    Accessを使用して不一致データの抽出は出来るのですが、不一致があるかないかの結果をロジックに含める事は出来るでしょうか? 現在Accessを使って、データ変換処理を作成していますが、基になるマスター情報が存在しない場合があり、不一致データ抽出処理を作成しました。 この不一致データ抽出処理を使用して、不一致があった場合となかった場合に分けて、次の処理をコントロールしようと考えているのですが、どのような方法があるでしょうか? 例えば、変換基になるデータには顧客コードが登録されていますが、この顧客コードから顧客名を表示しようとした場合、当然新規顧客はAccessプログラム中のテーブルにはこの新規顧客が登録されていない為、名称が表示されません。 その為、不一致クエリーでもし顧客コードから名称を取り出せないものがあった場合のみ顧客テーブル登録のフォームを表示したいと思うのですが、どのように判断すればよいのでしょうか? すいませんが、お教え下さい。

  • オブジェクト型の変数にフォームを入れて操作した

    オブジェクト型の変数にフォームを入れて操作したいのですが Sub アクセス() Dim F As Form Set F = "フォーム1" End Sub 以下省略 フォーム1の部分が 「型が一致しません」と言うエラーになりまず。 どこが間違ってるのでしょうか?

  • アクセス2007 VBA 並べ替え

    テーブル1のフィールド1にデータを入れ それを元に帳票フォームを作成しました。 フォームヘッダー部分に 昇順ボタンと降順ボタンを作り、 ボタンを押すごとに並び替えを行いたいのですが どのようなVBAコードを書けばいいのかわかりません。 命令分としては、 「フォームに表示されるテーブル1のフィールド1データの 昇順に並べ替える」です。 SQLを使う方法ではなく、 DocmdかacCmdを使う方法が希望です。 アクセスのヘルプの ----------------------------------------- Access 開発者用リファレンス Form."OrderBy/並べ替え" プロパティ ----------------------------------------- を見ると、 ----------------------------------------- 構文 式.OrderBy 式 Form オブジェクトを表す変数です。 ----------------------------------------- と書いてありますがこの式がわからないのでご教授よろしくお願いします。

  • ACCESS2003でテーブルと一致したときだけメッセージを表示するには?

    はじめまして、アクセスでデータベースを作成していたのですが、わからないことが出てきてしまい困っております。 フォーム上で、テキストボックスに入力した文字列(テキスト形式)をテーブル内のデータと照合し、一致すれば「保留対象の商品です」、なければ「保留対象の商品ではありません」といったテキストボックスを表示できるようなボタンを作りたいのです。 登録条件を変更するのではなく、メッセージが表示できさえすれば良いのです。 IFとDcount、msgboxを組み合わせることで表示できるような気はするのですが、エラーが出てしまい、作動してくれません。 私の書いたVBAコードは IF Dcount("フィールド名","テーブル名","フィールド名="" & Me!テキストボックス名") = 1 Then Msgbox "保留対象の商品です" Else msgbox "保留対象の商品ではありません" End IF 結局、テキストボックスに入力されたデータと対象のテーブル内データを検索し、一致するデータを数えて、1個のときにメッセージを出すようにしてみたのです。 しかし、うまく動いてくれません。。 詳しい方がいらっしゃったらアドバイスいただければ幸いです。 よろしくお願いいたします。