Søg
Avatar billede mal Nybegynder
07. april 2010 - 11:20 Der er 6 kommentarer og
1 løsning

Excel - VBA find ark som slutter med "PL"

Jeg har en række ark i et regneark som hedder f.eks. "2005", "2005 PL", "2005 LØB", "2006", "2006 PL", "2006 LØB"

Er det muligt at lave en variabel som dels tæller antallet af ark som hedder PL til at slutte med, samt gemmer disse ark i en variable.

Altså hvis de ovenstående var alle arkene, så vil jeg gerne have at variable

Antal_ark = 2
Ark_navn(0) = 2005 PL
Ark_navn(1) = 2006 PL
Avatar billede supertekst Ekspert
07. april 2010 - 11:51 #1
Hurtigt bud:

Dim Antal_ark As Byte, Ark_navn(), count As Byte
Public Sub tælPL()
    ReDim Ark_navn(ActiveWorkbook.Sheets.count)
    count = 0
   
    For Each ark In ActiveWorkbook.Sheets
        If Right(ark.Name, 2) = "PL" Then
            Ark_navn(count) = ark.Name
            count = count + 1
        End If
    Next
End Sub
Avatar billede mal Nybegynder
07. april 2010 - 12:05 #2
Jeg tjekker det.
Avatar billede supertekst Ekspert
07. april 2010 - 12:14 #3
Ok -
Avatar billede mal Nybegynder
07. april 2010 - 12:26 #4
Den vil ikke finde sig i ordet "ark" i loopet

For Each ark In ActiveWorkbook.Sheets
        If Right(ark.Name, 2) = "PL" Then
            Ark_navn(count) = ark.Name
            count = count + 1
        End If
    Next
Avatar billede supertekst Ekspert
07. april 2010 - 12:46 #5
Dim Antal_ark As Byte, Ark_navn(), count As Byte
Dim ark As Object            '<----------- tilføj
Public Sub tælPL()
    ReDim Ark_navn(ActiveWorkbook.Sheets.count)
    count = 0
   
    For Each ark In ActiveWorkbook.Sheets
        If Right(ark.Name, 2) = "PL" Then
            Ark_navn(count) = ark.Name
            count = count + 1
        End If
    Next
End Sub
Avatar billede mal Nybegynder
07. april 2010 - 12:58 #6
Det virker perfekt, jeg vil meget gerne have at du skriver et svar.

Tak for hjælpen.
Avatar billede supertekst Ekspert
07. april 2010 - 13:05 #7
Fint - du får svar & selv tak...
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
Forskel mellem klokkeslet start aften slut næste morgen Af krasmussen i Excel 13 24/07/202611:08 I går 18:42
Opdatering af celler i excel ark Af lurup i Excel 2 09/06/202619:40 10/06/202614:34
data fra et excel til google kalender Af lurup i Excel 3 02/06/202613:23 03/06/202615:06
Inverse formler Af tdktman i Excel 5 26/05/202616:16 28/05/202606:50
Flere brugere i 1 delt pivottabel Af mira96ac i Excel 3 26/05/202609:09 28/05/202604:23
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
02/0814:53 TV4ever 3.0 Af valby i Diverse
01/0816:21 Installere Ubuntu på Virtuel Maskine Af Uvanga i Andet software
01/0809:38 Microsoft har igen ødelagt mit højreklik Af valby i Windows
30/0714:41 To mails fra YouSee - Jeg tror ikke altid på tilfældigheder Af mort1 i Andet sikkerhed
27/0714:34 Hjælp til at kunne skanne negativer på Plustek 8300i SE Af Mariann i Foto & video
White papers
Flere white papers »