Søg
Avatar billede chrira Nybegynder
27. oktober 2003 - 09:27 Der er 9 kommentarer og
1 løsning

Loop gennem ark i en workbook

Hejsa

Jeg skal bruge et stykke makro kode der løber alle ark i en workbook igennem. Jeg putter selv noget kode ind i loopet der udfører en række funktioner for hvert ark.

Jeg havde tænkt noget i stil med.

For Each worksheet in activeworkbook

' min kode

Next worksheet

men det virker ikke

Chrira
Avatar billede jkrons Professor
27. oktober 2003 - 09:38 #1
For Each s in ActiveWorkbook.Sheets


Next s
Avatar billede bak Forsker
27. oktober 2003 - 09:48 #2
eller for at tage din egen

For Each worksheet In ActiveWorkbook.Worksheets
' min kode

Next
Avatar billede chrira Nybegynder
27. oktober 2003 - 10:31 #3
Jeg var for hurtigt ude !!

Det ser ud som om koden looper de antal gange der er worksheets i filen. Det jeg er ude på er at den skal skifte til det næste ark når den har udført min kode for det første faneblad.

Hvordan gør jeg det !
Avatar billede bak Forsker
27. oktober 2003 - 10:44 #4
Sub test()
'gør noget
ActiveSheet.Next.Select
End Sub
Avatar billede jkrons Professor
27. oktober 2003 - 10:46 #5
Måske har jeg misforstået dit første spørgsmål, men hvis den skal gøre det samme i alle ark, behøver du ikke at selecte arkene. Hvis den skal gøre noget forskelligt i de enkelte ark, bliver det bnoget sværere. Hvis den kun skal gøre noget i et ark, kan du bruge bak's forslag.
Avatar billede jkrons Professor
27. oktober 2003 - 10:48 #6
Ellers må du nok være lidt mere specifik om, hvad der skal udfgøres i de enkelte ark.
Avatar billede chrira Nybegynder
27. oktober 2003 - 10:53 #7
Fint det virker, men hvordan får jeg valgt det første worksheet inden jeg går igang ?
Avatar billede kabbak Professor
27. oktober 2003 - 11:30 #8
For Each worksheet In ActiveWorkbook.Worksheets
' eksempel
'worksheet.name.select
' range ("A1") = din værdi

' min kode

Next
Avatar billede chrira Nybegynder
27. oktober 2003 - 11:33 #9
Mit problem er at jeg ikke ved hvor mange worksheets der er i filen og hvad de hedder. Så duer den vel ikke ??
Avatar billede kabbak Professor
27. oktober 2003 - 11:34 #10
joo, den tager alle
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 04/09/202616:05 04/09/202616:54
Kan Excel selv beregne alder? Af leahcim i Excel 7 31/08/202610:24 04/09/202602: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 18 17/08/202615:14 05/09/202622:04
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
IT-JOB

Politiets Efterretningstjeneste

Sektionsleder til IT Porteføljestyring i PET

Statens IT

Tekniske Sikkerhedsrådgivere

Netcompany A/S

Erfaren Linux Operations Engineer

Riskpoint A/S (Riskpoint Solutions Limited)

Senior Developer

Netcompany A/S

Data Management Consultant
Seneste spørgsmål Seneste aktivitet
18/0919:52 Libre office skriveprogram Af Frank i Office & Kontorpakker
17/0914:55 Hente WordPad til Windows 11 Af Strawberry i Andet software
17/0911:37 Persits.Upload Af bsn i ASP
16/0918:13 oprette et installationsmedie Af Malm i Windows
16/0913:11 Adapterstik stik på ladekabel til USB-C Af ErikHg i Andet software
White papers
Flere white papers »