[Løst] "Autofill" for arknavn

[RuneTh666]

Jeg har ett regneark hvor jeg har ett ark som heter 362.201, i dette regnearket skal jeg ha ark som heter 362.202, 362.203 osv helt til jeg kommer opp til 362.249.

 

Er det noen enkel måte å få dette til? Alle arkene er like bortsett fra navn

 

Bruker Office 2013

Endret 3. september 2014 av RuneTh666

[baarsk]

Kan dette hjelpe?

 

http://www.extendoffice.com/documents/excel/609-excel-rename-worksheets.html

[Harald Staff]

Kjør denne makroen når 362 201 er første ark (arkfanen lengst til venstre):

Sub LageArk()

Dim L As Long

Sheets(1).Name = "362 201"

For L = 362202 To 362249

    Sheets(1).Copy After:=Sheets(Worksheets.Count)

    ActiveSheet.Name = Format(L, "### ##0")

Next

End Sub

HTH. Beste hilsen Harald

[RuneTh666]

Takk for det Harald.

Det var veldig enkelt :-)