Meerdere subs uitvoeren met 1 knop

[Samsung6713]

Goedemiddag allemaal,

Ik ben begonnen met het gebruiken van VBA in excel.
Nu heb ik 2 subs gemaakt, en die werken prima apart.
Deze wil ik tegelijk uitvoeren als ik op de knop druk.
Hoe doe ik dat?

Sub Color()

Range(Range("A3"), Range("V3").End(xlDown)).SpecialCells(12).Cells.Interior.ColorIndex = 43



End Sub

Sub Copy_Paste()

Range(Range("x3"), Range("y3").End(xlDown)).SpecialCells(12).Copy _
Range(Range("V3"), Range("V3").End(xlDown)).SpecialCells(12).Offset(0, 2)


End Sub

 

[edmoor]

Code samenvoegen in de _Click van de Button.
Of:

Sub CommandButton1_Click()
    Color
    Copy_Paste
End Sub

 

[Samsung6713]

Bedankt!