Combobox seçimine göre bir sheetin aktif olması

[u.L.a.s]

Merhabalar

3 ayrı sheetimde excel çalışma sayfalarında bazı verilerim var.

Ve her sheet için bir userform oluşturdum.

Ve her userform kendi sheet içerisine girilen verileri gönderiyor.

Sheet4. e ise bir ana manü gibi seçimli bir userform üzerinde combobox liste koydum.

Bu comboboxta bazı item değerleri verdim.

diyelimki bu itemler şöyle olsun

xxx
yyy
zzz

ben eğer xxx seçersem gitsin sheet2 içeriğine veri girdiğim Userform2 açılsın ve Sheet2 de o anda aktif olsun. aksi takdirde sheet1 sürekli aktif kaldığından açılan userform üzerinden girdiğim veriler sheet1 e işleniyor bu sefer.

Bilgi ve yardımlarınızı rica ederim

 

[u.L.a.s]

Soruyu sorduktan sonra çözümü buldum

Aşağıdaki gibi kod düzeni kullanılırsa hem ilgili sheet i aktif ediyor hemde belirttiğiniz userform açılıyor.

Private Sub CommandButton1_Click()
If ComboBox1.Value = "xxx" Then Sheets("Sheet1").Select
If ComboBox1.Value = "xxx" Then UserForm1.Show
If ComboBox1.Value = "yyy" Then Sheets("Sheet2").Select
If ComboBox1.Value = "yyy" Then UserForm3.Show
End Sub