Soru Metin yerine tanımlanan sayıların sabit hücreye girilmesi

[seckinb]

Merhaba

userform'umda şu tablonun işlevini yakalamaya çalışıyorum
https://www.mdcalc.com/child-pugh-score-cirrhosis-mortality



geçerli değeri seçtiğimde ilgili hücreye (mesela F7) 1,2 veya 3 değerini girmesi gerek.

lakin ancak metnin kendini girmesini başarabildim.

teşekkürler

 

[Korhan Ayhan]

Örnek;

Private Sub tbBAlb_Change()
    Select Case tbBAlb
        Case ">3,5 g/dl"
            X = 1
        Case "2,8 - 3,5 g/dl"
            X = 2
        Case "<2,8 g/dl"
            X = 3
    End Select
    Sheets("Kimlik").Range("F7") = X
End Sub

 

[seckinb]

Elinize sağlık, kod çok iyi çalışıyor.

 

[seckinb]

Şimdi farkettim, biz bu değerleri değiştirince EXCEL içinde hesap değişiyor (mesela A iken C oluyor)
lakin userform içindeki textbox kendini güncellemiyor.