Avatar billede madiedk Nybegynder
27. marts 2008 - 14:37 Der er 1 løsning

VBA, gem excelark i ny excelfil

Hej

hvordan laver jeg en VBA macro, der gør at den gemmer alt der står i et excelark i en ny excelfil den også selv opretter?

det skal bare være værdier og ikke formler
27. marts 2008 - 15:15 #1
Jeg plejer at bruge noget der ligner dette her - du kan evt. selv lege med at give et dynamisk navn eller hvad du måtte have brug for.

Worksheets(Array("Sheet1", "Sheet3")).Copy - opretter en ny excel fil inde i Excel, som man så kan arbejde videre med - fyld selv andre ark navne ind i Array'et.

Sub Demo()
    Dim wkbCopy As Workbook
    Dim wksTemp As Worksheet
    Dim lTemp As Long
   
    ' Copy
    Worksheets(Array("Sheet1", "Sheet3")).Copy
    Set wkbCopy = ActiveWorkbook
   
    ' Change formula to values
    For Each wksTemp In wkbCopy.Worksheets
        lTemp = wksTemp.UsedRange.Rows.Count
        wksTemp.UsedRange.Value = wksTemp.UsedRange.Value
    Next wksTemp

    ' Save
    wkbCopy.SaveAs Filename:="C:\Test\NewFile.xlsx" ' Change filepath and name
    wkbCopy.Close

    Set wksTemp = Nothing
    Set wkscopy = Nothing
End Sub
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