VB.NET pour piloter excel...

Question

Bonjour,

Je débute en VB .NET, en sachant que j'arrive de VBA sans etre passé par la case VB... je galère donc...

Je souhaite ouvrir puis commander un fichier excel depuis VB .NET, j'ai trouvé du code sur le net, mais là je sèche, je ne vois pas pourquoi il me trouve mon "Excel" en type indéfini...
Voici mon début de code, si quelqu'un peut m'aider, merci... J'ai ajouter les références Microsoft.Office.Interop.Excel et la librairie Excel 11...

Je ne vois plus quoi faire...

Imports

 Microsoft.Office.Interop.Excel
Public

Class Form1

Private
Sub Button1_Click(
ByVal sender 
As System.Object, 
ByVal e 
As System.EventArgs) 
Handles Button1.Click

Dim appExcel 
As Excel.Application 
'Application Excel

Dim wbExcel 
As Excel.Workbook 
'Classeur Excel

Dim wsExcel 
As Excel.Worksheet 
'Feuille Excel

'Ouverture de l'applicationappExcel = CreateObject(

"Excel.Application")appExcel.Visible = 

True

'Ouverture d'un fichier ExcelwbExcel = appExcel.Workbooks.Open(

"C:\Documents and Settings...

JCDussDuss

cs_fauve · Answer

Salut,

Pour lancer un fichier Excel, voilà comment je fais :

Dim oXL As Object

' Creer l'application XL
oXL = CreateObject("Excel.Application")
oXL.Visible = True
oXL.Workbooks.Open("D:	est.xls")

Note : De mon coté, çà fonctionne sans avoir à ajouter Microsoft.Office.Interop.Excel

++

Fauve

<hr size="2" width="100%" />Pensez : Réponse Acceptée

us_30 · Answer

Bonjour,

Pour exemple de codage : (repris de mon tuto)

    Dim ExcelApp As Object
    Dim ExcelClasseur As Object
    Dim ExcelFeuille As Object

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        ExcelApp = CreateObject("excel.application")
        ExcelApp.visible = True
        ExcelClasseur = ExcelApp.Workbooks.Add
        ExcelFeuille = ExcelClasseur.sheets("Feuil1")
        ExcelFeuille.cells.item(1, 1).value = "Machin"
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        ExcelApp.quit()
    End Sub

Amicalement,
Us.

VB.NET pour piloter excel...

2 réponses

Votre réponse

Discussions similaires