textboxları toplama da sorunum var

[cetorp2007]

aşşağıdaki kodu yazarak textboxları hepsiniı 54nolu texboxta toplamaya calışıyorum ama sadece ilk 9 textbox topluyor hepsini nasıl toplayabilirim bilgisi olan yardım ederse sevinirim

teşekkürler


Private Sub TextBox22_Change()
On Error Resume Next
t0 = CDbl(TextBox54)

t1 = CDbl(TextBox22)
t2 = CDbl(TextBox27)
t3 = CDbl(TextBox32)
t4 = CDbl(TextBox37)
t5 = CDbl(TextBox42)
t6 = CDbl(TextBox47)
t7 = CDbl(TextBox52)
t8 = CDbl(TextBox4)
t9 = CDbl(TextBox18)
t10 = CDbl(TextBox76)
t11 = CDbl(TextBox82)
t12 = CDbl(TextBox87)
t13 = CDbl(TextBox92)
t14 = CDbl(TextBox197)
t15 = CDbl(TextBox102)
t16 = CDbl(TextBox107)
t17 = CDbl(TextBox112)
t18 = CDbl(TextBox117)
t19 = CDbl(TextBox132)
t20 = CDbl(TextBox137)
t21 = CDbl(TextBox142)

TextBox54 = 0
TextBox54 = t1 + t2 + t3 + t4 + t5 + t6 + t7 + t8 + t9 + t10 + t11 + t12 + t13 + t14 + t15 + t16 + t17 + t18 + t19 + t20 + t21 +

 

[cetorp2007]

bişeydaha unutmuşumm

textboxlar 9 dan sonraki bölümü yani textbox76 sonrakiler excellde sayfa1'in ikinci sayfasındadır bilgilerinize

 

[cetorp2007]

bu konuda bilgisi olan biri yok mu

arkadaşlar bu konuda birisi bana yardım edebilecekmi acaba