Om jag har en excel fil som heter (c:\1\bok1) hur tvingar jag en (text1.text) att visa vad som står i ruta G5 i excelbladet.

Hej,

Ungefär så här borde det bli :

<code>
Dim mExcel As Object ' Excel.Application
Dim mWB As Object ' Excel.Workbook

Set mExcel = CreateObject("Excel.Application")
Set mWB = mExcel.Workbooks.Open("c:\1\bok1.xls")

Text1.Text = mWB.Sheets(0).Range("G5").value

mWB.Close()
Set mWB=Nothing
Set mExcel=Nothing
</code>

Tack för det fungerar precis som jag tänkt mej men det går himla trögt men det funkar

Japp, raden CreateObject("Excel.Application") startar ju excel i bakgrunden så det tar ju lite tid. Om du ska läsa av värdet flera gånger så bör du ju hålla variabeln mExcel vid liv så att inte Excel behöver laddas varje gång, t ex genom att deklarera den på modul-(formulär-)nivå och initiera Excel i form_load och stoppa Excel i t ex form_unload.

Du kan använda ADO för att öppna läsa från ett excel ark. Du slipper då starta Excel vilket gör det snabbare. Finns artikel om hur du ansluter dig mot Excel genom ADO på Artiklar och kurser.

jodå jag vet att det går men har väl inte fått alla hjärnceller att förstå det hela än