Cómo utilizar el componente Web de hoja de cálculo con Visual Basic

Seleccione idioma Seleccione idioma
Id. de artículo: 235883 - Ver los productos a los que se aplica este artículo
Expandir todo | Contraer todo

En esta página

Resumen

Si desea utilizar un motor de cálculo o de hoja de cálculo en su solución personalizada de Visual Basic, puede utilizar el control de hoja de cálculo incluido con Office Web Components. Se explica cómo insertar una hoja de cálculo como un control en un formulario de Visual Basic y rellenar la hoja de cálculo con datos.

Más información

Puede agregar Office Web Components a un formulario en Visual Basic de la misma forma que agregue cualquier otro control ActiveX. El control de hoja de cálculo incluido con Office Web Components es una opción más eficaz que el control DataGrid que se distribuye con Visual Basic. Utilizar los datos de hoja de cálculo para mostrar datos con formato, calcular fórmulas y Permitir interactividad del usuario.

importante : para ver y trabajar con cualquiera de Office Web Components, debe tener instalarlos en el equipo. Los componentes están instalados con Microsoft Office 2000 o, si su compañía tiene una licencia de sitio de Office 2000, se pueden descargar los componentes de la intranet. Los usuarios deben tener instalados así estos componentes y deben estar cubiertos por una licencia de Office 2000. Usted y sus usuarios deben utilizar Microsoft Internet Explorer versión 4.01 o posterior.

Pasos para crear un proyecto de ejemplo

  1. Crear un nuevo proyecto EXE estándar en Visual Basic. Se creará Form1 de manera predeterminada.
  2. Agregue una referencia a Microsoft Office Web Components 9.0.
  3. Agregue el control de hoja de cálculo desde el cuadro de herramientas Visual Basic al formulario.
  4. El control de hoja de cálculo se puede mostrar y utilizar como una hoja de cálculo, o puede ser oculto y utiliza como un motor de cálculo para los controles visibles en la página.
Trabajar con la hoja de cálculo de control en Visual Basic es casi idéntico al trabajar con una hoja de cálculo de Excel. Los métodos y propiedades que se utilizan para manipular el componente Spreadsheet son similares a los que utilizaría al automatizar Excel.

Llenar un control de hoja de cálculo

Puede agregar datos a un control de hoja de cálculo en una de las maneras siguientes:
  • Introducir datos directamente en la cuadrícula.
  • Copiar y pegar datos desde una hoja de Excel, el archivo de texto o el documento de Word.
  • Importar datos desde un archivo de texto o una página Web. Para obtener más información vea el tema del método LoadText y el tema Propiedad HTMLURL en la Ayuda en pantalla.
  • Escribir código para rellenar la hoja de cálculo con datos.
Tenga en cuenta que no hay ninguna manera de enlazar el control de hoja de cálculo a los datos directamente.

El siguiente procedimiento rellena y da formato a un control de hoja de cálculo con datos de la base de datos Northwind (NWind.mdb) de ejemplo:
Sub GetNwindData()

    Dim rstEmployees As Object
    Dim cnn As String
    Dim strSQL As String
    Dim fldCount As Integer
    Dim intIRow As Integer
    Dim intICol As Integer
    Dim varData As Variant

    'Create recordset and fill with records from Northwind sample database.
    Set rstEmployees = CreateObject("ADODB.Recordset")
    cnn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Program Files\Microsoft Visual Studio\VB98\nwind.mdb"
    strSQL = "SELECT FirstName, LastName, Title, Extension FROM Employees ORDER BY LastName"
    rstEmployees.Open strSQL, cnn, 3 ' adOpenStatic = 3
    
    'Clear any existing values from the spreadsheet control.
    Spreadsheet1.ActiveSheet.Cells(1, 1).Select
    Spreadsheet1.ActiveSheet.UsedRange.Clear

    'Add the field names as column headers.
    For fldCount = 0 To rstEmployees.Fields.Count - 1
        intIRow = intIRow + 1
        Spreadsheet1.ActiveSheet.Cells(1, intIRow).Value = rstEmployees.Fields(fldCount).Name
    Next

    'Fill the control with data from the database.
    Dim iNumCols As Integer
    Dim iNumRows As Integer
    
    iNumCols = rstEmployees.Fields.Count
    iNumRows = rstEmployees.Recordcount
    varData = rstEmployees.GetRows(iNumRows)
    
    For intIRow = 1 To iNumRows
        For intICol = 1 To iNumCols
            Spreadsheet1.ActiveSheet.Cells(intIRow + 1, intICol).Value = varData(intICol - 1, intIRow - 1)
        Next
    Next

    'Format the headers in row 1 with a Bold Font that is 11 points.
    With Spreadsheet1.ActiveSheet.Range(Spreadsheet1.Cells(1, 1),
Spreadsheet1.ActiveSheet.Cells(1, iNumCols)).Font
        .Bold = True
        .Size = 11
    End With
    
    'AutoFit the columns and make all text left-aligned.
    With Spreadsheet1.ActiveSheet.Range(Spreadsheet1.Cells(1, 1),
Spreadsheet1.ActiveSheet.Cells(iNumRows + 1, iNumCols))
        .AutoFitColumns
        .HAlignment = ssHAlignLeft
    End With

End Sub
				


Observe que un control de hoja de cálculo no es un libro y contiene sólo una sola hoja. La propiedad ActiveSheet siempre hace referencia a esa hoja única.

Obtener ayuda

Después de crear una referencia a la biblioteca Office Web Components, tener acceso a Ayuda mediante el Explorador de objetos o desde la ficha General del cuadro de herramientas de propiedades de hoja de cálculo. También puede buscar y haga doble clic en el archivo de Ayuda Msowcvba.chm. Para obtener ayuda sobre una palabra clave específica, resalte la palabra clave y presione la tecla F1 . Para obtener información sobre cómo crear referencias y utilizar el objeto del modelo de Ayuda, consulte la Ayuda en Visual Basic o Visual Basic para aplicaciones.

Puede enlazar un control de gráfico a un control de hoja de cálculo. Para obtener información adicional sobre el control de gráfico, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:
235885Cómo utilizar el componente de gráfico Web con VB

Referencias

Para obtener más información acerca de Office Web Components, consulte el capítulo 12, "Con las tecnologías de Web", en el Microsoft Office 2000/Visual Basic manual del programador.

Propiedades

Id. de artículo: 235883 - Última revisión: miércoles, 14 de julio de 2004 - Versión: 1.2
La información de este artículo se refiere a:
  • Microsoft Office Spreadsheet Component 9.0
Palabras clave: 
kbmt kbhowto kbofficewebspread KB235883 KbMtes
Traducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 235883
Renuncia a responsabilidad de los contenidos de la KB sobre productos a los que ya no se ofrece asistencia alguna
El presente artículo se escribió para productos para los que Microsoft ya no ofrece soporte técnico. Por tanto, el presente artículo se ofrece "tal cual" y no será actualizado.

Enviar comentarios

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com