Excel'de Küçük 1 Sorunum var

Merhaba Arkadaşlar ;
Eğer daha önce sorulduysa şimdiden özür dilerim..
Excel'de hazırladığım 1 çalışma kitabım var yanlız benim pratiklik açısından yapmak istediğim bişey var;
Protokol çıkarmak için hazırladığım sayfada Önyüz , Arkayüz , Giriş  ve kayıtlar diye 4 tane sayfam var Kayıtlara Bilgilerimi kaydediyorum Girişten önyüz ve arkayüze aktarıp yazdırıyorum yanlız yapmak istediğim Girişte aktarırken Önyüz ve Arkayüz sayfalarınıda Giriş sayfasındayken yazdırmak.. 2 tane Komut Butonu oluşturup Önyüz yazdır ve arkayüz yazdır diyebilmek istiyorum ama komutunu bir türlü yazamadım bu konuda yardımınıza ihtiyacım var şimdiden teşekkürler..

Private Sub CommandButton1_Click()

SubWorksheets("onyuz").Select
Sheets("onyuz").PageSetup.PrintArea = "$A$1:$n$36" 'buraya print alanini yaz
ActiveWindow.SelectedSheets.PrintOut
end sub

Private Sub CommandButton2_Click()

SubWorksheets("arkayuz").Select
Sheets("arkayuz").PageSetup.PrintArea = "$A$1:$n$36" 'buraya print alanini yaz
ActiveWindow.SelectedSheets.PrintOut
end sub

Private Sub CommandButton1_Click()

SubWorksheets("onyuz").Select
Sheets("onyuz").PageSetup.PrintArea = "$A$1:$n$36" 'buraya print alanini yaz
ActiveWindow.SelectedSheets.PrintOut
end sub

Private Sub CommandButton2_Click()

SubWorksheets("arkayuz").Select
Sheets("arkayuz").PageSetup.PrintArea = "$A$1:$n$36" 'buraya print alanini yaz
ActiveWindow.SelectedSheets.PrintOut
end sub

CaSpi_26 İlgin için Teşekkürler ben sorunu çözmüştüm şimdi cevabı görünce bir bakıyım dedim Teşekkürler ilgilendiğin için Konu Amacına Ulaştı Kilitlenirse Sevinirim..