tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルEXCEL インポート
記事No484
投稿日: 2003/10/09(Thu) 14:49
投稿者あや
[OSのVer]:WindowsXP    [VBのVer]:VB.NET2003  
はじめまして先ほども掲示板にVBからEXCELの質疑があったのですが
imports を指定したいのですがEXCELはどの階層にあるのでしょうか?
どなたか教えていただけませんか
よろしく御願いします

[ツリー表示へ]
タイトルRe: EXCEL インポート
記事No489
投稿日: 2003/10/11(Sat) 18:15
投稿者よねKEN
参照先http://www5b.biglobe.ne.jp/~yone-ken/
> [OSのVer]:WindowsXP    [VBのVer]:VB.NET2003  
> はじめまして先ほども掲示板にVBからEXCELの質疑があったのですが
> imports を指定したいのですがEXCELはどの階層にあるのでしょうか?

Excelはそれ自身で単体の製品なので、.NET Frameworkクラスライブラリの
一部ではなく、Imports指定することで使えるというものではありません。

メニューの[プロジェクト]-[参照の追加...]を選ぶと
参照の追加ダイアログが表示されるので、[COM]タブを選んでその中から
Microsoft Excel x.x Object Libraryを選びましょう。(x.xはバージョン番号)
参照設定すれば例えば、以下のようにExcelを操作できます。
Button1をClickするとExcelを起動し、Button2をClickするとそのExcelを終了する例です。

Private xlApp As Excel.Application
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    If xlApp Is Nothing Then        
        xlApp = New Excel.Application
        xlApp.Visible = True
    End If
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    If Not xlApp Is Nothing Then
        xlApp.Quit()
        System.Runtime.InteropServices.Marshal.ReleaseComObject(xlApp)
        xlApp = Nothing
    End If
End Sub

[ツリー表示へ]