Excel: met een macro meerdere werkbladen selecteren en printen

[Mariskaatje]

Beste iedereen,

Ik heb al heel veel plezier gehad van dit forum, maar nu heb ik een vraag die ik niet op het forum kan vinden.

Ik heb een Excel-bestand (Excel 2000) met verschillende werkbladen. Nu wil ik graag dat mensen kunnen aanvinken welke werkbladen geprint moeten worden. Ik heb nu een aantal checkboxes neergezet en een knop. Aan de knop is de volgende Macro gekoppeld:

If CheckBox2.Value = True Then Worksheets("Blad2").Select
If CheckBox3.Value = True Then Worksheets("Blad3").Select
Application.Dialogs(xlDialogPrint).Show

Ik krijg de foutmelding "Fout 424 bij uitvoering: Object vereist".

Ik ben niet heel erg handig met VBA, maar ik leer snel

Alvast bedankt!

 

[brandernl]

je hebt wel een blad geselecteerd, maar geen printbereik

 

[JanEnEm]

Doe gewoon of je dom bent

en record je acties.
Dan zie je een voorbeeld van de code die je kunt gebruiken:

Sheets(Array("ASMG10", "ASMG11")).Select
    Sheets("ASMG10").Activate
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"

eenvoduiger kan haast niet.

Oh en: uiteraard met de (zoals je al deed) met een dialoog de selectie opvragen, namen in de array plaatsen en dan bovenstaande code formeren.


JanM

 

[Warme bakkertje]

In bijlage een formulier waar alle aanwezige werkbladen in verschijnen. De werkbladen die je in deze lijst selecteert worden daarna afgedrukt.

 

[Mariskaatje]

In bijlage een formulier waar alle aanwezige werkbladen in verschijnen. De werkbladen die je in deze lijst selecteert worden daarna afgedrukt.

Dit is niet helemaal zoals ik het had bedacht, maar het doet wel precies wat ik wil. Bedankt!