Hét vraag- en antwoordplatform van Nederland

Hoe kan ik een macro maken met excel waar bepaald cellen uit alle volgende tabbladen worden gehaald?

Ik heb een macro gemaakt waarbij er een tabblad wordt gemaakt en waarbij hij vervolgens uit de volgende 100 tabbladen bepaalde cellen kopieert. Een gedeelte van de macro:

Sheets(ActiveSheet.Index + 1).Activate
Range("A1:E45").Select
Selection.Copy
Range("A1").Select
ActiveWindow.SmallScroll Down:=-39
Sheets("Totaal Programma").Select
Range("H4").Select
Selection.Insert Shift:=xlDown
Range("A1").Select

Dit stukje wordt 100x herhaald alleen dan wordt Sheets(ActiveSheet.Index + 1).Activate, +2 ,+3 enz...

Ik weet bij voorbaat niet hoeveel tabbladen er nog achter komen, nu zijn er bijvoorbeeld de ene keer 54 tabbladen en de andere keer 74. Excel geeft nu een foutmelding omdat hij niet tot het 100 tabblad kan komen. weet iemand hoe ik dit op kan lossen zonder foutmelding.

dus dat de cellen A1 t/m E1 van alle volgende tabbladen gekopieerd worden in het tabblad "Totaal Programma" zonder foutmeldingen.

Verwijderde gebruiker
11 jaar geleden
in: Software
Geef jouw antwoord
0 / 2500
Geef Antwoord

Het beste antwoord

Niet de fraaiste oplossing, maar wel simpel is een OnError statement toevoegen. In een OnError ga je naar een melding en kun je de macro afsluiten. Je doet dan de aanname dat als de fout ontstaat omdat er geen volgend tabblad meer is, dat de macro klaar is.
paulus811
11 jaar geleden
Deel jouw antwoord
0 / 2500
Geef Antwoord
logo van Kompas Publishing

GoeieVraag.nl is onderdeel van Kompas Publishing