• ベストアンサー

アクセスで

maruru01の回答

  • ベストアンサー
  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.1

こんにちは。maruru01です。 とりあえずの方法ですが、エラー番号を拾うというやり方です。 フロッピードライブがAドライブだとすると、 Dim Ret As String On Error Resume Next Ret = Dir("A:\", vbDirectory) If Err.Number = 52 Then   MsgBox "フロッピーディスクが準備されていません。", vbCritical   Err.Number = 0 Else   MsgBox "フロッピーディスクは準備されています。", vbInformation   Err.Number = 0 End If 要は、Dir関数のところで発生するエラーを拾うということです。 これは、CD-ROMやMOなどの他のリムーバブルドライブでも同様なので、転用出来ます。 一応エラーナンバー(52かどうか)を確認して下さい。 では。

koichi_
質問者

お礼

ありがとうございます。 大変勉強になりました。

関連するQ&A

  • ACCESS インポート時の重複チェック

    ACCESS2000を使用しています。 FDのデータをテーブルにインポートする処理があるのですが、データが重複しているかどうかのチェックはどうすれば出来るのでしょうか。 ご存知の方がいれば教えてください。 よろしくお願いします。 ※重複をチェックする項目は「個人コード」です。

  • MS Accessでデータインポート前に置換処理をするには

    OSは98、Access2000です。 あるオフィスコンピュータよりデータを、txt形式(カンマ区切り)でAccessにインポートしたいのですが、データの中に「"」が使用されていて、そのままインポートすると「解析不能の・・・」というエラーが出てしまいます。 そこで、Accessにデータをインポートする前に、置換処理をかけて「"」を違う文字に変換しそれからAccessにインポートするというような感じにしたいのですが、どなたかご教授いただけないでしょうか。 毎日インポートするデータですので、何かのボタンをクリックしたら実行されるような形で作りたいと思っております。 本当に少しならVBAが分かるようになってきましたので、アドバイス等よろしくお願い致します。

  • datファイルをACCESSへのインポートについて

    datファイル(固定長)をテキストに変換してからACCESSにインポートする、というやり方をした時、改行コードがなくサイズが大きいためか処理が中断してしまい、インポートできません。 ためしに件数を減らすと、インポートはできますが1レコードとして見えてしまうので、処理上都合が悪い状況です。 このようなデータをインポートするのに良いやり方があれば教えてください。 1ファイルあたりの最大サイズは、1000 * 800件です。 ACCESS2000を使用。

  • ACCESSで、データ型を変更したい。

    宜しくお願い致します。 ACCESSで、データ型を「数値」から「日付」に変更したいフィールドがあります。 が、「データが失われます」のメッセージが出てしまいます。EXCELからインポートしたデータを使用しているのですが、EXCELでは標準型になっています。 インポートする前に、EXCELの時点で日付に変更しないと駄目でしょうか。Access内でデータ型を変更することはできませんでしょうか。 (色々ありまして、できればインポートしたあとに一斉にACCESSで変更できれば・・・と思っています)

  • アクセス インポートファイルの再インポートを防ぐ

    アクセス2003を使用しています。 アクセスにて、エクセルファイルをインポートしています。 既にインポートしたエクセルファイルを再度インポートしないように、再取込みを行おうとした場合、 「既に取り込んでいるファイルです」とエラーメッセージを表示させて、取込み防止を行おうとしています。 クエリの重複チェックを設定していたのですが、行き詰ってしまいました。 アクセスのテーブル先頭フィールドの日付データ(yyyy/mm/dd)でチェックしたいと思っています。 教えてください。よろしくおねがいいたします。

  • EXCELをACCESSへ

    EXCELデータをACCESSへ取り込むのは簡単ですか? ACCESSのデータベースへ、EXCELの該当項目を抽出し、インポートしたいのです。 同じ処理の案件を大量に捌くことが目的です。

  • Access(アクセス)でのインポートについて

    テーブルのインポートでエクセルファイルをインポートしたいのですが「ワークシートインポートウィザード」の画面でテーブルを指定して保存すると 「Microsoft Access」の画面で「すべてのデータをテーブルに追加できませんでした。 キー違反のため、0件のレコードのデータが失われ、0件のレコードが削除されました。」と出てきて、保存できません。 もとのテーブルのデータ型を使ってインポートするにはどうしたらいいのでしょうか。よろしくお願いします。 インポートする元のデータ(エクセル)とインポート先(アクセス)の関係は次の通りです。 エクセルファイル    アクセスのテーブル (セルの書式設定)   データ型、フィールドサイズ --------------------------------------------- 数値          数値型、長整数型 文字列         テキスト型、16 インポートする前に元のエクセルデータをアクセスのデータ型に合わせただけではダメなのでしょうか

  • エクセル2000からアクセス2000へのインストール

    現在、エクセル2000からアクセス2000へのインポートを しているのですが、インポートするとテーブルのデータ型が 変更してしまい思うようにいきません。どなたかご存知でしたら ご教授ください。 具体的にいいますと、アクセスのテーブル上でデータ型が「Yes/No型」に なるようなインポートをしようと考えています。 逆にエクセルにエクスポートをすると、アクセス上で「Yes/No型」 だったものがTRUEとFALSEになったので、エクセル上でTRUEとFALSEを 記入してインポートしましたが、アクセス上ではデータ型は「Yes/No型」 でも表記が-1と0になってしまい、「Yes/No型」としての機能(フォーム 上でチェックボタンなどを使う)を使うことはできませんでした。 どなたかよろしくお願いします。

  • ACCESSのインポートやエクスポートの定義

    はじめまして windows7 ACCESS2007 を使用しております。 ACCESSは初心者レベルになります。 現在作成中のシステムでACCESSを使用しており、 データのインポートやエクスポートを頻繁に行います。 定義の保存は行っていまして、そこから実行すれば良い事も判ったのですが、 毎回「保存済みのインポート操作」や「保存済みのエクスポート操作」を開くのが 手間に感じております。 他の処理につきましてはボタンにて起動する様に出来たのですが、 インポートやエクスポートの操作がボタン化出来るかが判りません。 是非アドバイスなど頂けますと幸いでございます。 宜しくお願い申し上げます。

  • AccessからExcelファイルのデータ取得

    Access2000かExcelファイルのデータを取得したいのですが、 Excelファイルを一度 CSVファイルに変換し、その後Accessのテーブルへデータ取り込み といった手順をとりたいのです。 この方法って、どうコーディングすればいいのですか? (Accessのインポート処理は使用しない方法です)