ComboBox değeri ile sheet seçmek

[semerkant]

Sheets("ComboBox1").Select

ComboBox değerini nasıl alabilirim.

 

[Levent Menteşoğlu]

Sheets(ComboBox1).Select veya

Sheets("" & ComboBox1).Select şeklinde deneyin.

 

[semerkant]

Teşekkürler sayın leventm,
Sheets(ComboBox1).Select bu yöntem olmuyor. Mantıken bu yolunda olması gerekmiyormu?
Sheets("" & ComboBox1).Select bu oldu. "" & işaretler ne anlama geliyor.

 

[Levent Menteşoğlu]

Eğer comboboxtan seçilen bir sayısal değerse, "" & işaretlerini kullanmak gerekir. Örneğin comboboxtaki seçilen değer 1 olsun sheets(1) şeklinde sayfanın indexine yani ismi ne olursa olsun ilk sıradaki sayfaya gider. Fakat sheet("1") şeklinde yazarsanız ismi "1" olan sayfaya gidilir. İşte "" & işaretleri comboboxtan seçilen veriyi tırnak içine alır.

 

[semerkant]

Çok teşekkür ederim levent bey benim için çok yararlı bilgi oldu bu.

 

[Seyit Tiken]

Bu kodları bir userform üzerinde deneyiniz.

Private Sub ComboBox1_Change()
On Error Resume Next
Worksheets(ComboBox1.Value).Select
End Sub
_______________________________________

Private Sub UserForm_Initialize()
For i = 1 To Worksheets.Count
ComboBox1.AddItem (Sheets(i).Name)
Next i
End Sub

 

[semerkant]

Teşekkür ederim Seyit bey