Nieuwe tab altijd blad1

[cor.de.kruijf]

Wanneer ik in een bestaand werkblad meerdere tabs toevoeg (bv 4) en ze weer verwijder, dan begint excel de volgende keer met blad5.
Hoe krijg ik het voor elkaar dat het iedere keer begint met blad1?
Ik heb dit nodig omdat via vba bladen aangemaakt worden, en ingeval van een fout automatisch verwijderd worden. Na zo`n actie loopt het zaakje vast doordat het blad dan begint met bv blad8.

met vriendelijke groet,

Cor

 

[Cobbe]

Gebruik in VBA het bladnummer ipv de naam.
Sheets(1) ipv Sheets("Blad1").

Kan al eens helpen.

 

[HSV]

Misschien kun je hier iets bruikbaars uithalen.

Sub tabblad_invoegen()
 Worksheets.Add after:=Sheets(Sheets.Count)
  ActiveSheet.Name = "Blad" & Sheets.Count
End Sub

 

[cor.de.kruijf]

Danjewel Cobbe
voor de snelle reactie en de juiste oplossing. :d

ter aanvulling voor anderen die het nodig kunnen hebben,Sheets(1) moet zijn indien je bv al 8 tabs hebt Sheets(9)

nogmaals bedankt.

mvg Cor

 

[Warme bakkertje]

Als je steeds het laatste tabblad moet hebben kan je beter

Sheets(Sheets.count+1)

gebruiken, dan is het universeel en niet afhankelijk v/h aantal bladen.

 

[cor.de.kruijf]

@ Warme Bakkertje

Dankjewel voor deze aanvulling.
Ik moet steeds 7 sheets aanmaken en benoemen, na gebruik of een fout worden ze verwijderd.
de namen zijn ma, di, wo, do, vrij, za, zo

ik denk dus dat de oplossing van Cobbe beter geschikt is voor mij. :thumb: