Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


9252 / 13644 ツリー ←次へ | 前へ→

【28405】他のパソコンのEXCELデータのシートを読... かずこ 05/9/5(月) 19:40 質問[未読]
【28416】Re:他のパソコンのEXCELデータのシートを読... ichinose 05/9/6(火) 8:40 発言[未読]
【28418】Re:他のパソコンのEXCELデータのシートを読... かずこ 05/9/6(火) 9:40 質問[未読]
【28419】Re:他のパソコンのEXCELデータのシートを読... 小僧 05/9/6(火) 10:10 発言[未読]

【28405】他のパソコンのEXCELデータのシートを読...
質問  かずこ  - 05/9/5(月) 19:40 -

引用なし
パスワード
   はじめまして
教えてください
よろしくお願いします。

ネットワークで接続されている
他のパソコンのEXCELデータのシートを呼んでいるのですが
EXCEL2000は、OK なのですが EXCEL2003で実行すると
数値と日付のところが読込まれません。
読込まれるようにするにはどうしたらいいのか
わかりません。
教えてください。


Set Cn = CreateObject("ADODB.Connection")
  
Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=" & xlFileName & ";" & _
    "Extended Properties=""Excel 8.0;"""
     

mySQL = "SELECT * FROM [" & xlSheetName & "$]"
Set RS = Cn.Execute(mySQL)
If Not RS.EOF Then
  Cells(2, 1).CopyFromRecordset RS
End If

現在実行しているVBAです。
よろしくお願いします。

【28416】Re:他のパソコンのEXCELデータのシートを...
発言  ichinose  - 05/9/6(火) 8:40 -

引用なし
パスワード
   ▼かずこ さん:
おはようございます。

>はじめまして
>教えてください
>よろしくお願いします。
>
>ネットワークで接続されている
>他のパソコンのEXCELデータのシートを呼んでいるのですが
>EXCEL2000は、OK なのですが EXCEL2003で実行すると
>数値と日付のところが読込まれません。
>読込まれるようにするにはどうしたらいいのか
>わかりません。
>教えてください。

2003を持っていないので
直接の回答ではありません。

まず、原因がどこにあるのか探るところから始めてみては
いかがでしょうか?
2000と2003で、

>Set Cn = CreateObject("ADODB.Connection")
とした場合、
ADOのバージョンが違う可能性が大ですよね?

msgbox cn.version

等として2000と2003のADOのバージョンの違いがあるか否かを
確認してください。

もし、バージョンに違いがあった場合、

2003でも2000と同じバージョンにして試して見ましょう
(Createobjectでの方法は知りませんが、
参照設定すれば可能ですよね?)

これでうまくいくようなら原因が絞られますよね?

【28418】Re:他のパソコンのEXCELデータのシートを...
質問  かずこ  - 05/9/6(火) 9:40 -

引用なし
パスワード
   ichinose さん:
おはようございます。

msgbox cn.version
で2000と2003のADOのバージョンを調べました
両方とも2.8でした。
なかなか原因がつかめなくて困っています。
何が原因なのか教えてください。
お願いします。

【28419】Re:他のパソコンのEXCELデータのシートを...
発言  小僧  - 05/9/6(火) 10:10 -

引用なし
パスワード
   ▼かずこ さん:
おはようございます。

MSのサポートページより

http://support.microsoft.com/default.aspx?scid=kb;ja;257819#XSLTH3129121122120121120120

Excel のバージョン :
データ ソースとして Excel 95 ブック (Excel Version 7.0) を使用する場合は、Excel 5.0 を指定します。
Excel 97、Excel 2000、または Excel 2002 (XP) ブック
(Excel Version 8.0、9.0、および 10.0) を使用する場合は、Excel 8.0 を指定します。

では2003の時…までは載っていないのですが…。

9252 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free