Avatar billede gnalling1 Nybegynder
16. oktober 2006 - 19:59 Der er 1 kommentar og
1 løsning

Kopier alle arknavne til ark 1

Jeg har en projektmappe med 50 ark og jeg vil gerne have kopieret alle navnene på arkene fra ark 2 til 50 ind i ark 1 startende i A2. Hvordan gør jeg det nemmest med VBA?

:o) Gnalling1
Avatar billede kabbak Professor
16. oktober 2006 - 20:14 #1
Public Sub Arknavne()
rw = 2
For Each ws In ThisWorkbook.Worksheets
If ws.Name <> "Ark1" Then
Cells(rw, 1) = ws.Name
rw = rw + 1
End If
Next
End Sub
Avatar billede gnalling1 Nybegynder
16. oktober 2006 - 20:29 #2
Tusind tak for hjælpen, kabbak!
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 for alle niveauer og behov – find det kursus, der passer til dig

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