“Conocimientos software>Microsoft Access

Cómo manipular datos de las celdas de Excel en Visual Basic

2012/8/24
Aprender a manipular los datos de Microsoft Office Excel le puede ahorrar tiempo cuando se necesita para modificar los valores de celda del libro desde una aplicación de Visual Basic . Excel es una aplicación de hoja de cálculo que es parte de la suite Microsoft Office. Microsoft Visual Basic.NET es un lenguaje de programación orientado a objetos que es relativamente fácil de aprender y usar. En pocos pasos se puede escribir código VB.NET para modificar valores de las celdas en un libro de Excel. Instrucciones
1

Crear una nueva hoja de cálculo de Excel y agregue los siguientes datos :

Type " Campo1 " en " A1 ", " campo2 " en " B1" y " Field3 " en . " C1"

Tipo " 1 " en " A2 ", " 2 " en " B2" y " 3 " en " C2"

Guardar en " C: \\" como " manipulateExcel.xls ".
2

Inicie Microsoft Visual Basic, haga clic en el menú " archivo" y seleccionar " Nuevo proyecto" . Haga clic en " Aplicación de Windows Forms " y seleccione " OK" . Haga doble clic en " botón" en el panel " Herramientas " para añadir un nuevo botón al formulario.

Doble clic en " Button1 " en el formulario para abrir el módulo " Form1.vb " .

3

Copia y pega el siguiente código en " Public Class Form1 " para crear una conexión con el libro de Excel.

conec Private As String = " Provider = Microsoft.Jet.OLEDB . 4.0 , " & _

" Data Source = C: \\ manipulateExcel.xls ; "& _

" Extended Properties = "" Excel 8.0 ; HDR = YES " " "
Página 4

Copia y pega el siguiente código en " Button1_Click " para abrir " manipulateExcel.xls " y editar los datos de la celda .
5

XLConnection Dim As New OleDbConnection (conn )

XLDataAdapter Dim As New OleDbDataAdapter ( "SELECT * FROM [ Hoja1 $] " , XLConnection )

XLDataSet As DataSet = New DataSet ()

XLDataAdapter.Fill ( XLDataSet , " Sheet1" )

XLDataAdapter.UpdateCommand = New OleDbCommand (_

"UPDATE [ Sheet1 $] SET campo1 = ? , campo2 = ? , field3 = ? " , XLConnection )
< p> XLDataAdapter.UpdateCommand.Parameters.Add ("@ campo1 " , OleDbType.Numeric ) . SourceColumn = " campo1 "

XLDataAdapter.UpdateCommand.Parameters.Add ("@ campo2 " , OleDbType.Currency ) . SourceColumn = " campo2 "

XLDataAdapter.UpdateCommand.Parameters.Add ("@ field3 " , OleDbType.Currency ) . SourceColumn = " field3 "

XLDataSet.Tables ( 0 ) . Filas ( 0 ) ( " campo1 ") = 1,000
XLDataSet.Tables

( 0 ) . Filas ( 0 ) ( " campo2 ") = 10,1
XLDataSet.Tables

( 0 ) . Filas ( 0 ) (" field3 ") = 500,1

XLDataAdapter.Update ( XLDataSet , " Sheet1 " )

XLConnection.Close ()
6

Press " F5 " para ejecutar la aplicación .

Microsoft Access
Cómo utilizar Excel para crear una hoja de evaluación
Cómo Auto Fill en una celda en Excel
Cómo hacer un gráfico con la edad en la parte inferior del gráfico en Excel
Cómo desplazarse de izquierda a derecha en Excel
Cómo utilizar Excel para encontrar la pendiente de Vista
Cómo cambiar el color de fuente en Excel 2007 con el precio inferior al valor
Cómo utilizar Microsoft Excel para hacer un gráfico de barras
Cómo crear un estado de cuenta en Microsoft Excel
Conocimientos Informáticos © http://www.ordenador.online