Avatar billede mugs Novice
20. februar 2003 - 21:57 Der er 11 kommentarer og
1 løsning

Eksport til Excel

Jeg bruger denne kode til at åbne Excel i et forudbestemt ark:

Dim xls As New Excel.Application
Dim a As String
Me.Refresh
a = Me.ark
xls.Visible = True
xls.Workbooks.Open Filename:="D:\funktioner\Mappe1.xls"
Sheets(a).Select

Det fungerer fint, men kun første gang. Når jeg skifter post fejler det og viser flg:

Runtime error '1004'
Method 'Sheets of Object'_Global' failed

Og denne linie er markeret.
Sheets(a).Select

Hvad er der galt?
Avatar billede sjap Praktikant
20. februar 2003 - 22:11 #1
Nu kan jeg ikke se hvilken værdi a får, men det må være det, der er galt. Det vil sige, at der ikke findes et ark i "D:\funktioner\Mappe1.xls" med navnet a.
Avatar billede sjap Praktikant
20. februar 2003 - 22:12 #2
Hov det så jeg slet ikke. Hvad er den af mugs - er du ved a snige dig over i Excel?
Avatar billede mugs Novice
20. februar 2003 - 22:13 #3
Me.ark er et felt i formularen som sættes = a. Som sagt virker det første gang db er åbnet, men skifter jeg post fejler den. Og der er et ark svarende til indholdet af a.
Avatar billede mugs Novice
20. februar 2003 - 22:14 #4
Når jeg nu ikke kan finde ud af det her, må jeg jo hellere skifte boldgade :o)
Avatar billede sjap Praktikant
20. februar 2003 - 22:16 #5
Når du skifter post, skal den så vælge et nyt ark? Mit spørgsmål er vel egentlig: skifter a værdi, når du skifter post?
Avatar billede mugs Novice
20. februar 2003 - 22:18 #6
a skifter værdi når du skifter post.
Avatar billede mugs Novice
20. februar 2003 - 22:19 #7
Men når jeg åbner Excel og lukker igen, åbner Excel een gang til uden at skifte post får jeg også fejlen.
Avatar billede mugs Novice
20. februar 2003 - 22:25 #8
Jeg har prøvet at ændre koden, så variablen a er slettet:
Sheets("Ark2").Select
Men fejlen er der stadig 2. gang jeg åbner Excel.
Avatar billede sjap Praktikant
20. februar 2003 - 22:27 #9
Hmm nu lykkedes det at få fejlen (jeg skulle lige lukke de 11 gange Excel jeg havde åbnet!).

Det er selvfølgelig ikke nogen trøst, men det se ud til, at hvis Excel lukkes, hver gang, så vil fejlen altid opstå, hver anden gang.
Avatar billede sjap Praktikant
20. februar 2003 - 22:34 #10
Mugs

Prøv at skrive sådan her

xls.Sheets(a).Select

Med den kan jeg ikke genskabe fejlen - ikke endnu i hvert tilfælde :-)
Avatar billede mugs Novice
20. februar 2003 - 22:38 #11
BINGO. Tak for hjælpen :o)
Avatar billede sjap Praktikant
20. februar 2003 - 22:41 #12
Rent held - men der skal der jo også være plads til.
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester