23. august 2004 - 16:54Der er
4 kommentarer og 1 løsning
Udtrække del af db fra Excel VBA
Jeg har en mindre database i Access, og nu vil jeg gerne hive nogle data over i Excel. Jeg har følgende kode:
'define sql strings strTable = "USOAS" strSQL = "Select " & strFields & " from " & strTable & " where Date >= #" & Format(dFrom, "mm-dd-yy") & "# and Date <= #" & Format(dTo, "mm-dd-yy") & "# order by Date asc"
'extract data from db Set rs = db.OpenRecordset(strSQL)
Den første kolonne i min tabel hedder "Date" og de resterende 4 indholder tal. Hvis jeg vælger alle (*) i strSQL, så er der intet problem, men når jeg begynder at indføre strFields, så får jeg følgende fejlmeddelse:
Syntax error (missing operator) in query expression '30YGOV'.
30YGOV er navnet på kolonne nr. 2 og strSQL ser sådan ud:
"Select Date, 30YGOV, 15YGOV, 30YSWAP, 15YSWAP from USOAS where Date >= #02-10-04# and Date <= #08-20-04# order by Date asc"
Skal virksomheder stå stærkere mod angreb og kunne udvikle sig, skal sikkerhed, drift og forretning tænkes sammen. Det er tanken bag Jysk IT’s ambition om at skabe en “sikker fremtid” for kunderne.
hekla >> Jeg har lukket en bunke gamle spørgsmål, så der kun skulle være aktuelle tilbage.
jpvj >> Hvis jeg tilføjer apostrof omkring hvert feltnavn (se nedenstående), så får jeg ikke data ud, men i stedet indeholder hver celle navnet på søjlen, dvs:
Date 30YGOV 15YGOV ... Date 30YGOV 15YGOV ... Date 30YGOV 15YGOV ... . . . . . . . . .
etc.
Strengen ser nu sådan ud:
strSQL = "Select 'Date', '30YGOV', '15YGOV', '30YSWAP', '15YSWAP' from " & strTable & " where Date >= #" & Format(dFrom, "mm-dd-yy") & "# and Date <= #" & Format(dTo, "mm-dd-yy") & "# order by Date asc"
"Prøv at omslutte dine Tekstfelter med en apostrof således":
og kun tekstfelter!
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
