Öncelikle örneğinizdeki kodunuz
Kod:
Worksheets("ÜrünListesi").Cells(xsonsatir, 1) = 1
Worksheets("ÜrünListesi").Cells(xsonsatir, 2) = txtUrunKodu.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 3) = txtUrunAdi.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 4) = cbFirma.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 5) = txtMakNo.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 6) = txtBrutGr.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 7) = txtCevrim.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 8) = txtKgoz.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 9) = cbHKodu.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 10) = txtHammCinsi.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 11) = cbHRengi.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 12) = degerAL(txtHammFiyatı, .Cells(xsonsatir, 12), "##0.00")
Worksheets("ÜrünListesi").Cells(xsonsatir, 13) = txtGunlukBaskı.Value
Worksheets("ÜrünListesi").Cells(xsonsatir, 14) = txtGunlukHammKg.Value
Kod:
Worksheets("ÜrünListesi").Cells(xsonsatir, 12) = degerAL(txtHammFiyatı, .Cells(xsonsatir, 12), "##0.00")
Kod:
Worksheets("ÜrünListesi").Cells(xsonsatir, 12) = Format(txtHammFiyatı.Value, "##0.00")