Søg
Avatar billede natsortsort Nybegynder
09. december 2005 - 11:04 Der er 22 kommentarer og
1 løsning

åben andet ark automatisk

Hej venner,
kan jeg vel efterhånden godt skrive, nu I har redet mig utallige gange :-) Men nu er jeg i knibe igen.

Jeg sidder og henter data via en stribe indirekte formler. Desværre er der jo et problem hvis arkene der hentes indirekte fra ikke er åbne, for så bliver det til ugyldig reference i Excel.

Er der nogen som ved hvordan man kan få Excel til automatisk at åbne ekstra ark - så hver gang jeg åbner test.xls åbnes også test1.xls og test2.xls?? Kan de evt. åbnes i baggrunden (Embedded??)

Eller er der en smartere måde når de indirekte formler bruges?

David
Avatar billede b_hansen Novice
09. december 2005 - 11:10 #1
Det nemmeste er vel at indsætte denne linie for hvert regneark:

Workbooks.Open Filename:="C:\Excel\test1.xls"

Placer linierne i ThisWorkbook under WorkBook_Open
Avatar billede jkrons Professor
09. december 2005 - 11:11 #2
Og skal de skjules så tilføj

    ActiveWindow.Visible = False




End Sub
Avatar billede natsortsort Nybegynder
09. december 2005 - 11:17 #3
Super løsning, men skal jeg lave et nyt module under this workbook - eller hvor kan jeg finde/tilføje Workbook_Open?
Avatar billede b_hansen Novice
09. december 2005 - 11:24 #4
I rullemenuen står der (general). Vælg i stedet Workbook. I rullemenuen ved siden af vælger du WorkBook_Open
Avatar billede natsortsort Nybegynder
09. december 2005 - 11:27 #5
Jeg skal lige vide hvor vi er henne lige nu??
Avatar billede b_hansen Novice
09. december 2005 - 11:27 #6
rettelse: Den hedder bare Open
Avatar billede jkrons Professor
09. december 2005 - 11:29 #7
Du skal stå i VBE. TRyk Alt+F11. I ruden til højre dobbeltklikker du på ThisWorkbook. Koden skal stå i det ark, der så fremkommer.
Avatar billede natsortsort Nybegynder
09. december 2005 - 11:37 #8
Det er meget fint, men skal jeg lave en sub??
Og hvordan aktiveres den automatisk når jeg åbner arket??

undskyld jeg er lidt blank her`?`?
Avatar billede daki Juniormester
09. december 2005 - 11:46 #9
Nu har jeg også prøvet, når jeg starter et regneark kommer følgende fejl.

run-time error '91':
Object variable or With block variable not set
Avatar billede b_hansen Novice
09. december 2005 - 12:07 #10
Ser den sådan ud:

Private Sub Workbook_Open()

Workbooks.Open Filename:="C:\Excel\test1.xls"
ActiveWindow.Visible = False

End Sub
Avatar billede natsortsort Nybegynder
09. december 2005 - 12:17 #11
Perfekt!!
Jeg skal bare lige vide en ting mere...
Når nu et ark er åbent skjult - hvordan får man det så lukket igen når filen lukkes?
Avatar billede b_hansen Novice
09. december 2005 - 12:30 #12
Private Sub Workbook_BeforeClose(Cancel As Boolean)

Windows(projektnavn).Activate
ActiveWindow.Close (False)

End Sub
Avatar billede daki Juniormester
09. december 2005 - 12:32 #13
Det kom den så til :-)
Undskyld jeg blandede mig i spm.
Avatar billede natsortsort Nybegynder
09. december 2005 - 12:58 #14
Ja, der er lidt bøvl med at få det rette projektnavn test.xls til at ryge ind i
Windows(prjoektnavn)
Mig bekendt kan den kun bruge numre?? Windows(1)
Avatar billede b_hansen Novice
12. december 2005 - 08:17 #15
natsortsort> Det må du helst ikke fortælle min Excel ;-) For her virker det, når jeg skriver Windows("13mdr").Activate

I dette tilfælde hedder folderen 13mdr.xls. Hvis der ikke er anførselstegn omkring navnet, opfattes det i stedet som en variabel.
Avatar billede b_hansen Novice
16. december 2005 - 09:24 #16
natsortsort> Er du kommet videre?
Avatar billede natsortsort Nybegynder
16. december 2005 - 11:40 #17
Jeg har stadig lidt problemer med at få lukket den workbook jeg lige åbnede...
Avatar billede b_hansen Novice
23. januar 2006 - 14:21 #18
Hvori består problemet?
Avatar billede natsortsort Nybegynder
24. januar 2006 - 14:44 #19
Jeg kan ikke finde ud af hvad der skal stå i windows(xxx) for at få den til at lukke det jeg har i baggrunden.
Avatar billede b_hansen Novice
24. januar 2006 - 14:49 #20
Private Sub Workbook_BeforeClose(Cancel As Boolean)

Windows("13mdr").Activate
ActiveWindow.Close (False)

End Sub

I denne rutine lukkes projektmappen 13mdr.xls.
Avatar billede b_hansen Novice
24. januar 2006 - 14:51 #21
med din test.xls vil det derfor se således ud:
Private Sub Workbook_BeforeClose(Cancel As Boolean)

Windows("test").Activate
ActiveWindow.Close (False)

End Sub
Avatar billede natsortsort Nybegynder
24. januar 2006 - 15:04 #22
lige i øjet!
Hvordan og hvorledes med point? Laver du et svar?
Avatar billede b_hansen Novice
24. januar 2006 - 15:06 #23
gerne
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
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Ændre tal i en celle Af xvid i Excel 1 I går 16:05 I går 16:54
Kan Excel selv beregne alder? Af leahcim i Excel 7 31/08/202610:24 I går 02:08
problem med mailbesked Af Pestilensen i Excel 3 24/08/202611:16 28/08/202612:55
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel 17 17/08/202615:14 I dag 15:15
Gemme største værdi Af Lemming@privat.dk i Excel 2 07/08/202622:13 08/08/202609:03
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 18:50 Slet lokal konto Af ErikHg i Windows
I går 16:05 Ændre tal i en celle Af xvid i Excel
I går 13:47 Dette er ikke en kommerciel session i Windows 11 Af eksmojo i Windows
31/0810:26 Synkronisering af kalender mellem computer, android telefon og iPhone Af Strawberry i Andre onlineløsninger
31/0810:24 Kan Excel selv beregne alder? Af leahcim i Excel
White papers
Flere white papers »