Jag vill koppla data från min accessdatabas till utvalda celler i Excel. Hur gör man?

själv brukar jag hämta en tabel och i cellen som jag vill ha värdet köra en Lookup formula. mot en tabelen...

eller så skriver man en funktion i VBA som hämtar värdet om det är enstaka celler går detta OK

annars kan det bli tungt då du öppnar en connection i från varje cell med formulan vid varje kalkulering
dock blir det snyggare på det viset


Förslag på en sådan funktion kan var :
<code>
Function senaste(PathToDb As String)
Dim SQL_query As String
Dim MdbFilePath As String

Set myconn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.RecordSet")
MdbFilePath = PathToDb

myconn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"

SQL_query = "SELECT MAX(Datum) as senaste FROM tbldata"
Set rs = myconn.Execute(SQL_query)

senaste = rs("Senaste")

rs.Close
Set rs = Nothing
myconn.Close
Set myconn = Nothing

End Function


</code>



//Wendel