[VB.NET] Salvataggio su file Excel

[pagin]

Salve a tutti,
rapida visione di ciò che sto realizzando..interfaccia in cui l'utente inserisce i valori, al termine clicca tasto "salva" e indirizza tutti i valori su un preposto file excel. Ho vari form che collego con Me.Hide()
Formn.SHow() [n=numero di form]

Una volta cliccato il tasto "salva" poter aprire il file excel corrispondente, far inserire i dati dall'interfaccia al file, e al salvataggio del file excel ci pensa l'opeartore, poi ripetere l'operazione con l'interfaccia-salvare e che il programma individui la riga libera e salvi direttamente, ma un dubbio mi sorge....nel codice quindi non posso indicare la cella precisa...dato che le colonne rimarranno fisse (perchè sarebbero il 'numero' della domanda), mentre le righe sarebbero gli utenti che rispondono, quindi sarebbe incrementale, detto ciò come posso affrontare il problema il meglio possibile?

[pagin]

con Xladati.ActiveWorkbook.SaveAs(Enviroment.CurrentDi rectory &"EsempioExcel.xls" , , , , , , Excel.XlSaveAccessMode.xlExclusive)

Salvo l'oggetto application...ma in questo caso, che ho 12 form collegate, mi salva i dati che ho immesso i ogni form?

[pagin]

Ok per creare l'oggetto excel application

'creo l'oggetto excel application il programma excel.

Dim XlaDati As Excel.Application

'creo l'oggetto per la gestione della cartella di lavoro

Dim XlwbDati As Excel.Workbook

'creo l'oggetto per la gestione del foglio di excel(es. foglio uno, foglio due)

Dim XlshDati As Excel.Worksheet

'instanzio l'oggetto application

XlaDati = CreateObject("Excel.Application")

'gestione degli errori

Try

'lo rendo visibile

XlaDati.Visible = True

'aggiungo una nuova cartella excel

XlwbDati = XlaDati.Workbooks.Add

'Mi posiziono sul foglio attivo

XlshDati = XlwbDati.ActiveSheet


ma una domanda questo codice mi potrebbe andar bene se volessi caricare direttamente i dati quando salvo il tutto? cioè mi fa in modo corretto il collegamento tra il programma e il file excel?

[pagin]

all'inizio del codice ho messo questo:


Imports Excel = Microsoft.Office.Interop.Excel
Public Class Form1
Private Sub Button1_Click_2(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet
Dim misValue As Object = System.Reflection.Missing.Value

xlApp = New Excel.ApplicationClass
xlWorkBook = xlApp.Workbooks.Add(misValue)
xlWorkSheet = xlWorkBook.Sheets("sheet1")
xlWorkSheet.Cells(1, 1) = "http://vb.net-informations.com"
xlWorkSheet.SaveAs("C:\vbexcel.xlsx")

xlWorkBook.Close()
xlApp.Quit()

releaseObject(xlApp)
releaseObject(xlWorkBook)
releaseObject(xlWorkSheet)

MsgBox("Excel file created , you can find the file c:\")
End Sub

Private Sub releaseObject(ByVal obj As Object)
Try
System.Runtime.InteropServices.Marshal.ReleaseComO bject(obj)
obj = Nothing
Catch ex As Exception
obj = Nothing
Finally
GC.Collect()
End Try
End Sub
Protected Overrides Sub Finalize()
MyBase.Finalize()
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Me.Hide()
Form2.Show()
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

End Sub

Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs)

End Sub
End Class


ma mi dà un errore: "Impossibile incorporare il tipo di interoperabilità 'ApplicationClass'. In alternativa utilizzare l'interfaccia applicabile" cioè? mi manca una libreria?

[pagin]

sembrerà off topic ma credo che quell'inizializzazione abbia molto a che fare con il salvataggio dei dati sul file excel.

[gibra]

Non è questione di Off Topic, è che non rispetti il Regolamento.
Devi usare il tag CODE per mantenere la formattazione del codice, altrimenti non è leggibile.

Purtroppo stai anche commettendo diversi errori, quindi ti consiglio di leggerti questa discussione:

http://forum.html.it/forum/showthrea...ighlight=excel

in cui spiego come istanziare e chiudere un oggetto Excel.Application