AccessTr.neTMicrosoft ExcelExcel Cevaplanmış Soruları

Verileri Değiştirmek

1 2 3 4
16/05/2020, 21:13

feraz

(16/05/2020, 21:01)m_demir yazdı: Hocam Cdbl olması şart değil yeterki doğru sonuç versin 
Hocam eklediğiniz kod resimdeki hatayı veriyor.


ActiveCell.Offset(0, i).Value = CDbl(Me.Controls(arr(i - 3))) + 0
16/05/2020, 21:20

feraz

En son verdiğim sıfırlı koda göre hatasiz gifteki gibi doğru sonuç veriyor.


16/05/2020, 21:32

feraz

Yada ilk verdiğiniz dosyadaki kodları alttaki gibi yapın.
Böyle denemiştim hata vermişti şimdi vermedi.
ActiveCell.Offset(0, 4).Value = CDbl(TextBox3.Value) + 0

ActiveCell.Offset(0, 5).Value = CDbl(TextBox4.Value) + 0

ActiveCell.Offset(0, 6).Value = CDbl(TextBox5.Value) + 0

ActiveCell.Offset(0, 7).Value = CDbl(TextBox7.Value) + 0

ActiveCell.Offset(0, 8).Value = CDbl(TextBox9.Value) + 0

ActiveCell.Offset(0, 9).Value = CDbl(TextBox11.Value) + 0

ActiveCell.Offset(0, 10).Value = CDbl(TextBox8.Value) + 0
16/05/2020, 22:08

m_demir

TeamViewer şifresini özelden gönderdim bağlanabilirsiniz.
16/05/2020, 23:21

feraz

.....
16/05/2020, 23:26

m_demir

Hocam Şifreyi gönderdim.
1 2 3 4