Microsoft SQL Server'daki verileri Microsoft Excel'e veri almak nasıl

ÖNEMLİ: Bu makale, Microsoft Makine Çevirisi Düzenleme yazılımı tarafından tercüme edilmiş olup, yüksek olasılıkla profesyonel bir çevirmen yerine CTF teknolojisi kullanılarak, Microsoft Topluluğu tarafından düzenlenmiştir. Microsoft, Bilgi Bankamız içindeki tüm makaleleri kendi dilinizde okuyabilmeniz için size hem profesyonel çevirmenler tarafından tercüme edilen hem de makine tarafından tercüme edildikten sonra Topluluk tarafından kontrol edilen makaleler sunar. Bununla birlikte, makine tarafından tercüme edilen, hatta Topluluk tarafından kontrol edilen bir makale bile her zaman mükemmel dil kalitesinde olmayabilir. Makalede dilinizi konuşan yabancı birisinin yapabileceği türden sözcük, söz dizimi veya dilbilgisi hataları bulunabilir. Microsoft, içeriğin hatalı tercümesinin veya müşterilerimiz tarafından kullanımının doğurabileceği olası yanlış anlamalar, hatalar veya zararlardan sorumlu değildir. Öte yandan Microsoft, Makine Çevirisi Düzenleme işlemini geliştirmek amacıyla Makine Çevirisi Düzenleme yazılımını ve araçlarını sık sık güncelleştirmektedir.

Makalenin İngilizcesi aşağıdaki gibidir: 306125
Özet
Bu adım adım kılavuzda, Pubs veritabanından, Microsoft SQL Server'ın içerdiği bir örnek veritabanını Microsoft Excel'e veri almak nasıl açıklar.

ActiveX Data Objects (ADO) herhangi türde bir veri kaynağına erişim sağlar. Birkaç nesne içeren bir düz bir nesne modelidir. ADO nesne modeli ana nesneler şunlardır:
   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.				
ADO kullanarak bir kayıt kümesi döndürmek için pek çok yol olsa da, bu makalede bağlantı ve kayıt kümesi nesneleri üzerinde yoğunlaşır.

Gereksinimleri

Microsoft SQL Server çalıştıran ve Pubs veritabanı bulunan yerel bir sunucu olması gerekir.

Microsoft, aşağıdaki bilgiye sahip önerir:
  • Visual Basic for Applications yordamları Office programlarında oluşturuluyor.
  • Nesne değişkenleriyle çalışma.
  • Excel nesneleriyle çalışma.
  • İlişkisel veritabanı yönetim sistemi (RDBMS) kavramları.
  • Yapılandırılmış sorgu dili (SQL) SELECT deyimleri.

ADO nesne kitaplığına başvurma

  1. Excel'i başlatın. Yeni bir çalışma kitabı açın ve SQLExtract.xls adıyla kaydedin.
  2. Visual Basic Düzenleyicisi'ni başlatın ve VBA projenizi seçin.
  3. Üzerinde Araçlar menüsünde'ı tıklatın Başvurular.
  4. En son sürümünü seçmek için tıklatın Microsoft ActiveX Data Objects kitaplığı onay kutusunu seçin.

Bağlantı oluşturma

  1. Projeye yeni bir modül ekleyin.
  2. DataExtract adlı yeni bir alt yordam oluşturun.
  3. Aşağıdaki kodu yapıştırın veya yazın:
    ' 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					

Verileri ayıklama

Kayıtlarınızı ayıklamak için aşağıdaki kodu yapıştırın veya yazın:
' 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				

Kodun çalışıp çalışmadığını doğrulama

  1. Kodu çalıştırın.
  2. Excel'e geçmek ve verileri görüntülemek için çalışma kitabında Sayfa1'e bakın.

Sorun giderme

Kodunuz askıda görünüyor ve bir çalışma zamanı hatası alıyorsanız, veritabanı sunucusu çalışmıyor olabilir. ConnectionTimeout özelliğini, bir çalışma zamanı hatası döndürüyor süresini denetlemek için kullanabilirsiniz. Bu özelliği sıfırdan büyük bir değere ayarlayın. Değeri sıfır olarak ayarlarsanız, bağlantı asla zaman aşımına uğramaz. Varsayılan değer 15 saniyedir.
Referanslar
Ek örnek kod, aşağıdaki Microsoft Web sitesinde arama yaparak bulabilirsiniz:
ACC2002 xl2002 XL2003 XL2007

Uyarı: Bu makalenin çevirisi otomatik olarak yapılmıştır

Властивості

Ідентифікатор статті: 306125 – останній перегляд: 05/07/2016 21:47:00 – виправлення: 3.0

Microsoft Office Excel 2007, Microsoft Excel 2002 Standard Edition

  • kbhowtomaster kbmt KB306125 KbMttr
Зворотний зв’язок