Jak přenosu dat ze zdroje dat. ADO Excel s ADO

Překlady článku Překlady článku
ID článku: 295646 - 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

Protože nástroj výkonné data analýzy je uzavřený, jazyka a VBA vývojáři často chcete přenést data do listu aplikace Excel pro účely analýzy. Tento článek popisuje postup ActiveX Data Objects (ADO) Tento programovací úkol pomocí syntaxe specifické pro Microsoft Jet pro určité příkazy SQL.

Tento článek popisuje řešení programování a popisují možnosti importu úsilím nabídce data aplikace Excel (prostřednictvím Otevřít možnost v nabídce soubor) nebo použití aplikace Microsoft Query (z možnost Načíst externí data v nabídce data).

Další informace o doplňkovou programování řešení, které využívají Excel automatizace namísto příkazy SQL klepněte na článek číslo článku databáze Microsoft Knowledge Base:
246335Jak přenosu dat z ADO Recordset Excel s automatizace

Další informace

V příkladech postupujte představuje cnSrc otevřené připojení ADO k Northwind ukázkové databáze Jet pomocí Jet 4.0 OLE DB Provider.

Zkopírování

Příkaz SELECT INTO slouží ke kopírování dat z libovolného zdroje dat, Jet lze číst do libovolné cílové data vytvoření nové tabulky (nebo aplikace Excel, nového listu) během práce. Nepoužívejte syntaxi dolaru, například [List1 $] při odkazu na název listu jako vaše cíl. Cílový sešit může existovat nebo neexistuje; však musí cílovém listu ještě neexistuje.

Zápis do nového listu v sešitu aplikace Excel zkopíruje celou tabulku Zákazníci z databáze Microsoft Access Northwind příkaz copy třemi způsoby. Každý syntaxe vyžaduje jeden příkaz SQL a vytvoří záhlaví sloupců v prvním řádku cílovém listu.
  • Následující příklad používá syntaxi SELECT INTO:
    Dim strSQL As String
    strSQL = "SELECT * INTO [Excel 8.0;Database=" & App.Path & _ 
        "\book1.xls].[Sheet1] FROM Customers"
    cnSrc.Execute strSQL
    					
  • Následující příklad používá syntaxi SELECT INTO... IN:
    strSQL = "SELECT * INTO [Sheet1] IN '' [Excel 8.0;Database=" & App.Path & _
        "\book1.xls] FROM Customers"
    						
    kde předchází informace závorkách cílová databáze prázdný dvojici jednoduchých uvozovkách argument typ ("Excel 8.0" část), která je součástí v rámci závorky při použití této syntaxe.
  • Následující příklad používá alternativní syntaxi klauzule IN:
    strSQL = "SELECT * INTO [Sheet1] IN '" & App.Path & _
        "\book1.xls' 'Excel 8.0;' FROM Customers"
    						
    kde argument typ je nyní uvedena samostatně po cílová cesta souboru.

Jak přidat

Pomocí příkazu INSERT INTO... IN můžete připojit data z libovolného zdroje dat do libovolné cílové data lze číst Jet. Musí existovat cílového sešitu a listu. Nyní, jsou odkazující na existující list, musíte použít standardní dolaru syntaxi, například [List1 $] při odkazu na název listu jako vaše cíl. Navíc záhlaví sloupců, musí již být přítomen, jinými slovy, tento příkaz lze použít pouze připojit k existující tabulce.

Zápis přidávacího příkazu, který zkopíruje celou tabulku Zákazníci z databáze Northwind do existujícího listu aplikace Excel, který již má odpovídající sloupec záhlaví dvěma způsoby.
  • Následující příklad používá syntaxi INSERT INTO... IN:
    strSQL = "INSERT INTO [Sheet1$] IN '' [Excel 8.0;Database=" & App.Path & _
        "\book1.xls] SELECT * FROM Customers"
    						
    kde informace závorkách cílovou databázi znovu předchází prázdný dvojici uvozovek pro argument typ je nyní zahrnuta uvnitř hranatých závorek.
  • Následující příklad používá alternativní syntaxi klauzule IN:
    strSQL = "INSERT INTO [Sheet1$] IN '" & App.Path & _
        "\book1.xls' 'Excel 8.0;' SELECT * FROM Customers"
    					

Odkazy

Další informace o této syntaxi Jet specifické naleznete soubor Jet SQL nápovědy (JETSQL40.chm), obzvláště témata na příkaz SELECT INTO, příkaz INSERT INTO a klauzule IN.

Vlastnosti

ID článku: 295646 - Poslední aktualizace: 23. srpna 2006 - Revize: 2.4
Informace v tomto článku jsou určeny pro produkt:
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Data Access Components 2.0
  • Microsoft Data Access Components 2.1
  • Microsoft Data Access Components 2.5
  • Microsoft Excel 97 Standard Edition
Klíčová slova: 
kbmt kbdatabase kbhowto kbjet kbmdacnosweep KB295646 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:295646

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