Microsoft Excel es una aplicación de hoja de cálculo que es parte de la suite Microsoft Office. Visual Basic.NET es un lenguaje de programación de Microsoft que es relativamente fácil de aprender y usar. Un archivo de valores separados por comas ( CSV ) es un archivo de texto que se puede leer fácilmente por otras aplicaciones. Un archivo CSV se utiliza también para ahorrar espacio en el disco duro , ya que es mucho más pequeña en tamaño que un archivo XLS normal. En unos sencillos pasos , usted puede convertir archivos XLS a archivos CSV utilizando VB.NET . Instrucciones
1
Inicio " Microsoft Visual Basic 2008 Express. " Seleccione el menú "Archivo" , luego en " Nuevo proyecto ... " haga clic en " Aplicación de Windows Forms " en " Plantillas instaladas de Visual Studio ". Seleccione "OK ".
2
Presione " Ctrl", " Alt " y " X " para abrir la " caja de herramientas ". Haga doble clic en "Button " en " Common Controls "para añadir un nuevo botón para " Form1 . "
3
Haga clic en" Proyecto ", a continuación, seleccione " Agregar referencia ". Haga clic en" COM ", seleccione" Microsoft Excel objeto 12.0 Biblioteca "y haga clic en" Aceptar ".
4
doble clic en" Button1 "para abrir el " módulo de Form1.vb " . Escriba lo siguiente en la parte superior de " Form1.vb " para añadir una referencia :
Importaciones Microsoft.Office.Interop
5
Escriba lo siguiente para declarar las variables en el interior " Sub Button1_Click ":
excelApplication Dim As New excelWrkBook Excel.ApplicationDim Como Excel.Workbook
6
Type" excelApplication.Visible = False "para ocultar Excel.Type " excelApplication.DisplayAlerts = Falso " . para desactivar mostrar mensajes de alerta
7
Escriba lo siguiente para abrir el " " libro y guardarlo como " XLS CSV " :
excelWrkBook = _FileFormat : . = Microsoft.Office.Interop.Excel.XlFileFormat.xlCSV )
Al ejecutar el programa y haga clic en " Button1 ", este código se ejecutará para convertir su archivo
8
Escriba el siguiente para cerrar y salir de la aplicación:
excelWrkBook.Close () excelApplication.DisplayAlerts = TrueexcelApplication.Quit ()
9
Press "F5 " para ejecutar el programa . Haga clic en " Button1 ".
