過去ログ

                                Page     652
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼Access2002で作成したものを2000でも動かしたい!!  てっくす 04/6/2(水) 15:18
   ┣Re:Access2002で作成したものを2000でも動かしたい!!  クロ 04/6/2(水) 16:24
   ┃  ┗Re:Access2002で作成したものを2000でも動かしたい!!  てっくす 04/6/2(水) 16:46
   ┗Re:Access2002で作成したものを2000でも動かしたい!!  Homes 04/6/2(水) 17:45
      ┗可変のテーブル名を表示させたいのです  てっくす 04/6/2(水) 18:02
         ┗Re:可変のテーブル名を表示させたいのです  Homes 04/6/2(水) 18:38
            ┗Re:可変のテーブル名を表示させたいのです  てっくす 04/6/2(水) 18:56

 ───────────────────────────────────────
 ■題名 : Access2002で作成したものを2000でも動かしたい!!
 ■名前 : てっくす
 ■日付 : 04/6/2(水) 15:18
 -------------------------------------------------------------------------
   どなたかわかる方がいらしたら、大至急教えてください(>_<;)

最近、OfficeXPの環境でVBAのプログラムを作成しました。
無事作り終え、正常に動作することが出来たのですが、
Office2000の環境で動かしたところエラーがでてしまいました。

リストボックスにテーブル名を追加(表示)したり、
表示されたテーブル名を削除したいのですが
「RemoveItem」と「AddItem」でエラーがでてしまいます。
以下のように記述してあります。
「list1.RemoveItem (tblsu)」
「list1.AddItem tbl.Name」

エラー内容を以下に記述します。
「コンパイルエラー:
 メソッドまたはデータ メンバが見つかりません」


参照設定を以下に記述します。
Microsoft Access 9.0 Object Library
OLE Automation
Microsoft ActiveX Data Objects 2.1 Library
Microsoft Common Dialog Control 6.0(SP3)
Microsoft Scripting Runtime
Microsoft DAO 3.6 Object Library

かなり切羽詰ってます!!!!!どうかお願いします!!!

 ───────────────────────────────────────  ■題名 : Re:Access2002で作成したものを2000でも動かしたい!!  ■名前 : クロ  ■日付 : 04/6/2(水) 16:24  -------------------------------------------------------------------------
   回答ではないのですがVBAのヘルプを見ると両者ともAccess2002(XP)から
新機能として書かれていますのでAccess2000にはないメソッドなので別の
方法を考えられたほうがよいかと...

 ───────────────────────────────────────  ■題名 : Re:Access2002で作成したものを2000でも動かしたい!!  ■名前 : てっくす  ■日付 : 04/6/2(水) 16:46  -------------------------------------------------------------------------
   >回答ではないのですがVBAのヘルプを見ると両者ともAccess2002(XP)から
>新機能として書かれていますのでAccess2000にはないメソッドなので別の
>方法を考えられたほうがよいかと...

そうだったのですか…
教えていただきありがとうございます。

では、どなたかAccess2000でリストボックス内の追加、削除
する方法をご存じないですか?

 ───────────────────────────────────────  ■題名 : Re:Access2002で作成したものを2000でも動かしたい!!  ■名前 : Homes  ■日付 : 04/6/2(水) 17:45  -------------------------------------------------------------------------
   ▼てっくす さん:
list1.RowSource = "テーブル名かSQL文"
でだめですか?

 ───────────────────────────────────────  ■題名 : 可変のテーブル名を表示させたいのです  ■名前 : てっくす  ■日付 : 04/6/2(水) 18:02  -------------------------------------------------------------------------
   ▼Homes さん:
>list1.RowSource = "テーブル名かSQL文"
>でだめですか?

私もいろいろ調べて、「RowSource」までたどり着きました。

しかし、「list1.RowSource = tbl.Name」
と記述したところ1つのテーブル名しか表示されませんでした。
表示させたいテーブル名は可変なので、
可変の指定の仕方をご存知ないでしょうか?

 ───────────────────────────────────────  ■題名 : Re:可変のテーブル名を表示させたいのです  ■名前 : Homes  ■日付 : 04/6/2(水) 18:38  -------------------------------------------------------------------------
   ▼てっくす さん:
そういう事でしたか・・・理解不足ですみません。

ではlist1.RowSource に

SELECT MSysObjects.Name FROM MsysObjects
WHERE (Left([Name],1)<>"~") AND (Left([Name],4) <> "Msys") AND (MSysObjects.Type)=1
ORDER BY MSysObjects.Name; "

を記述してみて下さい。
多分大丈夫だと思います。

 ───────────────────────────────────────  ■題名 : Re:可変のテーブル名を表示させたいのです  ■名前 : てっくす  ■日付 : 04/6/2(水) 18:56  -------------------------------------------------------------------------
   何とか解決することが出来ました。
Homesさん、クロさんご意見ありがとうございました。

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