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
Samle data fra flere kolonner i 1 Af FinnLauridsen i Excel 5 17/04/202616:11 27/04/202617:58
Træk data fra ny lokation ved måneds skift Af Hezo i Excel 6 13/04/202614:32 15/04/202611:04
Makro der gemmer vedhæftet fil fra Msg og omdøber filen Af lokesa i Excel 2 31/03/202610:22 31/03/202611:47
Stempel ur start og stop Af lurup i Excel 2 23/03/202613:24 31/03/202610:27
Hvordan bruges indeks & sammenlign når der skal søges over flere kolonner? Af Laugesen1 i Excel 4 08/03/202611:56 08/03/202613:57
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 dag 13:02 Lille smart tingest Af nu_igen i Fitness & Smartwatches
03/0500:59 Mobilepay app virker ikke mere på Xiaomi Redmi Note 13 Pro Af henrixx i Apps til Android
02/0519:09 Download Win 11 - 25H2 Af ErikHg i Windows
30/0410:42 Access Import af csv fil - forkerte datatyper Af Henrik Berg Hansen i Andet software
29/0419:37 Hente CSV fil, indsætte CSV data i TABEL for JAVASCRIPT Af snestrup2000 i Programmeringsværktøjer
White papers
Flere white papers »