Come convertire XLS a CSV in VB.NET

March 11

Come convertire XLS a CSV in VB.NET


Microsoft Excel è un foglio di calcolo che fa parte della suite Microsoft Office. Visual Basic.NET è un linguaggio di programmazione di Microsoft che è relativamente facile da imparare e da usare. Un file Comma-Separated Value (CSV) è un file di testo che può essere facilmente letto da altre applicazioni. Un file CSV è utilizzato anche per risparmiare spazio su disco rigido dal momento che è molto più piccolo di dimensioni di un file XLS normale. In pochi semplici passaggi, è possibile convertire i file XLS in file CSV utilizzando VB.NET.

istruzione

1 Start "Microsoft Visual Basic 2008 Express." Selezionare il menu "File", quindi su "Nuovo progetto ..." Fare clic su "Applicazione Windows Form" sotto "di Visual Studio installati i modelli." Selezionare "OK".

2 Premere il tasto "Ctrl", "Alt" e "X" per aprire la "Toolbox". Fare doppio clic su "Button" sotto "Controlli comuni" per aggiungere un nuovo pulsante per "Form1".

3 Fare clic su "Progetto", quindi selezionare "Aggiungi riferimento." Click "COM", selezionare "Microsoft Excel 12.0 Object Library" e fare clic su "OK".

4 Fare doppio clic su "Button1" per aprire il modulo "Form1.vb". Digitare quanto segue al vertice di "Form1.vb" per aggiungere un riferimento:

Le importazioni Microsoft.Office.Interop

5 Digitare quanto segue per dichiarare le variabili all'interno di "Sub Button1_Click":

Dim excelApplication come nuovo Excel.Application
Dim excelWrkBook Come Excel.Workbook

6 Tipo "excelApplication.Visible = False" per nascondere Excel.
Digitare "excelApplication.DisplayAlerts = False" per disattivare la visualizzazione di avvisi di messaggio.

7 Digitare il seguente per aprire la cartella di lavoro "XLS" e salvarlo come "CSV":

excelWrkBook = excelApplication.Workbooks.Open ( "C: \ myWorkbook.xls")

excelWrkBook.SaveAs(Filename:="c:\myWorkbookCSV.csv", _
FileFormat:=Microsoft.Office.Interop.Excel.XlFileFormat.xlCSV)

Quando si esegue il programma e cliccare su "Button1", questo codice verrà eseguito per convertire il file.

8 Digitare la seguente per chiudere e uscire la vostra applicazione:

excelWrkBook.Close ()
excelApplication.DisplayAlerts = True
excelApplication.Quit ()

9 Premere il tasto "F5" per eseguire il programma. Fai clic su "Button1".


Articoli Correlati