JCDussDuss
Messages postés24Date d'inscriptionvendredi 24 septembre 2004StatutMembreDernière intervention20 novembre 2008
-
20 nov. 2008 à 16:45
us_30
Messages postés2065Date d'inscriptionlundi 11 avril 2005StatutMembreDernière intervention14 mars 2016
-
20 nov. 2008 à 18:49
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(
us_30
Messages postés2065Date d'inscriptionlundi 11 avril 2005StatutMembreDernière intervention14 mars 201610 20 nov. 2008 à 18:49
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