Použití webová součást Tabulka s jazykem Visual Basic

Překlady článku Překlady článku
ID článku: 235883 - Produkty, které se vztahují k tomuto článku.
Rozbalit všechny záložky | Minimalizovat všechny záložky

Na této stránce

Souhrn

Pokud chcete použít tabulku nebo výpočtové jádro ve své vlastní řešení Visual Basic, můžete použít ovládací prvek tabulka součástí součásti Microsoft Office Web Components. Tento článek popisuje, jak vkládat tabulky jako ovládací prvek ve formuláři jazyka Visual Basic a naplnit tabulku s daty.

Další informace

Součásti Office Web Components můžete přidat do formuláře v jazyce Visual Basic stejným způsobem přidávat žádné další ovládací prvek ActiveX. Ovládací prvek Tabulka, které jsou zahrnuté součásti Office Web Components je robustnější možnost než ovládací prvek DataGrid, který je dodáván s jazykem Visual Basic. Data tabulky tabulkového kalkulátoru použít k zobrazení formátovaných dat, výpočet vzorců a Povolit interaktivitu uživatelů.

Důležité: Chcete-li zobrazit a pracovat s některým z komponenty Office Web Components, musíte mít je nainstalována ve vašem počítači. Součásti jsou nainstalovány se sadou Microsoft Office 2000 nebo, pokud má vaše společnost licenci sady Office 2000 Server, součásti lze stáhnout z síť intranet. Uživatelé musí mít tyto součásti nainstalovány také a musí být předmětem licenci pro sadu Office 2000. Jste a uživatelé musí používat aplikaci Microsoft Internet Explorer verze 4.01 nebo novější.

Kroky k vytvoření ukázkový projekt

  1. Vytvoření nového projektu standardní EXE v jazyce Visual Basic. Ve výchozím nastavení je vytvořena Form1.
  2. Přidejte odkaz na Microsoft Office Web Components 9.0.
  3. Do formuláře přidat ovládací prvek tabulka ze sady nástrojů Visual Basic.
  4. Ovládací prvek Tabulka mohou být zobrazeny a použít jako na listu nebo můžete být skryté a použita jako modul výpočtu pro viditelné ovládací prvky na stránce.
Práce s Tabulka ovládacího prvku v jazyce Visual Basic je téměř shodné s práci s listu v aplikaci Excel. Metody a vlastnosti, které slouží k práci komponenty Tabulka se podobají použijete při automatizaci aplikace Excel.

Vyplnění tabulky řízení

Můžete přidat data na ovládací prvek Tabulka v jednom z následujících způsobů:
  • Zadejte data přímo do mřížky.
  • Kopírování a vložení dat z listu aplikace Excel, textový soubor nebo dokument aplikace Word.
  • Import dat z textového souboru nebo webové stránky. Další informace naleznete v tématu metoda LoadText a HTMLURL vlastnost téma v nápovědě online.
  • Zadejte kód chcete naplnit tabulku s daty.
Všimněte si, že je způsob, jak svázat ovládací prvek Tabulka dat přímo.

Následující postup bude vyplněna a formátů prvek tabulky s daty z ukázkové databáze Northwind (NWind.mdb):
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
				


Všimněte si, že ovládací prvek tabulka není sešitu a obsahuje pouze jeden list. Vlastnost ActiveSheet vždy odkazuje tento jediný list.

Získání nápovědy

Jakmile vytvoříte odkaz na knihovnu součástí Office Web Components, nápovědu můžete pomocí prohlížeče objektů nebo na kartě Obecné v panelu vlastností tabulky. Můžete také vyhledejte a poklepejte na soubor nápovědy Msowcvba.chm. Chcete-li získat nápovědu na určité klíčové slovo, zvýraznit klíčové slovo a stiskněte klávesu F1. Informace o vytváření odkazů a použití objektu modelu nápovědy naleznete v nápovědě k aplikaci Visual Basic nebo Visual Basic for Applications.

Vazbu mezi ovládacím prvkem graf na ovládací prvek tabulky. Další informace o ovládací prvek grafu získáte klepnutím na znalostní báze Microsoft Knowledge Base:
235885Použití webové součásti Graf S jazyka Visual Basic

Odkazy

Další informace o součásti Office Web Components najdete v kapitole 12, "Použití webových technologií," v příručce Microsoft Office 2000/Visual Basic Programmer's.

Vlastnosti

ID článku: 235883 - Poslední aktualizace: 14. července 2004 - Revize: 1.2
Informace v tomto článku jsou určeny pro produkt:
  • Microsoft Office Spreadsheet Component 9.0
Klíčová slova: 
kbmt kbhowto kbofficewebspread KB235883 KbMtcs
Strojově přeložený článek
Důležité: Tento článek byl přeložen pomocí software společnosti Microsoft na strojový překlad, ne profesionálním překladatelem. Společnost Microsoft nabízí jak články přeložené překladatelem, tak články přeložené pomocí software na strojový překlad, takže všechny články ve Znalostní databázi (Knowledge Base) jsou dostupné v češtině. Překlad pomocí software na strojový překlad ale není bohužel vždy dokonalý. Obsahuje chyby ve skloňování slov, skladbě vět, nebo gramatice, podobně jako když cizinci dělají chyby při mluvení v češtině. Společnost Microsoft není právně zodpovědná za nepřesnosti, chyby nebo škody vzniklé chybami v překladu, nebo při použití nepřesně přeložených instrukcí v článku zákazníkem. Společnost Microsoft aktualizuje software na strojový překlad, aby byl počet chyb omezen na minimum.
Projděte si také anglickou verzi článku:235883
Právní omezení pro obsah znalostní báze týkající se produktů, jejichž podpora byla ukončena
Tento článek byl napsán o produktech, pro které společnost Microsoft již neposkytuje nadále podporu. Článek je tedy nabízen v takovém stavu, v jakém je, a nebude již nadále aktualizován.

Dejte nám zpětnou vazbu

 

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