Søg
Avatar billede Daffodil Professor
21. juni 2017 - 08:58 Der er 3 kommentarer og
2 løsninger

Navngivning af ark.

Jeg har indføjet følgende VBA kode for at oprette et ekstra ark til sidst.

Sheets.Add After:=Sheets(Sheets.Count)
Sheets("Ark1").Select
Sheets("Ark1").Name = "Dublet"

Mit problem er at de oprindelige tre ark er blevet navngivet førend kodningen opretter dette ekstra ark. Arknavnet det bliver oprettet med er inkonsekvent enten er det Ark1 eller Ark4. Er der en måde hvorpå man kan vælge dette oprettede ark uden at kende navnet?
Avatar billede finb Ekspert
21. juni 2017 - 09:13 #1
Utestet:

if isError(Sheets("Ark1").select then
      (Sheets("Ark4").select
else
        (Sheets("Ark1").select
Endif

eller:

Sheets("Ark" & *).select

Eller:

Sheets("Ark" & *).select

utestet
Avatar billede kabbak Professor
21. juni 2017 - 09:51 #2
Når man tilføjer et ark, bliver det det aktive ark

Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Name = "Dublet"
Avatar billede Daffodil Professor
21. juni 2017 - 10:02 #3
isError virker ikke da det er tal den reagerer på jf. beskrivelsen. Har så prøvet med en OnError hvilket heller ikke lykkedes. Den med * virker ikke.

Med kabbaks forslag har jeg problemer med sidst linje, da VBA ligesom forlanger navnet på arket førend den vil ændre det.
Avatar billede finb Ekspert
21. juni 2017 - 10:16 #4
Jeg mindes svagt, at man vist kan sige:

Sheets(1).select
eller
Sheets(4).select

Utestet:
LIKE("Ark*")
Avatar billede Daffodil Professor
21. juni 2017 - 10:23 #5
Jeg har fået kombineret jeres ideer til følgende løsning:

Sheets.Add After:=Sheets(Sheets.Count)
Z = Mid(ActiveSheet.Name, 4, 2)
Sheets("Ark" & Z).Name = "Dublet"

Takker for jeres inspiration.
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
Hjælp til kontrol af sygefravær Af Maja i Excel 1 I dag 11:32 I dag 12:15
Knap til ipad Af FinnLauridsen i Excel 1 22/01/202620:51 23/01/202607:34
Hyperlink til tekst Af Nanarsi i Excel 12 19/01/202623:00 21/01/202618:17
HJÆLP - Lopslag, Indeks? Hvad gør jeg! Af Eva i Excel 3 15/01/202615:45 16/01/202609:04
Tekst til Dato Af nyhavn18 i Excel 2 13/01/202623:48 14/01/202608:50
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:36 godt råd søges Alternativ styresystem på Mac pc Af luffe1955 i Andre styresystemer
I dag 11:32 Hjælp til kontrol af sygefravær Af Maja i Excel
I går 13:59 2 skærme til en stationær computer Af BIRGER i Skærme
26/0119:26 Opstart af ny computer Af Bent i Windows
25/0120:06 Hjemmeside der virker både på mobil og computer Af Strawberry i PHP
White papers
Flere white papers »