combobox

[kirazzzz]

Yaptığım combobox da iki seçenek var.(Örnek:İç Yazışma , Dış Yazışma)Ben İç Yazışma 'yı seçtiğim zaman hazırlamış olduğu Sıra No bölümüne otomatik(Örnek:2012/1) olarak gelecek buraya elle giriş yapılamayacak.2012 senesi bittiğinde ve tekrardan seçtiğimde 2013 e geçecek.Bu yazdıklarım Dış Yazışma içinde geçerlidir.Bunları nasıl yapabilirim.

 

[bedri41]

Yaptığım combobox da iki seçenek var.(Örnek:İç Yazışma , Dış Yazışma)Ben İç Yazışma 'yı seçtiğim zaman hazırlamış olduğu Sıra No bölümüne otomatik(Örnek:2012/1) olarak gelecek buraya elle giriş yapılamayacak.2012 senesi bittiğinde ve tekrardan seçtiğimde 2013 e geçecek.Bu yazdıklarım Dış Yazışma içinde geçerlidir.Bunları nasıl yapabilirim.

Bu yazdıklarınızla bir örnek dosya görmeden yardımcı olabilecekse ComboBox un change olayı için aşağıdaki kodları deneyin Sıra no yazan yere bu bir textbox mu ? bir hücre mi ? neyse onu yazarak kullanabilirsiniz

Kolay Gelsin

Private Sub ComboBox1_Change()
If ComboBox1.Text = "İç Yazışma" Or ComboBox1.Text = "Dış Yazışma" Then
Sıra No = Format(Date, "YYYY") & "/1"
End If
End Sub