Texbox'tan excel'e veri girişi yapamıyorum

[salihhtr]

MERHABA ARKADAŞLAR İF YAPISI İLE TEXTBOXA GİRİLEN DEĞER EXCELDE B6 İLE D6 DEĞERLERİNİN ARASINDAYSA F24'E [F5] TEKİ DEĞERİ YAZMA İŞLEMİNİ YAPAMIYORUM
BİR İŞLEM YAZIDM OLMADI VALUE İLEDE DENEDİM AMA HEP F5'TEKİ DEĞERİ GİRİYOR ACABA NEREDE HATA YAPTIM YARDIMCI OLABİLİRMİSİNİZ ?
ŞİMDİDEN Teşekkürler ..

Private Sub CommandButton1_Click()
Dim s, g
s = TextBox1.Value
g = TextBox2.Value

If [b5].Value < g < [d5].Value Then
[f24] = [f5]
ElseIf [b6].Value < g < [d6].Value Then
[f24] = [f6]
ElseIf [b7].Value < g < [d7].Value Then
[f24] = [f7]
ElseIf [b8] < g < [d8] Then
[f24] = [f8]
ElseIf [b9] < g < [d9] Then
[f24] = [f9]
ElseIf [b10] < g < [d10] Then
[f24] = [f10]
ElseIf [b11] < g < [d11] Then
[f24] = [f11]
Else
MsgBox "Lütfen Sayı Giriniz"
End If

End Sub

 

[salihhtr]

Yapmaya çalıştığım dosyayı nasıl paylaşabilirim ?
Excel sayfasına ayrıntıları yazdım
yardımcı olursanız sevinirim

 

[anemis]

dosya.tc ye eklemek istediğiniz dosyayı yükleyerek indirme linkini buradan paylaşabilirsiniz.

 

[salihhtr]

Yardımcı olursanız sevinirim

dosya.tc ye eklemek istediğiniz dosyayı yükleyerek indirme linkini buradan paylaşabilirsiniz.

TEŞEKKÜRLER DOSYA LİNKTEDİR...
http://www.dosya.tc/server9/li38nw/calisma.rar.html