Hente ut antall rader SQL/Excel

[skidd]

Hei.

 

Ut ifra nettet om jeg forstår det korrekt så skal denne kommandoen hente ut antall kolonner

 

SELECT COUNT(Tittel) FROM Filmer

 

Når jeg kjører den i SQL så får jeg opp en kolonne som da viser antall rader i den tabellen, men hvis jeg kjører den kommandoen fra Excel så henter den ut hele listen i stedet.

 

Noen som vet hva som må gjøres for å kunne hente ut antall kolonner i stedet for alle kolonnene?

 

Takker for svar.

 

Endret 28. oktober 2015 av skidd

[ExcelGuru]

Hei!

 

Det er mange veier til Rom. Denne sub'en gjør jobben hvis du bruker ActiveX

 

Sub SQL()

Dim Utvalg As String

 

Dim SQLArk As Worksheet

Set SQLArk = Worksheets("Ark1")

 

Dim cnPubs As ADODB.Connection

Set cnPubs = New ADODB.Connection

 

Dim strConn As String

strConn = "PROVIDER=SQLOLEDB;"

strConn = strConn & "DATA SOURCE=KETIL-RINGVEIEN\LOKAL;INITIAL CATALOG=Vet;"

strConn = strConn & " INTEGRATED SECURITY=sspi;"

 

cnPubs.Open strConn

 

Dim rs As ADODB.Recordset

Set rs = New ADODB.Recordset

 

With rs

    .ActiveConnection = cnPubs

    Utvalg = "Select count(*)"

    Utvalg = Utvalg & " FROM Vet.dbo.Prisliste"

    .Open Utvalg

        

     SQLArk.Range("A2").CopyFromRecordset rs 

    

    .Close

End With

 

End Sub