Kan ik automatisch werkbladen sorteren binnen een werkmap?

[Mazzel25]

Ik maak gebruik van Excel 2007. In een werkmap moet ik tientallen werkbladen maken, ieder met een andere werkbladnaam. Is er een functie waarmee ik die werkbladen automatisch op alfabet kan laten sorteren?

 

[spaarie]

Beste Mazzel25,

Wat toevallig. Deze vraag kwam net ook aan bod op een ander fora . Dit is de oplossing van SNB dus credits zijn voor hem
Bekend met VBA?

Sub sorteren()
  With CreateObject("System.Collections.ArrayList")
    For Each sh In Sheets
      .Add sh.Name
    Next
    .Sort
     For j = 0 To .Count - 2
       Sheets(.Item(j + 1)).Move , Sheets(.Item(j))
    Next
  End With
End Sub

 

[Mazzel25]

Helaas niet bekend met VBA. Had gehoopt dat er een basisfunctie in Excel zit.

 

[spaarie]

Nope, geen basis- of standaardfuntie.
Dan gaan we je "ontmaagden" in VBA hahaha

Druk in Excel op ALT+F11 > de VBA editor zal geopend worden.
Dubbelklik in de linkse kolom op "ThisWorkbook" > er zal een blanco scherm hiernaast geopend worden.
Kopieer en plak bovenstaande code daar in > sla hem op.
Klik op de play knop zoals op je dvd speler en hij sorteert hem.

Succes...

 

[spaarie]

Ik neem aan dat het gelukt is aangezien je vraag als opgelost staat?

Graag gedaan hoor....