Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
07/12/2011 23:34
Konu Sahibi
kerem
Yorumlar
8
Okunma
3497
Konuyu Oyla:
  • Derecelendirme: 4/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 4/5 - 1 oy
Kullanici Avatari

kerem

Aktif Üye
 43
 74
 14
 30/04/2009
0
 Belirtilmemiş
 
 Ofis 2003
 10/12/2011,19:55
Çözüldü 
Merhaba arkadaşlar ekteki dosyamda verileri Kr.lu olarak aktariyoriyorum yani kuruşu virgül ile ayırarak aktariyor. Bul butonu ile verileri TextBox lara geri çağırdığım zaman işaretlediğim TextBox larda virgüller nokta olarak görünüyor. Bul ile çağırdığım veriler ile yeni kaıyt yaptığımız zaman veya değiştir butonunu çalıştırdığım zaman virgüller nokta olarak TextBox larda göründüğü için Kr.ları tam sayı olarak aktariyor. Yani 181,25 olarak aktaracağına 18125,00 olarak aktariyor.
Verilerin bul botonu ile TextBox lara doğru gelmesi için yani noktalı değilde virgüllü gelmesi için yardımlarınızı bekliyorum. Yardımlarınız için şimdiden teşekürler.

Koruma parolası :123

Ek Dosyalar
Kitap1.rar(67.39 KB)


kerem, 30-04-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

DUAYEN

Destek
SÜ.... AR....
 35
 1.026
 71
 13/08/2010
279
 Yozgat
 
 Ofis 2007
 18/04/2018,17:46
Çözüldü 
Örneği incelermisiniz.İstediğiniz şekildemi.


Bizim için zor diye bir şey yoktur, imkansızsa zaman alır...

Kullanici Avatari

kerem

Aktif Üye
 43
 74
 14
 30/04/2009
0
 Belirtilmemiş
 
 Ofis 2003
 10/12/2011,19:55
Çözüldü 
Çok teşekürler hocam. Hocam siz kuruşları ortadan kaldırmışsınız. Eklediğim resimde bul butonuna tıkladığım zaman işaretlediğim TextBox lara gelen verilerdeki noktalar, virgül olarak gelsin.

[Resim: 13233299821.jpg]


kerem, 30-04-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

schworse

Onursal Üye
ME.... EM.... ÖZ....
 40
 197
 8
 02/11/2008
100
 İzmir
 Yazılım Uzmanı
 Ofis 2013 64 Bit
 11/02/2018,20:32
Çözüldü 
Merhaba;

Sistem ayırıcılarını değiştir seçeneğini kullanarak ondalık . binlik için, olarak değiştirerek deneyebilirmisiniz.

[Resim: do.php?img=384]

Kolay gelsin.



Kullanici Avatari

kerem

Aktif Üye
 43
 74
 14
 30/04/2009
0
 Belirtilmemiş
 
 Ofis 2003
 10/12/2011,19:55
Çözüldü 
Hocam verileri girip kaydet butonu ile sayfaya aktarmada bir sorun yok. sayfaya doğru aktariyor. Veriyi TextBokslara bul butonu ile geri çağırdığımız zaman sorun çıkıyor. Sayfada virgül ile ayrılmış rakamlar TextBoxlara noktalı olarak getiriyor. Saygılar.


kerem, 30-04-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

schworse

Onursal Üye
ME.... EM.... ÖZ....
 40
 197
 8
 02/11/2008
100
 İzmir
 Yazılım Uzmanı
 Ofis 2013 64 Bit
 11/02/2018,20:32
Çözüldü 
Merhaba;

Eğer sadece form üzerindeki görüntüyü değiştirmek istiyorsanız aşağıdaki kodu kullanarak gerekli düzeltme işlemini yapabilirsiniz.

Kolay gelsin.

Ek Dosyalar
Kitap1_Schworse.rar(69.56 KB)


[Resim: do.php?img=401]

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
For Each hucre In Range("A6:A" & WorksheetFunction.CountA(Range("A6:K65000")) + 1)
If StrConv(hucre.Value, vbUpperCase) = StrConv(TextBox15.Value, vbUpperCase) Then
   hucre.Select
   ComboBox2.Text = ActiveCell.Offset(0, 1).Value
   ComboBox3.Text = ActiveCell.Offset(0, 2).Value
   TextBox3.Text = ActiveCell.Offset(0, 3).Value
   TextBox4.Text = Val(Replace(ActiveCell.Offset(0, 4), ",", "."))
   TextBox5.Text = Val(Replace(ActiveCell.Offset(0, 5), ",", "."))
   TextBox10.Text = Val(Replace(ActiveCell.Offset(0, 6), ",", "."))
   TextBox11.Text = Val(Replace(ActiveCell.Offset(0, 7), ",", "."))
   TextBox13.Text = Val(Replace(ActiveCell.Offset(0, 8), ",", "."))
   TextBox6.Text = Val(Replace(ActiveCell.Offset(0, 9), ",", "."))
   TextBox7.Text = Val(Replace(ActiveCell.Offset(0, 10), ",", "."))
   End If
Next




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü UserForm sorunu kenan827 2 1.885 17/04/2018, 15:20
Son Yorum: Subco
Çözüldü Excel Veri Çekme Sorunu goksel86 7 1.226 26/05/2017, 16:14
Son Yorum: ozanakkaya
Çözüldü Güncelleme ve Kaydetme sorunu yok_06 2 873 16/05/2016, 17:02
Son Yorum: atoz112
Çözüldü excele klasörden resim çağırma bitikhoca 2 1.901 09/05/2016, 12:36
Son Yorum: atoz112
Çözüldü Makro kayıt sorunu sebo44 2 888 14/04/2016, 14:36
Son Yorum: sebo44

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.