過去ログ

                                Page     515
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼ファイル参照について  morik 04/2/26(木) 15:27
   ┗Re:ファイル参照について  クロ 04/2/26(木) 17:39
      ┗Re:ファイル参照について  morik 04/2/26(木) 17:50
         ┗Re:ファイル参照について  クロ 04/2/26(木) 17:54
            ┗Re:ファイル参照について  morik 04/2/26(木) 18:24

 ───────────────────────────────────────
 ■題名 : ファイル参照について
 ■名前 : morik
 ■日付 : 04/2/26(木) 15:27
 -------------------------------------------------------------------------
   現在ACCESS97を使ってファイルの参照を行うコマンドを作成しているのですが、命令を実行した時に以下のようなエラーが出てしまいます。

Private Sub 参照_Click()

Dim filename As String

filename = OpenFileDialog("CSVファイル取り込み", "c:\FL_FILE", "", _
    "CSVファイル (*.csv|*.csv|すべてのファイル (*.*)|*.*", ".csv")

Me!filename = filename

End Sub

コンパイルエラー:Sub または Function が定義されていません。

解決法をご存知の方ご教授お願い致します。

よろしくおねがいします。

 ───────────────────────────────────────  ■題名 : Re:ファイル参照について  ■名前 : クロ  ■日付 : 04/2/26(木) 17:39  -------------------------------------------------------------------------
   OpenFileDialog関数をユーザ関数として作成してますか?

 ───────────────────────────────────────  ■題名 : Re:ファイル参照について  ■名前 : morik  ■日付 : 04/2/26(木) 17:50  -------------------------------------------------------------------------
   クロさんいつも有難うございます。

OpenFileDialog関数は本で調べて使ったのですがユーザ関数は
作成していないと思います。

どうしたらユーザ関数を作成することができるのでしょうか?

今も本などで調べているのですが良く分かりません。

よろしくおねがいします。

 ───────────────────────────────────────  ■題名 : Re:ファイル参照について  ■名前 : クロ  ■日付 : 04/2/26(木) 17:54  -------------------------------------------------------------------------
   こちらが参考になるかと思います。
http://hp.vector.co.jp/authors/VA002273/access/

 ───────────────────────────────────────  ■題名 : Re:ファイル参照について  ■名前 : morik  ■日付 : 04/2/26(木) 18:24  -------------------------------------------------------------------------
   クロさん有難うございました。

無事ファイルを参照することが出来ました。

いつもありがとうございます。

またひとつ勉強になりました。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 515