Teď jste offline a čekáte, až se znova připojí internet.

Jak importovat data do aplikace Microsoft Excel z Microsoft SQL Server

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.

306125
Souhrn
Tento podrobný návod popisuje, jak importovat data do aplikace Microsoft Excel z databáze Pubs, ukázková databáze, která je součástí Microsoft SQL Server.

Objekty ADO (ActiveX Data OBJECTS) poskytují přístup na libovolný typ zdroje dat. Je plochý objektový model s několika objekty. Jsou hlavními objekty v modelu objektu ADO:
   Object          Description   -----------------------------------------------------------------------   Connection      Refers to the connection to the data source.   Recordset       Refers to the data extracted.   Command         Refers to a stored procedure or SQL statements that                    need to be executed.				
Přestože vrátit pomocí objektů ADO Recordset mnoha způsoby, tento článek se soustřeďuje na objekty sady záznamů a připojení.

Požadavky

Musí mít místní server systémem Microsoft SQL Server a obsahující databázi Pubs.

Společnost Microsoft doporučuje že mít znalosti o následující:
  • Vytvoření jazyka Visual Basic pro postupy aplikací sady Office.
  • Práce s objektové proměnné.
  • Práce s objekty aplikace Excel.
  • Relační koncepty systémy správy databáze (RDBMS).
  • Strukturované příkazy SELECT jazyka SQL (Query).

Odkazující na knihovnu objektů ADO

  1. Spuštění aplikace Excel. Otevření nového sešitu a potom jej uložte jako SQLExtract.xls.
  2. Spusťte Editor jazyka Visual Basic a vyberte projekt VBA.
  3. V Nástroje nabídky, klepněte na tlačítko Odkazy.
  4. Klepnutím vyberte poslední verze Knihovna objektů Microsoft ActiveX Data Zaškrtávací políčko.

Vytváření připojení

  1. Vložte nový modul do projektu.
  2. Vytvořte novou proceduru Sub nazývá DataExtract.
  3. Zadejte nebo vložte následující kód:
    ' Create a connection object.Dim cnPubs As ADODB.ConnectionSet cnPubs = New ADODB.Connection' Provide the connection string.Dim strConn As String'Use the SQL Server OLE DB Provider.strConn = "PROVIDER=SQLOLEDB;"'Connect to the Pubs database on the local server.strConn = strConn & "DATA SOURCE=(local);INITIAL CATALOG=pubs;"'Use an integrated login.strConn = strConn & " INTEGRATED SECURITY=sspi;"'Now open the connection.cnPubs.Open strConn					

Extrahování dat

Zadejte nebo vložte následující kód extrahovat záznamy:
' Create a recordset object.Dim rsPubs As ADODB.RecordsetSet rsPubs = New ADODB.RecordsetWith rsPubs	' Assign the Connection object.	.ActiveConnection = cnPubs	' Extract the required records.	.Open "SELECT * FROM Authors"	' Copy the records into cell A1 on Sheet1.	Sheet1.Range("A1").CopyFromRecordset rsPubs		' Tidy up	.CloseEnd WithcnPubs.CloseSet rsPubs = NothingSet cnPubs = Nothing				

Ověření, zda kód funguje

  1. Spusťte kód.
  2. Přepněte do aplikace Excel a prohlédněte List1 v sešitu zobrazit data.

Poradce při potížích

Pokud se zobrazí kód přestane reagovat a zobrazí chyba běhu, databázový server může být dolů. Vlastnost ConnectionTimeout řízení doby trvání vrátit chybu běhu. Nastavte tuto vlastnost na hodnotu větší než nula. Pokud nastavíte hodnotu nula, nikdy časového limitu připojení. Výchozí hodnota je 15 sekund.
Odkazy
Další ukázkový kód můžete najít hledáním na následujícím webu společnosti Microsoft:
ACC2002 xl2002 XL2003 XL2007

Upozornění: Tento článek byl přeložen automaticky

Vlastnosti

ID článku: 306125 - Poslední kontrola: 04/19/2012 03:11:00 - Revize: 7.0

  • Microsoft Office Excel 2007
  • Microsoft Excel 2002 Standard Edition
  • kbhowtomaster kbmt KB306125 KbMtcs
Váš názor