Hej alla!

Jag försöker få till en CommandButton som skall kunna skriva ut blad beroende på om en Checkbox är ikryssad eller inte.

Jag har fått det att funka med att sriva ut blad1 bara när jag haft samtliga kryssrutor ikryssade.

Vad gör jag för fel?

Private Sub CommandButton1_Click()

If CheckBox1.Value = True Then

Worksheets("Blad1").PrintOut

ElseIf CheckBox2.Value = True Then

Worksheets("Blad2").PrintOut

ElseIf CheckBox3.Value = True Then

Worksheets("Blad3").PrintOut

End If

End Sub