tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトルVBでUSBのエクセルファイルを読み込みたいl
記事No15613
投稿日: 2012/11/03(Sat) 12:52
投稿者nao
USBメノリーのExcelデータをVBで開く方法を教えてください。
今は、マイコンピュータでUSBのファイルをクリックして、
名前を付けて保存で読み込んでいます。
その後、VBでACSESSに変換して、必要な処理をしています。
 使用ソフトは、OS−XP、Exelー2000です。

[ツリー表示へ]
タイトルRe: VBでUSBのエクセルファイルを読み込みたいl
記事No15614
投稿日: 2012/11/04(Sun) 07:15
投稿者VBレスキュー(花ちゃん)
USB メモリでも、ハードディスク内でも同じことで、保存箇所のファイルのパスを指定すれば
いいはずですが、現在(今まで)はどのようなコードを書いて読み込んでおられたのでしょうか?

 http://www.hanatyan.sakura.ne.jp/vbhlp/excel02.htm

 http://hanatyan.sakura.ne.jp/patio/read.cgi?mode=view2&f=128&no=0

[ツリー表示へ]
タイトルRe^2: VBでUSBのエクセルファイルを読み込みたいl
記事No15615
投稿日: 2012/11/04(Sun) 10:09
投稿者nao
> USB メモリでも、ハードディスク内でも同じことで、保存箇所のファイルのパスを指定すれば
> いいはずですが、現在(今まで)はどのようなコードを書いて読み込んでおられたのでしょうか?

早速の回答頂き有難うございました。
 御指摘のとうりエクセルを起動して表示するのと同じでパス名を変えて結果良好でした。
本当に有難うございました。
 ここでこんな事を、お聞きして良いのか判りませんが教えてください。

今回のコードは
  Set XLAPP = CreateObject("Excel.Application")
    Set XLBOOK = XLAPP.Workbooks.Open("F:\工事収支管理.xls")
    Set XLSHEET = XLBOOK.Worksheets(1)
結果は良好でした。
    Set XLAPP = New Excel.Application
  Set XLBOOK = XLAPP.Workbooks.Open("F:\工事収支管理.xls")  
  Set XLSHEET = XLBOOK.Worksheets("sheet1")
上記コードとの違いが理解できません。よろしく。

[ツリー表示へ]
タイトルRe^3: VBでUSBのエクセルファイルを読み込みたいl
記事No15616
投稿日: 2012/11/04(Sun) 11:14
投稿者VBレスキュー(花ちゃん)
>   Set XLAPP = CreateObject("Excel.Application")
>     Set XLAPP = New Excel.Application

下記にも書いておりますが、
http://www.hanatyan.sakura.ne.jp/vbhlp/excel1.htm
http://www.hanatyan.sakura.ne.jp/vbhlp/caution.htm

どちらもExcelのインスタンスを作成している事に関しては同じですが、New キーワードを使った
場合は、参照設定が必要になり、事前バインディング(アーリーバインディング)でしか使用
できませんが、CreateObject 関数を使った場合は、どちらの場合も使用できます。
当時どちらを使った方法を紹介すべきか迷ったのですが、MSDN に下記のように書いてあったので
[Microsoft Office アプリケーションのインスタンスを作成する場合は、New ではなく
CreateObject を使用します。] CreateObject 関数を使った方法を紹介しておりますが、参照設定
をして使用されるのなら、New キーワードを使った方法をお勧めします。

※ 疑問に感じられた文等があったら、その部分を選択して F1 キー 等を押してヘルプを表示
 するか、WEB で検索して調べる癖をつけて下さい。

 

[ツリー表示へ]
タイトルRe^4:解決しました。
記事No15617
投稿日: 2012/11/04(Sun) 12:38
投稿者nao
> > >
>  
>  
 ご親切な回答有難うございました。
無事解決いたしました。今後は出来るだけ指摘の方法で調べます。   

[ツリー表示へ]