Fichier excel vb.net

Résolu
gatoune78 -  
Bonjour,

j'effectue un petit programme pour pouvoir enregistrer des données au sein d'un fichier excel
tout fonctionne super bien!

cependant, j'aimerai bien pouvoir afficher la page un fois que mon application est terminée, mais je n'y arrive pas, malgré plusieurs recherches sur la toile.

voici quelques lignes de code pour vous aider à m'aider :

appExcel = CreateObject("Excel.Application")
wbExcel = appExcel.Workbooks.Add
wsExcel = wbExcel.Worksheets(1)
wbExcel.SaveAs("toto.xls")

je ne vous ai pas mis l'insertion au sein du fichier mais tout fonctionne!

Merci d'avance

2 réponses

  1. Utilisateur anonyme
    Bonjour,

    Exemple type : 

    Private Sub btn_CreerFichier_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_CreerFichier.Click

	Dim appExcel As New Excel.Application
	Dim wbExcel As Excel.Workbook
	Dim wsExcel As Excel.Worksheet
	Dim CheminFichier As String = "C:\Document\"
	Dim CheminAcces As String = String.Empty

	appExcel = New Excel.Application
	wbExcel = appExcel.Workbooks.Add
	wsExcel = DirectCast(wbExcel.Worksheets(1), Excel.Worksheet)

	wsExcel.Range("A1").Value = "Lupin"

	CheminAcces = String.Format("{0}{1}", CheminFichier, "Essai.xls")

	wbExcel.SaveAs(CheminAcces)

	appExcel.Visible = True

	'wbExcel.Close()
	'appExcel.Quit()

	MessageBox.Show("Fichier créé", "Création", MessageBoxButtons.OK, MessageBoxIcon.Information)

End Sub


    Cdt

    Lupin
    1. gatoune78 Auteur
      Merci Beaucoup!
    2. Xineroks
      Merci pour ce code, j'en avais besoin aussi !
  2. Stev28fr
    Bonjour,
    Moi j'ai un petite problème c'est qu'il me souligne en tant qu'erreur 
    Excel.Application 
    Excel.Worbook
    Excel.Worksheet

    Pouvez vous m'aider ? :)

    Merci