- Katılım
- 15 Kasım 2006
- Mesajlar
- 46
- Excel Vers. ve Dili
-
excel ile veri gönderme ve listeleme
listbox
Selam arkadaşlar sayfa8 deki işlem sonucunu otomatik olarak Label'de görmek istiyorum ama hata veriyor.Sorun nerede acaba yardımcı olabilirmisiniz.
Private Sub UserForm_Initialize()
Top = 0
For i = 3 To Sayfa8.[j65536].End(3).Row
Top = Top + Sayfa8.Cells(i, 10).Value
Next
Mustan2.Label19.Caption = Top
'..............................
Top = 0
For i = 3 To Sayfa8.[k65536].End(3).Row
Top = Top + Sayfa8.Cells(i, 11).Value
Next
Mustan2.Label24.Caption = Top
Private Sub UserForm_Initialize()
Top = 0
For i = 3 To Sayfa8.[j65536].End(3).Row
Top = Top + Sayfa8.Cells(i, 10).Value
Next
Mustan2.Label19.Caption = Top
'..............................
Top = 0
For i = 3 To Sayfa8.[k65536].End(3).Row
Top = Top + Sayfa8.Cells(i, 11).Value
Next
Mustan2.Label24.Caption = Top